delphi 时间到就触发事件


本文整理自网络,侵删。

 delphi 时间到就触发事件

var
S,D:tdatetime;
begin
Label1.Caption:=FormatDateTime(' hh:mm:ss',Now); //此时
//S:=FormatDateTime(' hh:mm:ss',Now);
s:=strtodatetime(Label1.Caption);
D:=strtodatetime('14:01:02'); //到达时间 --你自己定;www.delphitop.com
if s=d then
begin
showmessage('Y');
// 这中间你加入你自己要 执行的数据库语句

end;
end;

相关阅读 >>

Delphi获取机器的mac地址

Delphi - 利用dll编程控制摄像头实现拍照、录制视频

Delphi 读取文件获取指定字符串

Delphi 简单的旋转图像角度代码

Delphi firedac 下的 sqlite [11] - 关于批量提交 sql 命令的测试

Delphi怎么样选择pagecontrol1的分页

Delphi 获取标题栏高

Delphi validatename 过滤特殊字符

Delphi tnethttpclient演示

Delphi中webbrowser(或者embeddedwebbrowser)控件打开部分网站报“invalid floating point operation”异常的解决方法

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



打赏

取消

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

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

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

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

评论

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