怎么让程序暂停。

[rehen]

就是当程序中要等待一个发生得比较慢的事件(如网页的载入)。要让程序“原地踏步”。要怎么做呢。
我记得是有一个函数的....可是一时想不记来。

[ckc]

Sleep

[纯冰糖]

对，是sleep函数，不过最好能同时还能处理别的消息，
加上
Application.processmessage;

[lcxhjg]

sleep();

[yinweixian]

就是要让程序休眠的话就用sleep函数

[gj121]

sleep()

[cduck]

TIMER 控件也可以实现，比如每隔一个固定时间段再运行

[lionlsl]

用API里面的函数,sleep( parameter)时间延时,parameter为毫秒比如让parameter:=1000;

[lionlsl]

我想补充一点:
为了让你更确定的知道网页载入的时间,可以用ontimer事件来测试你所花的时间来确定
parameter的时间为多少.
procedure ontimer;
var
TestTimer:integer;
i:integer;
begin
TestTimer:=timer1.intervel*i;
i:=i+1;
label1.caption:=inttostr(TestTimer);
end;