以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请问动态添加的TopicBar,如何设置TopicLinkClick  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=45927)

--  作者:涛声依旧5666
--  发布时间:2014/2/13 15:54:00
--  请问动态添加的TopicBar,如何设置TopicLinkClick
请问动态添加的TopicBar,如何设置TopicLinkClick事件。困惑半天了。
用AddHandler TopicBar1.TopicLinkClick, AddressOf Link_Click 不成功。
特此求助!!!

--  作者:狐狸爸爸
--  发布时间:2014/2/13 16:11:00
--  
呵呵,目前没办法,本来动态添加的使用全局事件,但是foxtable没有提供全局的TopicLinkClick事件,就别动态添加了吧
--  作者:有点甜
--  发布时间:2014/2/13 20:59:00
--  
 还是可以,就是查资料麻烦一些,代码如下

窗口1_AfterLoad

 

Dim tpb As C1.Win.C1Command.C1TopicBar = Forms("窗口1").Controls("TopicBar1").basecontrol

AddHandler tpb.LinkClick, AddressOf LinkClick

 

全局代码

 

Public Sub LinkClick(sender As object, e As C1.Win.C1Command.C1TopicBarClickEventArgs)

    msgbox(e.page.text & "   " & e.link.text)

End Sub


 

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:topicbar动态事件.table


--  作者:涛声依旧5666
--  发布时间:2014/2/13 21:52:00
--  
谢谢有点甜,看样子只能直接引用C1.Win.C1Command.C1TopicBar了。
foxtable既然二次封装了C1TopicBar,建议应该开放类似的事件为好。