Задержка выполнения программного кода (???)

← →
UDS (2003-02-06 20:43) [0]

Имеется ли в Дельфи аналог DELAY ?
Как сделать паузу перед выскакиванием модального окна?

← →
MBo (2003-02-06 20:47) [1]

sleep или таймер

← →
UDS (2003-02-06 20:50) [2]

А конкретней? Если в бейсике например писал DELAY 1000, то как с этими sleep и timer?

← →
Song (2003-02-06 20:51) [3]

Sleep(1000)

← →
UDS (2003-02-06 20:51) [4]

← →
Antosya (2003-02-06 21:26) [5]

Или onTimer событие делать!

← →
Mihey (2003-02-06 22:10) [6]

Есть:

procedure Delay(ms : longint);
var
TheTime : LongInt;
begin
TheTime := GetTickCount + ms;

while GetTickCount < TheTime do
Application.ProcessMessages;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage("Start Test");
Delay(2000);
ShowMessage("End Test");
end;

Задержка выполнения программного кода (???) Найти похожие ветки