現在の場所:Delphi Garden→スキル記事→プログラミングエクスペリエンス→Delphi遅延
Delphi遅延時間
日付:2004年8月31日著者:
手順遅延(MSECS:整数);
var
FirstTickCount:Longint;
始める
firstTickCount:= getTickCount;
繰り返す
application.processmessages;
((getTickCount-firsttickCount)> = longint(msecs));
終わり;
(出典:www.delphhibbs.com)