- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 加载树自动隐藏问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=177952)
-- 发布时间：2022/6/11 21:18:00
-- 加载树自动隐藏问题
怎样用代码控制自加载树自动隐藏。
1.下面这段代码好次有问题，运行后版面会破坏，加载树原来在左边停靠的，运行会跑到右边，变成灰色
。
。2. 还有这些代码帮助没有说明，在那里有这方面资料。
Dim tb As Table = Tables("表A")
For Each a As OBJECT In tb.Grid.Parent.controls
For Each a1 As OBJECT In a.controls
If a1.text = "加载树"
a1.CanCloseTabs = False \'取消关闭按钮
a1.CanAutoHide = False \'是否自动隐藏
\'a1.ShowCaption = True \'是否显示标题
a1.parent.Dock = 4
Return
End If
Next
Next
-- 发布时间：2022/6/12 20:13:00
--
没有办法控制。