请教 延迟时间用什么函数 多谢

Question

比如VC中 Sleep
Delphi 中用什么呢？

Answer 1

const TIMEDELAYSECONDS=2;  //延迟两秒
var
  TimeCounter:DWORD;TimeCounter:=GetTickCount;
while GetTickCount-TimeCounter《TIMEDELAYSECONDS*1000 do
   Application.ProcessMessages;或t:=now;
while (now<t+3/24/60/60/1000) do;//延时三毫秒t:=now;
while (now<t+3/24/60/60) do;//延时三秒t:dword;
t:=gettickcount
while (gettickcount-t)<3000 do; //延时三毫秒sleep(3000);////延时三秒采用定时器也可进行毫秒级的延迟 

Answer 2

gettickcount比sleep好，用sleep是让应用程序所有线程停止一定时间，这样起不到延迟效果，