Foxtable(狐表)用户栏目专家坐堂 → 功能区自定义菜单显示问题


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

主题:功能区自定义菜单显示问题

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


加好友 发短信
等级:婴狐 帖子:15 积分:240 威望:0 精华:0 注册:2019/9/11 13:29:00
功能区自定义菜单显示问题  发帖心情 Post By:2019/11/29 8:27:00 [只看该作者]

菜单设计,当设置隐藏功能区标题为true时,功能区不会自动显示;当设置隐藏功能区标题为false时只显示一个标题,点击标题后才能正常显示功能区。

AfterOpenProject代码:

<!--StartFragment -->
 Forms("登录").Open()
If Vars("user_name") = "" And User.Type = UserTypeEnum.User Then
    Syscmd.Project.Exit()
    Return '这个要加上,因为既然要退出,就不应该再执行后面的初始化代码了,否则会出错
End If
'后续初始化代码
If User.Type <> UserTypeEnum.Developer '判断是否是开发者
    TableCaptionVisible = False '不显示表格名称切换导航条
    RibbonTabGroups("设计功能").Visible = False
    ApplicationMenu.visible = False '隐藏程序菜单
    For Each o As object In configbar.Items '隐藏配置栏
    o.Visible = False
    Next
    RibbonTabs.HideTabHeaderRow = False '隐藏功能区标题
    RibbonTabs.AllowMinimize = False
    RibbonTabs.Minimized = False
End If
Forms("代办任务").Open()
Forms("组织架构权限配置").Show

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


加好友 发短信
等级:超级版主 帖子:105473 积分:536356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/11/29 9:41:00 [只看该作者]

我测试没有问题,把菜单模板导出发上来测试一下

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


加好友 发短信
等级:婴狐 帖子:15 积分:240 威望:0 精华:0 注册:2019/9/11 13:29:00
  发帖心情 Post By:2019/11/29 9:50:00 [只看该作者]

辛苦

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


加好友 发短信
等级:婴狐 帖子:15 积分:240 威望:0 精华:0 注册:2019/9/11 13:29:00
  发帖心情 Post By:2019/11/29 9:52:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:菜单模板.zip


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


加好友 发短信
等级:超级版主 帖子:105473 积分:536356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/11/29 10:13:00 [只看该作者]

嗯,应该是个bug,已经反馈
临时解决可以这样

afteropenproject事件最后加一句
RibbonTabs("基础操作").Selected = True
[此贴子已经被作者于2019/11/29 10:26:03编辑过]

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


加好友 发短信
等级:一尾狐 帖子:401 积分:3408 威望:0 精华:0 注册:2014/3/10 11:02:00
  发帖心情 Post By:2019/11/29 10:18:00 [只看该作者]

错误代码:e.Form.BaseForm。FormBorderStyle =WindowsFormBorderStyle.None

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


加好友 发短信
等级:一尾狐 帖子:401 积分:3408 威望:0 精华:0 注册:2014/3/10 11:02:00
  发帖心情 Post By:2019/11/29 10:19:00 [只看该作者]

这是是么意思

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


加好友 发短信
等级:超级版主 帖子:105473 积分:536356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/11/29 10:28:00 [只看该作者]

以下是引用telek在2019/11/29 10:18:00的发言:
错误代码:e.Form.BaseForm。FormBorderStyle =WindowsFormBorderStyle.None

独立、模式窗口才能这样用。

另外自己的问题请另外新建帖子发布,不要在别人的帖子里回复,更何况您的问题和别人的问题一点关系都没有

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


加好友 发短信
等级:婴狐 帖子:15 积分:240 威望:0 精华:0 注册:2019/9/11 13:29:00
  发帖心情 Post By:2019/11/29 11:13:00 [只看该作者]

afteropenproject事件最后加一句
RibbonTabs("基础操作").Selected = True

该方法可行,感谢大蓝哥!


 回到顶部
帅哥哟,离线,有人找我吗?
行者自在
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:15 积分:170 威望:0 精华:0 注册:2020/2/13 18:15:00
  发帖心情 Post By:2020/2/18 15:25:00 [只看该作者]

学习看看

 回到顶部