求delphi仿QQ系统托盘图标源代码

vincenit 发布于 2007-12-02 12:52， 2727 次点击

小弟是个delphi 程序新手
最近写了一个多功能记事本
现在想添加一个类似QQ系统托盘图标的功能
我使用了TbsTrayIcon控件，已经能够实现托盘图标的双击显示或隐藏了
单不知道怎么编写托盘图标的单击左键菜单和单击右键菜单
希望大家能够帮帮小弟这个忙
万分感谢了

小弟的邮箱是 [email=vincenit@]vincenit@[/email]

1 回复

anthony6342007-12-05 13:25

建两个popumemu,一个关联到TbsTrayIcon的Popumenu(应该有这个吧，如果没有换个控件)，一个在TbsTrayIcon的单击事件中 Popup(X, Y),试试?你那个控件我没用过，不过应该都差不多的.