本文整理自网络,侵删。
procedure showmsg;
begin
showmessage('时间到了'); //检查时间已到。
end;
SetTimer(0, $AA, 5000, @showmsg);
相关阅读 >>
Delphi winapi: getforegroundwindow - 获取前台窗口的句柄
Delphi recodedatetime、recodedate、recodetime、recodeyear ... 修改时间
更多相关阅读请进入《Delphi》频道 >>