标签:blog http io art 代码 ar .net log
一,首先引入“mmsystem”单元。
二,启动定时器:
var
MMTimerID: Integer; // 定时器ID
MMTimerID := timeSetEvent(1000, 0, @TimerProc, 0, TIME_PERIODIC);
三,定时器过程代码:
procedure TimerProc(uTimerID, uMessage: UINT; dwUser, dw1, dw2: DWORD); stdcall;
begin
// 业务代码
end;
四,结束定时器:
timeKillEvent(MMTimerID);
参考:
http://blog.csdn.net/sunylat/article/details/28859007
Delphi的DLL里如何实现定时器功能?,布布扣,bubuko.com
标签:blog http io art 代码 ar .net log
原文地址:http://www.cnblogs.com/findumars/p/3876315.html