Hallo,
habe folgende Wait procedure benutzt:
Delphi-Quellcode:
procedure Wait(time:word);
var start: integer;
begin
start := GetTickCount;
while GetTickCount - start <= time do
Application.ProcessMessages;
end;
Dieses klappt schon, aber gibt es denn was vergleichbares, besseres?
Danke.
[edit=sakura] [delphi]-Tags Mfg, sakura[/edit]