2017年4月28日
摘要: 1、 新建一个工程,在窗体上,放上CnTrayIcon 和PopupMenu2、 设置CnTrayIcon 属性:Active :true AutoHide :flaseEnabled:TrueHint:’实现托盘功能’Name: CnTrayIcon1PopupMenu: PopupMenu1Ue 阅读全文
posted @ 2017-04-28 23:30 hahy8008 阅读(193) 评论(0) 推荐(0) 编辑
摘要: 比如: procedure TForm1.Button1Click(Sender: TObject);begin CnTrayIcon1.OnClick ; // 这句就是不能通过!!end; 有过路的高手,指点学生一下。谢谢 阅读全文
posted @ 2017-04-28 22:54 hahy8008 阅读(118) 评论(0) 推荐(0) 编辑