Thema: Delphi Format für Zeit ändern

Einzelnen Beitrag anzeigen

Benutzerbild von BUG
BUG

Registriert seit: 4. Dez 2003
Ort: Cottbus
2.094 Beiträge
 
#2

Re: Format für Zeit ändern

  Alt 12. Jun 2009, 14:13
Nicht getestet:
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 := Format('%.2d:%.2d:%.2d', [Hour, Min, Sec]);
end;
MfG,
Bug
Intellekt ist das Verstehen von Wissen. Verstehen ist der wahre Pfad zu Einsicht. Einsicht ist der Schlüssel zu allem.
  Mit Zitat antworten Zitat