Einzelnen Beitrag anzeigen

Benutzerbild von ManuMF
ManuMF

Registriert seit: 11. Jul 2005
1.016 Beiträge
 
Delphi 6 Personal
 
#1

TTimer, der millisekundengenau startet

  Alt 28. Dez 2005, 14:45
Hallo,

ich programmiere gerade einen Countdown. Das ganze mache ich mit einem TTimer. Jetzt habe ich folgendes Problem: Der Timer soll passend zur Zeit laufen, d.h. er soll "timern" , wenn gerade eine volle Sekunde erreicht wurde.

Momentan habe ich das so realisiert:
Delphi-Quellcode:
while (MilliSecondOf(Time) <> 0) do
  sleep(0);

Timer.enabled := true;
Das funktioniert auch meistens, aber ab und zu dauert zu lange ( > 30 Sekunden).

Gibt es da vielleicht eine elegantere Lösung?

Danke,
ManuMF
Gruß,
ManuMF

Endlich hab ich was Positives an Vista entdeckt: Das mitgelieferte Mahjongg
  Mit Zitat antworten Zitat