Delphi的DLL里如何实现定时器功能?
2014-06-06 10:13
127 查看
一,首先引入“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);
二,启动定时器:
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);
相关文章推荐
- Delphi的DLL里如何实现定时器功能?
- Delphi的DLL里如何实现定时器功能?
- Delphi的DLL里如何实现定时器功能?
- Delphi的DLL里如何实现定时器功能?
- C#中如何调用Delphi写的Dll,实现画图功能
- 如何用delphi语言实现结束指定进程的功能
- MFC的DLL中实现定时器功能
- 使用package(包功能)实现DLL与主程序的数据库连接共享(Delphi版)
- C#调用Delphi编写的Dll,实现绘图的功能
- 如何在Delphi中实现C语言中静态变量的功能
- Delphi实现DLL导出的Interface如何在其实语言中使用
- 在Delphi中用拼音首字符序列来实现检索功能
- 如何使用cdosys.dll实现发送邮件
- 如何在应用程序中实现关机功能
- 如何用API函数实现网上邻居的功能?
- 如何通过动态生成Html灵活实现DataGrid分类统计的界面显示功能
- 如何在DBGRID或者STRINGGRID中实现用滚轮进行翻页的功能,就象浏览网页一样?
- (MS SQL)如何实现相关文章功能(多关键字匹配)
- Crystal Report 水晶报表如何实现类似表格单元格合并的功能
- 在Delphi中用拼音首字符序列来实现检索功能