sleep?

Om man använder: "sleep(100);"
så står programmet helt stilla under den tiden.

Hur ska jag skriva om jag vill att den ska upprepa en funktion och bara vänta i 100ms, inte frysa programmet i 100ms?

------------------
^FreeZer^
------------------
"Om du läser denna mening en gång till, kommer du att ha läst den minst två gånger..."

Läs detta:
http://www.drbob42.com/uk-bug/hood-08.htm

Sidan kan inte visas... ;)

------------------
^FreeZer^
------------------
"Om du läser denna mening en gång till, kommer du att ha läst den minst två gånger..."

Nu kan den det.

Exempel från sidan:
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600">
program Hood8;
uses
WinProcs, Forms, WinCrt;

procedure Sleep(MilliSecondsToWait: LongInt);
var StartTime: LongInt;
begin
  StartTime := GetTickCount;
  while (GetTickCount \>= StartTime) and
        (GetTickCount \< (StartTime + MilliSecondsToWait)) do
    Application.ProcessMessages
end {Sleep};

var i: Integer;
begin
writeln(GetTickCount);
for i:=1 to 10 do
begin
Sleep(i * 1000);
writeln(GetTickCount);
end
end.