- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]加载树 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96423)
-- 发布时间：2017/2/20 16:58:00
-- [求助]加载树
老师如何去除加载树中关闭按键，让非授权人员 无法关闭和显示
-- 发布时间：2017/2/20 17:19:00
--
mark 控制加载树
LockBaseMainForm \'锁屏
For Each a As OBJECT In Tables("表A").grid.Parent.controls
For Each b As OBJECT In a.controls
msgbox(b.text)
If B.text = "加载树" Then
b.CanCloseTabs = False
b.CanAutoHide = False
End If
Next
Next
UnLockBaseMainForm \'解锁
-- 发布时间：2017/2/20 21:36:00
--
老师带有窗口的加载树执行后没反应
也就是table在窗口中
[此贴子已经被作者于2017/2/20 22:02:39编辑过]
-- 发布时间：2017/2/20 22:27:00
--
For Each a As OBJECT In Tables("表A").grid.Parent.controls
改为
-- 发布时间：2017/2/20 23:05:00
--
此主题相关图片如下：zsl118zhq_1487602815529_6.png
错误提示
老师关于这些内容，帮助里怎么找不到，能否详解一下，怎么弄不清楚
[此贴子已经被作者于2017/2/20 23:08:15编辑过]
-- 发布时间：2017/2/20 23:11:00
--
窗口是什么类型的？上例子看看
这些都是底层的用法，我不是很建议使用这些用法的。还不如自己在窗口做加载树，想怎么控制都行：http://www.foxtable.com/webhelp/scr/0917.htm
-- 发布时间：2017/2/21 9:24:00
--
以下是引用铜豆在2017/2/20 21:36:00的发言：
老师带有窗口的加载树执行后没反应
老师带有窗口的加载树执行后没反应
也就是table在窗口中
[此贴子已经被作者于2017/2/20 22:02:39编辑过]
For Each a As OBJECT In forms("窗口1").panel.Parent.controls
或者
For Each a As OBJECT In Tables("表A").grid.Parent.controls
肯定是可以的