Foxtable(狐表)用户栏目专家坐堂 → 加载树自动隐藏问题


  共有5442人关注过本帖树形打印复制链接

主题:加载树自动隐藏问题

帅哥哟,离线,有人找我吗?
dgcql
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:21 积分:977 威望:0 精华:0 注册:2022/4/16 17:08:00
加载树自动隐藏问题  发帖心情 Post By: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


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111424 积分:567196 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/12 20:13:00 [只看该作者]

没有办法控制。

 回到顶部