Oder so:
Delphi-Quellcode:
Var Start, Dauer: LongWord;
Start := GetTickCount;
...
Dauer := GetTickCount - Start;
Dauer = Zeit in Millisekunden;
Wenn Windows allerdings mal länger als 49,7 Tage läuft, könnte es einige Probs geben.
GetTickCount ist die Zeit in Millisekunden, die verganngen ist, seit dem Windows gestartet wurde.