托盘程序退出后，为什么图标不消失呢？

我写了个托盘程序，一切正常，可就是程序退出后，图标不消失，但只要鼠标在图标上滑一下，图标就消失了，这是怎么回事呢，恳请各位高手帮忙

解决方案 »

  1.   

    在程序结束事件里加  Application.Terminate;
      

  2.   

    你只用了Add 加了图标，退出前，你没用 delete删除
      

  3.   

    Shell_NotifyIcon(NIM_DELETE, @NotifyIcon)
      

  4.   

    创建时你用了
    Shell_NotifyIcon(NIM_ADD, @IconData);在程序退出时FormDestroy事件中加入
    Shell_NotifyIcon(NIM_DELETE, @IconData);
      

  5.   

    procedure TfrmIcon.FormClose(Sender: TObject; var Action: TCloseAction);
    begin
      Shell_NotifyIcon(NIM_DELETE, @NotifyIcon);
    end;
      

  6.   

    程序异常退出的时候可能出现这样的问题，怎么处理呢？在FormClose里的事件好像不处理？
      

  7.   

    大家说的都不对，我已经在程序退出时FormDestroy事件中加入
    Shell_NotifyIcon(NIM_DELETE, @IconData);了。程序退出是很正常的，只要把鼠标往图标上一放图标就自动消失了