Zeit in hh:mm:ss anzeigen

[TheMiller]

So hatte ich es auch... ABER:

Ich habe folgendes gerechnet

diff:=GetTickDiff(recstart, GetTickCount()); Doch das sind ja keine Sekunden, sondern 1/1000-Sekunden. Ich danke dir...

Also, für alle, die genauso auf dem Schlauch stehen, wie ich:

Delphi-Quellcode:

var
  h, m, s: Integer;
  diff: Integer;
begin
  diff:=GetTickDiff(recstart, GetTickCount()) div 1000; // <- erst durch div 1000 werden es Sekunden!!!

  h:=diff div 3600;
  m:=(diff div 60) mod 60;
  s:=diff mod 60;

  Label2.Caption:=Format('%.2d:%.2d:%.2d', [h,m,s]);

Danke und gute Nacht!