Foxtable(狐表) → 用户栏目 → 专家坐堂 → 同主表的多个窗口(opened状态)间切换显示触发的事件是什么？


  共有2816人关注过本帖树形打印复制链接

主题：同主表的多个窗口(opened状态)间切换显示触发的事件是什么？
帅哥哟，离线，有人找我吗？
wizscn
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：16 积分：243 威望：0 精华：0 注册：2015/5/15 15:00:00 		同主表的多个窗口(opened状态)间切换显示触发的事件是什么？  发帖心情 Post By：2015/7/18 22:37:00 [只看该作者]

同主表的多个窗口(opened状态)间切换显示触发的事件是什么？
图片点击可在新窗口打开查看此主题相关图片如下：11122.png
图片点击可在新窗口打开查看

如图显示，右边主窗口部分都是主表main的并列窗口，都打开着的，点击下方的标题后会将该窗口显示在最上层，些动作触发的事件是什么？
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/7/19 10:21:00 [只看该作者]

 必须自己绑定事件。

 

 并列窗口放上这么一段代码:


Dim Tcl As C1.Win.C1Command.C1DockingTab = e.Form.panel.parent.parent
AddHandler Tcl.DoubleClick, AddressOf C1DockingTab_DoubleClick


全局代码代码是这个

Public Sub C1DockingTab_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Functions.Execute("DoubleClickColse1",e,Sender)   '这个是函数
End Sub


函数的写法:

Dim e As System.EventArgs = Args(0)
Dim Sender As Object = Args(1)
Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
        Forms(frm.Name).Close
    End If
End If
 回到顶部
帅哥哟，离线，有人找我吗？
wizscn
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：16 积分：243 威望：0 精华：0 注册：2015/5/15 15:00:00 		  发帖心情 Post By：2015/7/19 23:55:00 [只看该作者]

这代码我是理解不了了，不过我希望能直接拿来用就可以了。我现在还是不能实现：

第一个问题：并列窗口放上这么一段代码:

Dim Tcl As C1.Win.C1Command.C1DockingTab = e.Form.panel.parent.parent
AddHandler Tcl.DoubleClick, AddressOf C1DockingTab_DoubleClick

这代码放在窗口的什么地方？AfterLoad里么？


-----------------------------------------------
函数的写法:

Dim e As System.EventArgs = Args(0)
Dim Sender As Object = Args(1)
Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
        Forms(frm.Name).Close
    End If
End If
-------------------------------------------------------------------------------
上面这个函数又放在哪里？是哪一个事件里面么？

辛苦“大红袍”帮忙解释一下呗！谢谢！
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/7/20 9:30:00 [只看该作者]

afterLoad事件

 

Dim Tcl As C1.Win.C1Command.C1DockingTab = e.Form.panel.parent.parent
AddHandler Tcl.DoubleClick, AddressOf C1DockingTab_DoubleClick

 

 

内部函数 DoubleClickColse1 http://www.foxtable.com/help/topics/1486.htm

 

Dim e As System.EventArgs = Args(0)
Dim Sender As Object = Args(1)
Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
        Forms(frm.Name).Close
    End If
End If

 
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询