日期:2008-12-06 浏览次数:20499 次
2、添加主菜单:
在Form中添加一个ActiveBar―>对其右单击选中快捷菜单中的属性―>弹出ActiveBar设计器界面(左侧的TreeView中显示当前ActiveBar的资源,右侧显示选中资源的属性->右单击资源栏中的Bands添加一个MenuBar为工程的主菜单项->右单击刚刚添加的主菜单添加若干Button作为主菜单的各个显示项。
其中:AlignToForm确定ActiveBar是否填充整个Form
3、添加一级菜单
右单击资源栏中的Bands添加一个PopUpMenu为工程的一级子菜单项->右单击一级子菜单添加若干Button作为一级子菜单的各个显示项。->将主菜单的相应显示项的SubBands值设置为此一级子菜单的Name值。
4、添加二级菜单
右单击资源栏中的Bands添加一个PopUpMenu为工程的二级子菜单项->右单击二级子菜单添加若干Button作为二级子菜单的各个显示项。->将一级子菜单的相应显示项的SubBands值设置为此二级子菜单的Name值。
5、实现菜单的Check选项
在程序相应的菜单中使用ABar.Bands("MenuTool").Tools.item("…").Checked = Not AABar.Bands("MenuTool").Tools.item("…").Checked来实现Check选项的乒乓。