原创 delphi在DLL里面启用定时器

习惯了用TIMER来轮询特定事件，现在工作在DLL模式下，我也需要用TIMER，不过我不是在DLL里面CREATE A TTIMER，而是用了mmsystem里的TIMER，传说要精准一些，感觉在用VC里的TIMER。

procedure TimerProc(uTimerID, uMessage: UINT; dwUser, dw1, dw2: DWORD); stdcall;    //定义timer入口处理函数

然后起动这个TIMER处理器，

 TimerID := timeSetEvent(50, 0, TimerProc, 0, TIME_PERIODIC); //50ms触发一次定时器

最后关掉TIMER

timeKillEvent(TimerID);