Delphi中进行延时的4种方法

 一、挂起,不占CPU sleep 二、不挂起,占cpu procedure Delay(msecs:integer); var FirstTickCount:longint; begin FirstTickCount:=GetTickCount; repeat Application.ProcessMessages; until ((GetTickCount-FirstTickCount) >=
相关文章
相关标签/搜索