以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎样才能做到狐表系统表窗口的关闭效果?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=161727)

--  作者:hitzfeld
--  发布时间:2021/3/28 19:20:00
--  怎样才能做到狐表系统表窗口的关闭效果?
之前也在论坛检索过“并列窗口”产生关闭按钮的方法。代码如下:
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

这个代码有个问题,比如我要关闭非当前显示的窗口,就得先切换到要关闭的窗口,再点击打叉,才能关闭。
但是我看到狐表自己的表窗口效果不错,不需要切换窗口,每个并列窗口都有个打叉,可以直接关闭,这个效果要怎么做?
图片点击可在新窗口打开查看此主题相关图片如下:关闭按钮.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2021/3/28 21:11:00
--  
FormTab.CloseBox = 1 ‘0、1、2、3....各种值自己测试一下  
--  作者:lisangyu
--  发布时间:2023/1/31 13:49:00
--  
怎么通过代码关闭e.form.name的页面窗口呢
--  作者:有点蓝
--  发布时间:2023/1/31 14:03:00
--  
tables(e.form.TableName).visible = false
--  作者:lisangyu
--  发布时间:2023/1/31 15:42:00
--  
Dim tc As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim tab As C1Command.C1DockingTab = tc.BaseControl
tab.CloseBox = C1Command.CloseBoxPositionEnum.ActivePage
AddHandler tab.SelectedTabChanged , AddressOf Tab_SelectedTabChanged
AddHandler tab.TabPageClosing , AddressOf Tab_TabPageClosing
AddHandler tab.TabPageClosed , AddressOf Tab_TabPageClosed

嵌入窗口。
关闭窗口除了点击页面右上角的X,怎么用代码关闭嵌入TabControl1的窗口?是隐藏页面吗
[此贴子已经被作者于2023/1/31 15:43:06编辑过]

--  作者:有点蓝
--  发布时间:2023/1/31 15:46:00
--  
官方不支持把窗口嵌入控件的用法,因为有无法解决bug,因此也无法提供这方面的技术支持