
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;
mainmenu Mainmenu控件的使用方法详解
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;
注意:该方法返回的索引值并不是按照程序运行时见到的菜单顺序。mainmenu控件()
Remove方法:
该方法也是用来删除菜单项的,但是与前面的DELETE和CLEAR方法不同,它的参数 为TMenuitem型,定义如下:
procedure remove(item:tmenuitem);
参数ITEM表示要删除的菜单项,调用该方法后,ITEM的子菜单也被删除。
本文来自电脑杂谈,转载请注明本文网址:
http://www.pc-fly.com/a/jisuanjixue/article-42838-1.html
并应对任何可能出现的问题
来了