- 博客(1)
- 资源 (1)
- 收藏
- 关注
RSS订阅转载 delphi 托盘程序
<br />新建工程,在uses处引用ShellAPI,<br />2.定义消息<br />const<br />WM_BARICON=WM_USER+200;<br />3.private处添加如下代码<br />procedure WMSysCommand(var Message: TMessage); message WM_SYSCOMMAND;<br />procedure WMBarIcon(var Message:TMessage);message WM_BARICON;<br />4.实现代码
2011-03-17 16:35:00
480
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人