以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [原创]如何在自己的系统中,根据情况关闭系统菜单和显示系统菜单? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=66622) |
-- 作者:包头123 -- 发布时间:2015/4/10 17:05:00 -- [原创]如何在自己的系统中,根据情况关闭系统菜单和显示系统菜单? 版主: 将系统菜单加到自己开发的系统后,想在关闭系统菜单的时候关闭它,想在打开的时候,显示它,代码如何写? 谢谢了。 版主:发帖子时,提示错误信息:请输入投票内容。在哪里输入投票内容呢?界面上好像不容易找到。 |
-- 作者:Bin -- 发布时间:2015/4/10 17:08:00 -- 不要发起投票,直接发布主题 切换系统菜单用快捷键 CTRL+SHIFT+F12
|
-- 作者:包头123 -- 发布时间:2015/4/10 17:24:00 -- 版主: 我没有说清楚,我的菜单中,既有系统菜单,又有自己定义的菜单,有的时候,想关闭系统菜单,在关闭后,还想在某时,显示系统菜单。 与您给出的方法不是一码事,不知道我是否说清楚了。
|
-- 作者:Bin -- 发布时间:2015/4/10 17:25:00 -- 不明白,菜单是不可能同时存在自定义和系统菜单的 |
-- 作者:包头123 -- 发布时间:2015/4/10 17:30:00 -- 版主: 我把系统菜单和我自己定义的菜单都放在一起了。如下图所示。 从中可以看出,前面五个菜单项是系统菜单,后面第六项日常工作、系统管理和快捷查询,是我自己定义菜单。 我希望按下某个快捷键关闭系统菜单,然后再按下某个快捷键,显示系统菜单。 |
-- 作者:包头123 -- 发布时间:2015/4/10 17:47:00 -- 我很希望有一个与Syscmd.Project.OpenSystemMenu()对应的系统命令:Syscmd.Project.CloseSystemMenu(),不知道有没有? 如果有,我就能实现我的想法了。 另外,在菜单系统中,如何设置快捷键。
|
-- 作者:包头123 -- 发布时间:2015/4/13 10:32:00 -- 最终解决办法找到了: 需要关闭时,设置为隐藏,需要显示时,设置为可见。 设置为隐藏的语句如下: RibbonTabs("Common").Visible = False \'关闭系统菜单中的common菜单(日常工作) RibbonTabs("Table").Visible = False \'关闭系统菜单中的Table菜单(数据表) RibbonTabs("Project").Visible = False \'关闭系统菜单中的Project菜单(管理项目) RibbonTabs("Print").Visible = False \'关闭系统菜单中的Print菜单(打印输出) RibbonTabs("Other").Visible = False \'关闭系统菜单中的Other菜单(杂项) |