Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Schneller Timer gesucht (https://www.delphipraxis.net/85372-schneller-timer-gesucht.html)

Gandalfus 30. Jan 2007 12:09

Re: Schneller Timer gesucht
 
Timertutorial

blablab 30. Jan 2007 17:46

Re: Schneller Timer gesucht
 
Erstmal danke für die vielen Antworten!
Ich denk mit den Funktionen QueryPerformanceTimer bzw. QueryPerformanceFrequency ist mein Problem gelöst...
Danke Gruber_Hans_12345!

@Grandalfus:
Echt gutes Tutorial!
Aber eine Variante für nen Timer hätte ich noch. Und zwar ist das eine Komination der Sleep Variante und der High Performance Variante. Das ist jetzt ein Beispiel, so wie ich es zur Zeit mache:

(Zuerst den großen Zeitabschnitt grob mit Sleep abwarten. Dann den Rest genau mit der HighPerformance-methode abwarten.)

Delphi-Quellcode:
QueryPerformanceCounter(a);
Restzeit := Zeit - (b-a)*1000 div f;
while RestZeit > 70 do begin
   Application.ProcessMessages;
   if abbruch then
      Exit;
   Sleep(50);
   QueryPerformanceCounter(b);
   Restzeit := Zeit - (b-a)*1000 div f;
end;
QueryPerformanceCounter(b);

while s > (b-a) do begin
   QueryPerformanceCounter(b);
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:45 Uhr.
Seite 2 von 2     12   

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-2025 by Thomas Breitkreuz