Auch unter Delphi 7 solltest du DateUtils in den uses einbinden können:
Delphi-Quellcode:
implementation
uses
DateUtils;
Achsoooooo.
Ehm,ok jetzt klappt fast alles nur dass sich der timer nicht wiederholt.Die labele zeigt nur 00:00:59 an,und nach einer sekunde bleibt es auf 00:00:59.
Delphi-Quellcode:
var
Form1: TForm1;
TotalTime,x:TTime;
implementation
{$R *.dfm}
procedure TForm1.Timer1Timer(Sender: TObject);
begin
totaltime := IncSecond (0, 60);
totaltime := IncSecond (totaltime,-1); //Versucht durch "x" variable zu ersetzen,gleiches resultat.
label1.Caption:=Timetostr(totaltime );
end;
end.