Mainmenu控件位于Standard选项卡上,用来设计菜单程序。
它常用的属性只有三个:
Images:用来设置菜单中用到的图片,类型为TCustomImageList。如果窗全中添
加了ImageList控件,会自动出现在选项列表中
AutoMerge属性:它可以用来决定在非多文档(MDI)程序运行时,次级窗体的主
菜单是否可以自动融合到主窗体的主菜单中,如果希望自动融合的话,设计时一
定要把次级窗体的主菜单的AutoMerge设为TRUE,而主窗体的主菜单的该属性却要
一定设为FALSE;
Items属性:
用来代表菜单中的各个菜单项,它的类型为TMenuItem,该属性为缺省属性,定义
如下:
property items:Tmenuitem;default;
正因为是缺省属性,所以以下操作:
firstitem:=menu1.items.items[0];
可以用:
firstitem:=menu1.items[0];
这样的简写来代替。
(1)Menuitemr 的主要属性
ACTION属性:用来设置与菜单命令相对应的要执行的动作,它列出了可以执行的
动作。
Bitmap属性:
该属性用来设置菜单命令中使用的位图。
Caption属性:
该属性用于存放菜单项的标题,与其它组件一样,在标题中“&”后面的字符可以
作为菜单项的快捷键
Checked属性:
该属性用来决定是否该菜单具有检查框的特征,如果设为TRUE,当选中该菜单项
时,在它的左边会出现一个打勾,再一次选择时打勾消失。
Enabled属性:
该属性用来决定是否可用。
Imageindex属性:
用来确定在该菜单的左边出现什么样的图片。
(2)Menuitemr 的主要方法
ADD,Insert,Delete,Clear方法
这几个方法是用来对菜单项的增减进行操作。它们的定义如下:
procedure add(item:Tmenuitem);overload;
procedure add(const aitems:array of Tmenuitem);overload;
procedure insert(index:integer,item:Tmenuitem);
procedure delete(index:integer);
procedure clear;
Indexof方法:
该方法可以获知某个菜单项在其选项组中的索引值,定义如下:
function indexof(item:tmenuitem):integer;
注意:该方法返回的索引值并不是按照程序运行时见到的菜单顺序。
Remove方法:
该方法也是用来删除菜单项的,但是与前面的DELETE和CLEAR方法不同,它的参数
为TMenuitem型,定义如下:
procedure remove(item:tmenuitem);
参数ITEM表示要删除的菜单项,调用该方法后,ITEM的子菜单也被删除。
[本文来自: 学Delphi网(http://www.xuedelphi.com/) ]详细出处参考:http://www.xuedelphi.cn/article/html2010/2008031909444950.html