delphi延时函数详细说明
2015-03-01 16:49
288 查看
procedure Delay(msec:integer);
//延时函数，msec 为毫秒(千分之1秒)
var
FirstTickCount : real;
begin
FirstTickCount := GetTickCount();
FirstTickCount := FirstTickCount + msec;
While FirstTickCount > GetTickCount() do
Application.HandleMessage; //关键在这里
end;
delay (5000); // 延时 5 秒
参见：http://blog.csdn.net/shao882
详见：100脚本网
//延时函数，msec 为毫秒(千分之1秒)
var
FirstTickCount : real;
begin
FirstTickCount := GetTickCount();
FirstTickCount := FirstTickCount + msec;
While FirstTickCount > GetTickCount() do
Application.HandleMessage; //关键在这里
end;
delay (5000); // 延时 5 秒
参见：http://blog.csdn.net/shao882
详见：100脚本网
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- c++ typedef 函数指针详细说明
- memset函数详细说明
- Delphi 函数说明
- Delphi函数说明
- memset 函数详细说明(转)
- OGrid接口函数详细说明
- php addslashes 函数详细分析说明
- SQL时间函数(详细说明1)
- Delphi部份函数,命令,属性中文说明
- 地图控件接口函数详细说明
- memset函数详细说明
- Delphi数据库处理组件BDE、ADO、InterBase和dbExpress详细说明
- Delphi 7.0的常用函数说明
- memset函数详细说明
- SQL时间函数详细说明
- memset函数详细说明
- Delphi部分函数、命令、属性中文说明
- Windows API 类别详细说明，函数的作用
- SQL时间函数详细说明
- Delphi单元文件详细说明