以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  bin 的右下角弹出泡泡提示的那个  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=38440)
--  作者：wuxianzuoji41
--  发布时间：2013/7/29 16:36:00
--  bin 的右下角弹出泡泡提示的那个
bin,点击"我出来的字样"，然后调用一段FT的代码，这个该在哪个地方写代码 ，就是点击弹出来的泡炮的内容，就调用我写的一段FT的代码，如果不点击就不调用这段代码
[此贴子已经被作者于2013-7-29 16:36:47编辑过]
--  作者：Bin
--  发布时间：2013/7/29 16:45:00
--  
参考我的例子呀,在自定义事件里面写. 在全局代码里面呢.你看一下.
--  作者：wuxianzuoji41
--  发布时间：2013/7/29 17:02:00
--  

\'*********************************************************************************************
Public Dim nfi As new System.Windows.Forms.NotifyIcon \'定义通知区域小图标
Public Dim cms As new System.Windows.Forms.ContextMenuStrip \'定义右键菜单
\'菜单按钮点击事件
Public Sub Menu1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
   MessageBox.Show("你点击的是 : " & sender.Text)
End Sub
\'图标双击事件
Public Sub ICON_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
   baseMainform.visible=True \'设置主窗体显示  这个代码帮助中有的
End Sub
\'*********************************************************************************************

 

bin，没有找到单击那个弹出来的炮泡的事件呀，我要的不是点击通知区域小图标，
是要自己写吗，这个麻烦给写一下，实在太难了，这个是要用VB写吗

[此贴子已经被作者于2013-7-29 17:02:36编辑过]
--  作者：Bin
--  发布时间：2013/7/29 17:04:00
--  
你希望点击泡泡弹出的字样执行一段代码? 这也不行做不到. 你可以参考论坛另外一个右下角弹出提示窗口的例子来做.
--  作者：wuxianzuoji41
--  发布时间：2013/7/29 17:20:00
--  

是的BIN，希望点击泡泡弹出的字样执行一段代码，最好是根据弹出字样的不同，执行不同的代码

另外一个“右下角弹出提示窗口"是哪个，没搜到，也是在通知栏弹出吗？
--  作者：Bin
--  发布时间：2013/7/29 17:21:00
--  
1.这个没办法实现

2.恩,类似QQ的新闻弹窗
--  作者：wuxianzuoji41
--  发布时间：2013/7/29 17:25:00
--  
恩,类似QQ的新闻弹窗，这个也是在FT里弹平把，不是在WIN系统通知栏弹平吧
--  作者：Bin
--  发布时间：2013/7/29 17:27:00
--  
好像是,那你这个需求没办法实现了.
--  作者：fjlclxj
--  发布时间：2013/7/29 21:32:00
--  
试试：
1 设置气泡的字符
nfi.Ballo 
2 添加全局代码
以下内容为程序代码:

1 Public Sub Balloon_TipClicked(ByVal sender As System.Object, ByVal e As System.EventArgs)
2 MessageBox.Show(sender.BalloonTipText)
3 End Sub
（通过判断sender.BalloonTipText的字符内容，做出不同的响应代码即可）
3 添加点击气泡事件
 AddHandler nfi.BalloonTipClicked, AddressOf Balloon_TipClicked \'为通知区域图标气泡添加单击事件
[此贴子已经被作者于2013-7-29 21:33:31编辑过]
--  作者：wuxianzuoji41
--  发布时间：2013/7/30 1:59:00
--  

fjlclxj非常感谢，解决了所有的问题，太厉害了，这个是VB的代码吗

也感谢BIN的帮助