to whaoye:<br> 我在res中又建了一个icon,但还是这样。<br>我不知道除了icon其它的窗口句柄在窗口标题栏取消后是否会出问题?我将代码贴上,<br>请大家帮我看看,谢谢。<br><br> wnd :=findwindow(nil,'form1');<br> TrayHandle := FindWindow('Progman', nil);<br> //在右下角添加图标<br> tid.cbSize:=sizeof(TNOTIFYICONDATA);<br> tid.Wnd :=Wnd;<br> tid.uID :=2000;<br> tid.uFlags:=nif_Message or nif_Icon or nif_Tip;<br> tid.uCallBackMessage:=wm_TRAYNOTIFY;<br> tid.hIcon:=LoadIcon(hInstance,'ICON1');<br> Shell_NotifyIcon (nim_Add,@tid);<br>