以下是引用unverse在2014-2-24 14:37:00的发言：
新版本了改了并列窗口的形式，请问：打开的并列窗口怎么关闭啊，双击关闭不了呢？
全局代码加上这个代码:
Public Sub C1DockingTab_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Functions.Execute("双击关闭",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
If frm.Name <> "主导航" Then '这个窗口是主窗口,判断下不要关闭.
DataTables.Save
Forms(frm.Name).Close
End If
End If
在窗口事件AfterLoad 中加入这个代码
Dim Tcl As C1.Win.C1Command.C1DockingTab = e.Form.panel.parent.parent
AddHandler Tcl.DoubleClick, AddressOf C1DockingTab_DoubleClick
然后测试下.
加好友 
发短信
Post By：2014/2/24 19:12:00 [显示全部帖子]
