我编了一个应用程序,由一个主程序和一个有托盘图标的子程序组成(两个都是EXE文件);当关闭主程序时,子程序也会被自动关闭,可是当程序关闭后托盘区剩下一个托盘图标不能自动清除,需要鼠标移到该图标后才能清除。请问如何解决(我在主程序用到的关闭子程序的函数是‘猛料’里找来的(killtask过程),子程序在独立运行时没有此现象)
解决方案 »
- 智力扫雷小游戏辅助工具
- 求购《Delphi5开发人员指南》,无论新旧。
- 请问: 如何代码控制发生事件? 请大家一定要帮帮忙啊!!
- 有谁知道浙大快威软件如何啊,可能要去啊,做电力系统的,想了解一下
- Gif图像(动画)在什么控件里播放?怎么做?
- 初学者关于强制类型转换的问题!
- 各位都用什么帮助工具制作应用程序的帮助文件啊?
- 如何取到鼠标单击DBGrid表中这一行相应字段的值?
- VCLSKin 导致 Dephi2010 的unicode功能失效问题!!!
- 大虾请进----------这个相似度算法如何改?-----------
- 急。请问怎样通过程序来控制win2k下的服务的启动和关闭。
- 发送按键问题,急
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
nid:TNotifyIconData;
begin
nid.cbSize := sizeof(nid); // nid变量的字节数
nid.cbSize := sizeof(nid); // nid变量的字节数
nid.uID:=1; //内部标识,与加入小图标时的数一致
nid.Wnd := Handle; //主窗口句柄
Shell_NotifyIcon(NIM_DELETE,@nid); //去掉小图标
Shell_NotifyIcon(NIM_DELETE,@nid); //去掉小图标
end;
建议你自己写个ttrayicon类,或者用别人的