Wenn ich mich nicht ganz verhaue sollte es so gehen, wenn die Geschwindigkeit irgendwas pro Sekunde ist.
Dann sind 3600 Sekunden eine Stunde, 60 Sekunden eine Minute und der Rest sind Sekunden.
Delphi-Quellcode:
Stunden := (StrToInt(Label10.Caption) div i) div 3600;
Minuten := ((StrToInt(Label10.Caption) div i) mod 3600) div 60;
sekunden := ((StrToInt(Label10.Caption) div i) mod 3600) mod 60;
Grüße
Klaus