![]() |
TTimer, der millisekundengenau startet
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:
Das funktioniert auch meistens, aber ab und zu dauert zu lange ( > 30 Sekunden).
while (MilliSecondOf(Time) <> 0) do
sleep(0); Timer.enabled := true; Gibt es da vielleicht eine elegantere Lösung? Danke, ManuMF |
Re: TTimer, der millisekundengenau startet
So, nach einer kleinen Pause und etwas frischer Luft habe ich jetzt selbst eine Lösung erstellt:
Delphi-Quellcode:
Man kann es sich auch unnötig schwer machen... :wall:
Sleep(1000 - MilliSecondOf(Time));
Gruß, ManuMF |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:52 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz