用delphi怎么实现延时功能?在delphi中有一个sleep()函数是用来暂停线程的,使用了它好像和死掉了似得,不好用,这么简单的延时动作用Timer控件有显得复杂了.下面给大家分享一个真正好用的延时功能: procedure delay(MSecs:LongInt); var FirstTickCount,Now:LongInt; begin FirstTickCount:=GetTickCount(); repeat Application.ProcessMessages; Now:=G