Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Sekunden in Minuten


ASBMorsi2003 - Mo 14.04.03 10:34
Titel: Sekunden in Minuten
Wie bekomme ich eine Variable a, welche die Sekunden beinhaltet in eine Minuten Ausgabe! Dabei dürfen die Sekunden aber nicht größer als 59 sein. Danke


LCS - Mo 14.04.03 10:39

Hi
Meinst du sowas:

Quelltext
1:
2:
3:
4:
 b : string;
 ...
 b := IntToStr( a div 60 ) + ':' + IntToStr( a mod 60 );
 ...


Gruss Lothar


ASBMorsi2003 - Mo 14.04.03 11:07

Klappt irgendwie nicht. "Operator ist auf diesen Operantentyp nicht anwendbar." Gibt es noch andere Möglichkeiten? Danke


hansa - Mo 14.04.03 11:14

Dann ist a kein integer.


ASBMorsi2003 - Mo 14.04.03 11:29

Kann die Sekunden (a) bloß als real einlesen. Bei integer kommt "Inkopatible Typen".


ASBMorsi2003 - Mo 14.04.03 11:35

Das liegt daran, wenn ich a auslese kommt sowas: 200,5 sec. Kann mann nicht irgendwie runden, das man a als integer benutzen kann. Tausend dank!!!


foxy - Mo 14.04.03 11:37


Quelltext
1:
format('%.0f',[a]);                    


sowas?? :)


hansa - Mo 14.04.03 11:44

rund (200,51) ergibt : 201
trunc (200,99) ergibt : 200

eines der beiden müßte genügen.


ASBMorsi2003 - Mo 14.04.03 13:55

Danke, jetzt hat's geklappt! Das einzige was noch ist, bei Liedern mit ner Null, z.B. 7:04 zeigt er an: 7:4. Was könnte das sein? Danke!!!


hansa - Mo 14.04.03 14:02

geh der Antwort von foxy mal nach in der OH


ASBMorsi2003 - Mi 16.04.03 13:41

Was hast du gemeint? Ich komme mit dem Befehl von Foxy nicht klar! Habe weiterhin das Problem mit der Null! Danke für eure Hilfe!!!
So sieht's im Moment aus:

Quelltext
1:
2:
c:= (trunc(a));
b := IntToStr( c div 60 ) + ':' + IntToStr( c mod 60 );


:?: :?: :?:


wulfskin - Mi 16.04.03 14:00

ASBMorsi2003 hat folgendes geschrieben:
Danke, jetzt hat's geklappt! Das einzige was noch ist, bei Liedern mit ner Null, z.B. 7:04 zeigt er an: 7:4. Was könnte das sein? Danke!!!
Das ist doch genau das selbe. Egal, so sollte es gegen:b := format('%d:%.2d', [Sec div 60, Sec mod 60]);Gruß wulfskin!