API函数
Shell_NotifyIcon(dwMessage,lpData)
用于控制托盘图标
在Delphi中引用时要引用ShellAPI单元
dwMessage:
NIM_ADD: 创建图标
NIM_DELETE 删除图标
lpData
指向一个NOTIFYICONDATAA类型变量的指针
NOTIFYICONDATAA:
.cbSize
.Wnd 窗口句柄
.uID
.uFlags NIF_ICON + NIF_MESSAGE + NIF_TIP
.uCallbackMessage 消息(一般自定义)
.szTip Hint,提示
.hIcon 图标,Hicon类型,即一个Icon的句柄
例如
delphi)
var
NIM_Data: NOTIFYICONDATAA;
const
WM_TRAYNOTIFY: WM_User+100;
begin
NIM_Data.cbSize := sizeof(NIM_Data);
NIM_Data.Wnd := Self.Handle;
NIM_Data.uID := 100;
NIM_Data.uFlags := NIF_ICON + NIF_MESSAGE + NIF_TIP;
NIM_Data.uCallbackMessage := WM_TRAYNOTIFY;
NIM_Data.szTip := '资料管理';
NIM_Data.hIcon := LoadIcon(hInstance,'SHOW_ICON');
Shell_NotifyIconA(NIM_ADD,@NIM_Data);
end;