Moin,
Ich stand gerade vor dem Problem, dass ich ne Uhr brauche, die bei meinem Proggi mitläuft. Nachdem ich mir hier die Posts angesehen habe war ich nich viel schlauer als vorher.
Jetzt habe ich mir sowas gebastelt:
Delphi-Quellcode:
var
Zeit: TTime;
Procedure Button1Klick
begin
Zeit := Time; //aktuelle Zeit
Timer1.Enabled := True;
end;
Procedure Timer1Timer
begin
//Tu hier was
Label1.Caption := TimeToStr((Time - Zeit));
end;
So ungefähr. Timer1 hat bei mir n Delay von 1ms, da es bei mir noch was macht (Zufallszahlen erzeugen)...
Das Ergebnis is im Format hh:mm:ss