Delphi Format 00:00:00 ?

Thema durchsuchen

Ansicht

Themen-Optionen

Format 00:00:00 ?

Ein Thema von newuser01 · begonnen am 26. Aug 2007 · letzter Beitrag vom 26. Aug 2007

Vorheriger Beitrag

Nächster Beitrag

newuser01

Registriert seit: 30. Aug 2006
248 Beiträge

Delphi 7 Professional

Format 00:00:00 ?

26. Aug 2007, 13:37

Wie bekomme ich eigentlich die Zeitangabe in diesen Format angezeigt 00:00:00 ?

zusammenfalten · markieren

Delphi-Quellcode:

			
  public

    { Public-Deklarationen }

    iTime:Integer;

procedure Tfrm_timer.Timer1Timer(Sender: TObject);

var

iStd,iMin,iSek:Integer;

begin

iTime := iTime + 1;

iStd := iTime div 3600;

iMin := iTime div 60;

iSek := iTime mod 60;

l_Time.Caption := IntToStr(iStd) + ':' + IntToStr(iMin) + ':' + IntToStr(iSek);