Foxtable(狐表)用户栏目专家坐堂 → 请问:有办法将内置筛选/加载树的位置移到表的右边吗?


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

主题:请问:有办法将内置筛选/加载树的位置移到表的右边吗?

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


加好友 发短信
等级:狐神 帖子:4733 积分:34458 威望:0 精华:0 注册:2008/8/31 22:44:00
请问:有办法将内置筛选/加载树的位置移到表的右边吗?  发帖心情 Post By:2020/6/12 8:20:00 [只看该作者]

如题,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

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

 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4733 积分:34458 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2020/6/12 10:36:00 [只看该作者]

果然可以,如获至宝,蓝版威武!

 回到顶部