Foxtable(狐表) → 用户栏目 → 专家坐堂 → 已隐藏的按钮不显示


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

主题：已隐藏的按钮不显示
帅哥哟，离线，有人找我吗？
wukangppbb
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：378 积分：2724 威望：0 精华：0 注册：2020/7/24 10:30:00 		已隐藏的按钮不显示  发帖心情 Post By：2022/7/14 17:21:00 [显示全部帖子]

老师：
      这个菜单这里，我用的狐表自带的，但是我不想要这么多的层级，一些菜单我已经在后台隐藏了。这些隐藏的菜单怎么设置不加载出来呢？
这个菜单的是把原始菜单的菜单都加载不出来了。

if RibbonTabs("Table").Visible = False then 。。。。
这样吗？




图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
wukangppbb
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：378 积分：2724 威望：0 精华：0 注册：2020/7/24 10:30:00 		回复：（有点蓝）就是判断Visible 属性，false就...  发帖心情 Post By：2022/7/15 14:28:00 [显示全部帖子]


是这样写吗？
If BaseMainForm.controls（C1Ribbon1）.visible = False Then  .........


是要写在窗口的AfterLoad  事件里面还是 控件的 AfterSelectNode 里面？
 回到顶部
帅哥哟，离线，有人找我吗？
wukangppbb
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：378 积分：2724 威望：0 精华：0 注册：2020/7/24 10:30:00 		回复：（有点蓝）意思是项目里的系统菜单，有些菜单在...  发帖心情 Post By：2022/7/15 14:56:00 [显示全部帖子]

是的，因为都加载出来了，用户也不知道哪个有用，哪个没用。所以想把没有实际使用的自带的菜单隐藏掉。


应该怎么写的？
 回到顶部
帅哥哟，离线，有人找我吗？
wukangppbb
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：378 积分：2724 威望：0 精华：0 注册：2020/7/24 10:30:00 		回复：（有点蓝）目录树节点是怎么生成的，到生成的代...  发帖心情 Post By：2022/7/15 17:20:00 [显示全部帖子]

主要是做了很多测试菜单，还不成熟，只放在后台测试。不放在前面用。删除了，不方便

Dim tv As WinForm.TreeView = e.Form.Controls("菜单权限")
tv.Nodes.Clear
tv.Nodes.Add("功能区")
For Each rtb As RibbonMenu.Tab In RibbonTabs
    If tv.Nodes("功能区").Nodes.Contains(rtb.Name) = False Then
        tv.Nodes("功能区").Nodes.Add(rtb.Name)
    End If 

我改成

Dim tv As WinForm.TreeView = e.Form.Controls("菜单权限")
tv.Nodes.Clear
tv.Nodes.Add("功能区")
For Each rtb As RibbonMenu.Tab In RibbonTabs
    If tv.Nodes("功能区").Nodes.Contains(rtb.Name) = False  then
    If rtb.visible <> False Then
        tv.Nodes("功能区").Nodes.Add(rtb.Name)
    End If
    End If 

有报错，好像逻辑不对
 回到顶部
帅哥哟，离线，有人找我吗？
wukangppbb
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：378 积分：2724 威望：0 精华：0 注册：2020/7/24 10:30:00 		回复：（有点蓝）代码没有问题，报什么错？  发帖心情 Post By：2022/7/18 16:16:00 [显示全部帖子]

报错：

错误所在事件：窗口,菜单权限,AfterLoad
详细错误信息：
未将对象引用设置到对象的实例。


代码的确可以剔除一部分的隐藏菜单。但是有以上报错
 回到顶部
帅哥哟，离线，有人找我吗？
wukangppbb
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：378 积分：2724 威望：0 精华：0 注册：2020/7/24 10:30:00 		回复：（有点蓝）应该是其它代码的错误调试技巧：http...  发帖心情 Post By：2022/7/19 13:48:00 [显示全部帖子]

老师：

      我试着去删除自带的多余的系统菜单，但是删除后，一运行就报错了，系统菜单难道存在不可删除的一部分的吗？

图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20220719124628.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20220719124043.png
图片点击可在新窗口打开查看
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.09766 秒, 5 次数据查询