Thema: Delphi Format für Zeit ändern

Einzelnen Beitrag anzeigen

Larsi

Registriert seit: 10. Feb 2007
2.262 Beiträge
 
Delphi 2007 Professional
 
#1

Format für Zeit ändern

  Alt 12. Jun 2009, 14:08
Hi,

ich habe folgenden Code welcher als Variable Sekunden erwartet und diese dann in Sekunden, Minuten und Stunden umrechnet.

Hier der Code:

Delphi-Quellcode:
var
  Hour, Min, Sec, MSec : Word;
begin
i := i + 1;
DecodeTime(IncMilliSecond(StrToTime('00:00:00'), i*1000),Hour,Min,Sec,MSec);
end;
statusbar1.Panels.items[1].Text := inttostr(hour) + ':' + inttostr(Min) + ':' + inttostr(Sec);
end;
Jedoch sieht die Zeit bspw. so aus:

0:1:20

Wie kann ich da zwei Nulllen anzeigen also das die Ausgabe so aussieht:

00:01:20?

MFG Larsi
Ein Tag ohne Delphi ist ein verlorener Tag!

Homepage zu meinem neuen Programm: StreamZ
  Mit Zitat antworten Zitat