以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 快捷菜单有问题,请修正! (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4497) |
-- 作者:reachtone -- 发布时间:2009/10/5 17:59:00 -- 快捷菜单有问题,请修正! 对于快捷菜单集合中的所有命令,设置其Enabled属性均有效。 但是,对于ContextCommandMenu(子菜单),设置其Enabled属性无效!如以下代码就根本不起作用: ContextMenus("Cell").Items("Filter").Enabled = False |
-- 作者:roy78 -- 发布时间:2009/10/5 19:36:00 -- ContextMenus("Cell")("sccj").Enabled=false .Items 去掉 [此贴子已经被作者于2009-10-5 19:37:07编辑过]
|
-- 作者:reachtone -- 发布时间:2009/10/5 20:24:00 -- 呵呵,不是这个问题,把Items去掉只是简写而已。 快捷菜单中有两种类型,一个是ContextCommand(菜单命令),一个是ContextCommandMenu(子菜单)。 Enabled属性对于菜单命令是正常的,但对于子菜单无效。 在默认菜单下,通过命令窗口试一下这个代码就知道了:ContextMenus("Cell").Items("Filter").Enabled = False。筛选子菜单还是没有被禁止。 [此贴子已经被作者于2009-10-5 20:26:39编辑过]
|
-- 作者:狐狸爸爸 -- 发布时间:2009/10/6 20:57:00 -- 收到 |
-- 作者:狐狸爸爸 -- 发布时间:2009/10/7 11:02:00 -- 菜单控件的问题,我解决不了,你可以这样: For Each cmd as RibbonMenu.ContextCommand in ContextMenus("Cell").Items("Filter").Items cmd.Enabled = False Next |
-- 作者:reachtone -- 发布时间:2009/10/7 12:20:00 -- 以下是引用狐狸爸爸在2009-10-7 11:02:00的发言:
For Each cmd as RibbonMenu.ContextCommand in ContextMenus("Cell").Items("Filter").Items cmd.Enabled = False Next 这个代码只能对子菜单下的ContextCommand有效吧?如果该子菜单下又有子菜单,估计就不行了。 |
-- 作者:reachtone -- 发布时间:2009/10/7 12:28:00 -- 以下是引用狐狸爸爸在2009-10-7 11:02:00的发言: 呵呵,你都是狐狸他爸了,怎么选择购买的控件还有问题?菜单控件的问题,我解决不了 |
-- 作者:roy78 -- 发布时间:2009/10/7 12:56:00 -- 狐狸他老头子都无解不了? |
-- 作者:狐狸爸爸 -- 发布时间:2009/10/8 9:16:00 -- 有解的,大家自己先想想 |
-- 作者:reachtone -- 发布时间:2009/10/8 10:51:00 -- 以下是引用狐狸爸爸在2009-10-8 9:16:00的发言:
有解的,大家自己先想想 就拿菜单中的Group来说吧:一个组里有不同类型的菜单组件,如标准按钮、菜单按钮、复选按钮等等。怎样才能对该组中的Items全部遍历一遍呢?是不是在该集合中再嵌套一个组件类型的循环?如果是这样的话,那么怎样才能得到菜单组件的类型呢? |