以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=161466)

--  作者:HANZHIGANG
--  发布时间:2021/3/18 13:10:00
--  [求助]
我设计了3个并列窗口,为什么一次只能显示两个窗口标题

补充说明:我的窗口标题是在上面
[此贴子已经被作者于2021/3/18 13:38:52编辑过]

--  作者:HANZHIGANG
--  发布时间:2021/3/18 13:37:00
--  
想实现:一、点击按钮打开对应的并列窗口,点击几个按钮就打开几个窗口,显示打开窗口的标题
二、在并列窗口的标题设置一个关闭此窗口的按钮,点击则关闭相应的窗口并隐藏对应的主表

全局事件

Public Sub _TabPageClosing(sender As Object, e As C1.Win.C1Command.TabPageCancelEventArgs)
\'页面关闭按钮点击事件
Dim name =  e.TabPage.Text
If name = "主页"  Then
e.Cancel = True
Else
    If Forms.contains(name) Then
        e.Cancel = True
        Forms(name).Close
        If sender.tabpages.Contains(e.tabpage)
            sender.tabpages.remove(e.tabpage)
        End If
    End If
End If
End Sub

AfterOpenProject

Dim MainTab As C1Command.C1DockingTab = BaseMainform.Controls("MainPages")
Dim FormTab As C1Command.C1DockingTab = MainTab.TabPages(0).controls(0)
FormTab.CanCloseTabs = True
FormTab.CloseBox = 1
Formtab.CanAutoHide = True
AddHandler Formtab.TabPageClosing, AddressOf _TabPageClosing

以上代码试了一下,但没有实现,不知道问题出在了哪里
请指导
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:管理项目1.table


--  作者:有点蓝
--  发布时间:2021/3/18 13:49:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50080

1、并列窗口的所有者表必须是同一个表
2、并列窗口的所有者表必须是左边第一个表

另外这种关闭并列窗口的用法,可能会和底层的用法冲突,这种用法不受官方支持。建议在每个窗口添加关闭按钮关闭窗口