Delphi
本类阅读TOP10
作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站
Q:怎样让程序延时
A:
procedure Delay(msecs:integer);varFirstTickCount:longint;beginFirstTickCount:=GetTickCount;repeatApplication.ProcessMessages;until ((GetTickCount-FirstTickCount) >= Longint(msecs));end;
相关软件: