Mainmenu控件的使用方法详解

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网(/) ]详细出处参考：/article/html2010/2008031909444950.html