Delphi不占CPU的延时函数

本文整理自网络，侵删。

 
function HaveSigned(MaxWaitTime: Cardinal): Boolean;
var   I:Integer;
var   WaitedTime:Cardinal;
begin
          WaitedTime:=0;
          while      (WaitedTime<MaxWaitTime)   do
          begin
                  SleepEx(100,False);
                  Inc(WaitedTime,100);
                  Application.ProcessMessages ;
          end
end;
 

相关阅读 >>

Delphi 控制台关闭指定窗口

Delphi 手机号码库段号地区查询

android开发-px和dip以及sp的区别

Delphi切换指定窗口到最前并获得焦点

Delphi获取ie浏览器url地址

fmsoft_unigui个文件说明

Delphi 中打开浏览器跳转网址链接网页的几种方法

Delphi 蠕虫下载者源代码

Delphi ifdef 另类用法

Delphi 网上获取北京时间firedac 下的 sqlite [3] - 获取数据库的基本信息

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi不占CPU的延时函数