系统托盘的编程论文

《系统托盘的编程论文》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、系统托盘的编程论文托盘消息处理：在Shell32.DLL动态链接库中包括一个函数Shell_NotifyIconA()可通知_MYTRAYICONCALLBACK;//托盘消息处理过程proceduremand(Varmsg:Tmand);message_mand;//处理托盘图标的右键菜单事件procedureMinimize(varmess:TNCLBUTTONDO_NCLBUTTONDOMyTrayIconCallBack(varMsg:TMessage);varCursorPos:TPoint;begincaseMsg.LParamof_LBUTTONDBLCLK:

2、//双击消息：弹出主窗口beginVisible:=notVisible;Application.Sho:=Visible;SetForegroundenu(pm,0,ord('A'),.freel,0,Ord('B'),'Exit');//加入菜单事件---》处理MAND消息即可TrackPopupMenu(pm,Tpm_BottomAlignorTpm_RightAlign,CursorPos.x,CursorPos.y,0,handle,nil);//在图标上方显示该弹出式菜单end;end;end;procedureTForm1.mand(varmsg:Tmand)

3、;beginCasemsg.ItemIDofOrd('A'):shoessage('我的右键菜单！');Ord('B'):Self.close;//关闭程序主窗体elseinherited;end;end;procedureTform1.Minimize(varmess:TNCLBUTTONDOess.Hittest=htReducethenSelf.Hideelseinherited;end;procedureTForm1.FormClose(Sender:TObject;varAction:TCloseAction);var{程序被关闭时通知Windo_DELETE,n

4、id);//去掉小图标end;