我的ICON怎么不能加载到任务栏中的状态栏呢？(附代码)

[kedy211]

代码如下：
procedure TfmMain.FormCreate(Sender: TObject);
var
NewItem:TListItem;
begin
nd0.cbSize := sizeof(NotifyIconData);
nd0.Wnd := handle;
nd0.uID := 0;
nd0.uFlags := NIF_MESSAGE or NIF_ICON or NIF_TIP;
nd0.uCallbackMessage := WM_TRAYNOTIFY;
nd0.hIcon:= LoadIcon(hInstance,'Icon0');
StrPLCopy(nd0.szTip,'Hello!', 63);

//hs[0]:=LoadIcon(hInstance,'ico');
Shell_NotifyIcon(NIM_ADD,@nd0);

程序运行时任务栏的状态栏可以看出来有东西，可是却不能加上我想加的图标,请高手指导!
谢谢!

[lxpbuaa]

如果是想通过LoadIcon(hInstance,'Icon0');取得应用程序图标，那么直接：
nd0.hIcon:= Application.Icon.Handle;
就可以了。
如果是从编译到应用程序的资源中取得图标，请确保'Icon0'为该图标的名字（注意大小写）。

————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

[jenemery]

上面的说得对。

[kedy211]

谢谢!