Forum: Programmieren allgemein
by PaKir,
10. Mär 2005
Habs geändert und jetzt gehts. :thumb:
Hätt ich auch selbst drauf kommen können. :oops: :duck: :oops:
Hab nur gedacht das das bei so kleinen Werten nicht an sowas liegen kann.
Geht doch nicht. Der Fehler kommt zwar nicht mehr so oft aber er kommt
Forum: Programmieren allgemein
by PaKir,
10. Mär 2005
Ich hab nach einer alternative zu “sleep“ und einer anderen Prozedure gesucht und das hier hier im Forum gefunden Delay revisited. Funktioniert auch eigentlich ganz gut, da die CPU-Auslastung angenehm niedrig bleibt.
procedure Delay(Milliseconds: Integer);
var
Tick: DWord;
Event: THandle;
begin
Event := CreateEvent(nil, False, False, nil);
try
Tick := GetTickCount +...