以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  并列窗口关闭按钮不显示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157385)

--  作者:qaz17909
--  发布时间:2020/10/14 11:14:00
--  并列窗口关闭按钮不显示
给并列窗口加上关闭按钮,按照论坛上面,新建一个项目的时候可以实现,但是在原来的项目上却没反应,请问可能的原因是什么,我用message.show验证了AfterOpenProject中的代码有运行。接下来我应该如何排查或者试验?
在全局代码中写入:

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



--  作者:有点蓝
--  发布时间:2020/10/14 11:18:00
--  
这种更改底层用法的应用不受官方支持,有问题只能自行解决。

试试把并列窗口绑定的表(所有者表)移到所有表格的最左边,然后保存一下项目。所有并列窗口必须绑定同一个表

--  作者:qaz17909
--  发布时间:2020/10/14 11:39:00
--  
解决了,我把绑定的表已到最左边就可以了,谢谢!
--  作者:qaz17909
--  发布时间:2020/10/14 14:22:00
--  
有个问题,我如何让每次打开项目后,绑定的那个表每次都在最左边?
--  作者:有点蓝
--  发布时间:2020/10/14 14:32:00
--  
移到所有表格的最左边,然后保存一下项目