[转载]程序设计中防止因系统崩溃而丢失任务栏的图标

  信息来源：www.csdn.com.cn

本文章参考 "程序春秋" 2003/1 P66 “用Visual Basic找出"消失"的系统任务栏图标”一文，作者：钟兰芳，在此对原作者表示感谢。
因原文中程序用VB编写，故ccrun将其改为C++Builder 版，呵呵。欢迎指正.

很多软件都在系统托盘区添加了图标，可以有时当Explorer.exe莫名的崩溃以后，程序在任务栏的图标就消失了，对于有些在任务栏隐藏了的软件来说，就没法控制了。原因是Explorer重新载入以后会重建任务栏，但大多数软件并不知道任务栏已经重建，所以没有及时重新画自己在任务栏的图标。

当任务栏建立的时候会向系统内所有顶级窗口发出一条消息：WM_TASKBARCREATED，我们只需要捕捉这个消息，并重建任务栏图标即可。不过这是一条任务栏自定义的消息，所以需要用RegisterWindowMessage在自己的程序里注册该消息。

首先定义两个全局变量

long WM_TASKBARCREATED = 0;
unsigned int lIconMessage = 0;

在.h中声明以下函数：
private:   // User declarations

   void TForm1::RemoveTrayIcon();
   void TForm1::AddTrayIcon();
   void __fastcall TForm1::WndProc(Messages::TMessage& Message);
   

在Form的OnCreate事件中注册 WM_TASKBARCREATED 消息，并在托盘区添加图标
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
   WM_TASKBARCREATED = RegisterWindowMessage("TaskbarCreated");
   lIconMessage=RegisterWindowMessage("IconNotify");
   AddTrayIcon();
}

在Form的OnClose事件中删除在任务栏的图标
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
   RemoveTrayIcon();
}

重载WndProc，响应系统消息
//---------------------------------------------------------------------------
void __fastcall TForm1::WndProc(Messages::TMessage& Message)
{
   if(Message.Msg==lIconMessage)
   {
      if(Message.LParam==WM_LBUTTONDBLCLK) //双击图标的事件      
      //....

   }
   if(Message.Msg==WM_TASKBARCREATED) //任务栏重建消息
      AddTrayIcon(); //重新添加图标
      
   TForm::WndProc(Message);//对于其他的消息，调用基础类的WndProc函数让Windows进行缺省处理。
}


以下是自定义函数，功能是在任务栏添加和删除图标
//---------------------------------------------------------------------------
void TForm1::AddTrayIcon()
{
   NOTIFYICONDATA icondata;
   memset(&icondata,0,sizeof(icondata));
   //将结构icondata的各域初始化为0
   icondata.cbSize=sizeof(icondata);
   icondata.hWnd=Handle;
   strncpy(icondata.szTip,Application->Title.c_str,sizeof(icondata.szTip));
   icondata.hIcon=Application->Icon->Handle;
   icondata.uCallbackMessage=lIconMessage;
   icondata.uFlags=NIF_MESSAGE|NIF_ICON|NIF_TIP;
   Shell_NotifyIcon(NIM_ADD,&icondata);
}
//---------------------------------------------------------------------------
void TForm1::RemoveTrayIcon()
{
   NOTIFYICONDATA icondata;
   memset(&icondata,0,sizeof(icondata));
   icondata.cbSize=sizeof(icondata);
   icondata.hWnd=Handle;
   Shell_NotifyIcon(NIM_DELETE,&icondata);
}

编译这个程序，然后用任务管理器或其他工具中止Explorer.exe，可以看到在Explorer重新载入的时候，本程序在任务栏的图标又重现了，嘿嘿。