Ich dachte mir das ungefähr so:
Delphi-Quellcode:
var
stunden, minuten, sekunden: Integer;
...
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;
label13.caption:=format('%.2d : %.2d : %.2d',[stunden,minuten,sekunden]);
Grüße
Klaus