Re: Component for showing animated GIFs or AVI

Luckily enough I was researching lock free containers yesterday and ran across this from

http://delphi-snippets.blogspot.com/2005/08/cpu-and-form-friendly-long-sleep.html

procedure TForm.LongDelay(DelayMs : Cardinal);
var StopTime : Cardinal;
begin
StopTime := GetTickCount + DelayMs;
while (GetTickCount < StopTime) do
begin
Application.ProcessMessages;
Sleep(1);
end;
end;



I'm thinking that might solve your problems.

DD
.