delphi 实现定时功能


本文整理自网络,侵删。

 {检查时间是否已经到了凌晨12点10分 }
procedure TimePro;
var
SystemTime: TSystemTime;
begin
GetLocalTime(SystemTime);
if (SystemTime.wHour = 0) and (SystemTime.wMinute >= 10) then
begin
{}//执行关机指令。
end;
end;

相关阅读 >>

Delphi 坐标截图如何实现

Delphi dbgrid去除滚动条

Delphi搜索字符串在流中的位置

Delphi操作excel说明

Delphi读取一个access数据库中的表名

Delphi xe mysql数据库操作类 mysqlhelper

Delphi xp 之后, Delphi 动注册表不方便了...逼出来一个办法:

Delphi randstring 随机字符串

Delphi 系统服务和普通forms程序共存一体的实现

实现拖动无标题窗口的5种方法

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...