阿杰 发表于 2009-1-30 17:35:57

【开源】【VB6】阿杰+系统托盘+气泡提示正式版【源码】

<p><font face="Verdana">'********************************************************************<br/>'功能列表: 共四个命令:开启托盘、气泡提示、更换托盘图标、关闭托盘<br/>'<br/>'1.开启托盘(窗口,提示文本,托盘图标)<br/>'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1窗口&nbsp;&nbsp;&nbsp;&nbsp; ,不能为空,该参数表示窗口的名子<br/>'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 2提示文本 ,可为空,为空时表示无任何提示。<br/>'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 3托盘图标 ,可为空,如果为空表示用窗口的图标作为托盘图标<br/>'<br/>'&nbsp; 例子:开启托盘(form1,"阿杰的托盘提示")<br/>'<br/>'2.气泡提示(气泡内容,气泡标题,提示图标类型,托盘图标)<br/>'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1气泡内容&nbsp;&nbsp;&nbsp;&nbsp; ,可为空,默认为:"系统托盘气泡提示文字"<br/>'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 2气泡标题&nbsp;&nbsp;&nbsp;&nbsp; ,可为空,默认为:"气泡提示",该参数是气泡提示的标题<br/>'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 3提示图标类型 ,可为空,默认为:1=信息图标<br/>'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 4托盘图标&nbsp;&nbsp;&nbsp;&nbsp; ,可为空,默认为:窗口图标<br/>'<br/>'3.更换托盘图标(托盘图标)<br/>'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1托盘图标,为图标的句柄<br/>'<br/>'4.关闭托盘()</font></p>
<p>&nbsp;</p><br/>
[此贴子已经被作者于2009-1-30 17:42:26编辑过]

everyone 发表于 2009-4-17 00:02:17

<p>右键后,鼠标移开后,菜单并没有消失呢</p>

everyone 发表于 2010-2-24 13:04:51

好家伙！

马大哈 发表于 2010-2-25 23:52:42

右键后,鼠标移开后,菜单并没有消失呢
everyone 发表于 2009-4-17 00:02 http://www.m5home.com/bbs/images/common/back.gif


    先要把自己某个句柄SetForegroundWindow一下再弹出菜单就行了.

xbhml 发表于 2010-5-17 00:40:02

气泡这个东东要研究一下，谢谢

andyliang007008 发表于 2010-8-12 15:53:52

这个不错

siuwai 发表于 2012-6-22 13:01:46

除了感谢不知道说什么了
页: [1]
查看完整版本: 【开源】【VB6】阿杰+系统托盘+气泡提示正式版【源码】