| 前页 | 后页 |
定义菜单项
任务
任务 |
详情 |
|---|---|
|
定义菜单项 |
菜单项是通过响应GetMenuItems事件定义的。 第一次调用此事件时，MenuName是一个空字符串，代表顶级菜单。对于只有一个菜单选项的简单Add-In项，您可以返回一个字符串。 函数EA_GetMenuItems（存储库为EA.Repository，MenuLocation作为字符串，MenuName作为字符串）作为变量 EA_GetMenuItems =“＆Joe的Add-In ” 结束功能 |
|
定义子菜单 |
要定义子菜单，请在父菜单前面加上破折号。父项和子项的定义方式如下： 函数EA_GetMenuItems（存储库为EA.Repository，MenuLocation作为字符串，MenuName作为字符串）作为变量 选择案例菜单名称 案件 ”” 家长菜单项 EA_GetMenuItems = “ - ＆Joe的Add-In ” 案例“-＆Joe的Add-In ” '使用数组符号定义子菜单项。 '在此示例中，“图”和“树视图”组成“乔的Add-In ”子菜单。 EA_GetMenuItems = Array（“＆Diagram”，“ && Treeview”） 其他情况 MsgBox“无效菜单”，vbCritical 结束选择 结束功能 |
|
定义更多子菜单 |
同样，您可以定义更多子项目： 函数EA_GetMenuItems（存储库为EA.Repository，MenuLocation作为字符串，MenuName作为字符串）作为变量 选择案例菜单名称 案件 ”” EA_GetMenuItems =“ -Joe的Add-In ” 案例“ -Joe的Add-In ” EA_GetMenuItems = Array（“-＆Diagram”，“＆TreeView”） 案例“-＆Diagram” EA_GetMenuItems =“＆Properties” 其他情况 MsgBox“无效菜单”，vbCritical 结束选择 结束功能 |
|
启用/禁用菜单选项 |
要默认启用或禁用菜单选项，您可以使用此方法向用户显示特定项目： Sub EA_GetMenuState（存储库为EA.Repository，位置为字符串，MenuName为字符串，ItemName为字符串，IsEnabled为布尔值，IsChecked为布尔值） 选择案例位置 案例“ TreeView” '始终启用 案例“关系图” '始终启用 案例“ MainMenu” 选择案例ItemName 案例“＆Translate”，“ Save＆Project” 如果GetIsProjectSelected（）然后 IsEnabled =假 万一 结束选择 结束选择 IsChecked = GetIsCurrentSelection（） 结束子 |