Delphi Android menu,Delphi菜单组件TMainMenu使用方法详解

本文为大家分享了菜单组件TMainMenud的使用方法，供大家参考，具体内容如下

菜单组件TMainMenu

创建菜单双击TmenuMain，单击Caption就可以添加一个菜单项

菜单中添加分割线只需加“-”就可以添加一个分割线

级联菜单的设计

单击鼠标右键弹出菜单中选择Create Submenu菜单项

单选功能设计

要在设计的菜单项目中选择RadioItem属性为True，Checked属性为True

复选功能的设计

在设计菜单项目中选择RadioItem属性为False，Checked属性为True

动态创建菜单

源代码如下

procedure TForm1.Button1Click(Sender: TObject);

var

MainMenu: TMainMenu;

MenuItem: TMenuItem;

begin

//主菜单创建

MainMenu:=TMainMenu.Create(self);

Self.Menu:=MainMenu;

//文件菜单创建

MenuItem:= TMenuItem.Create(MainMenu);

MenuItem.Caption:='文件';

MainMenu.Items.Add(MenuItem);

//新建子菜单创建

MenuItem:=TMenuItem.Create(MainMenu);

MenuItem.Caption:='新建';

MainMenu.Items[0].Add(MenuItem);

//子菜单中的子菜单创建

MenuItem:= TMenuItem.Create(MainMenu);

MenuItem.Caption:='打开';

MainMenu.Items[0].Items[0].Add(MenuItem);

MenuItem:= TMenuItem.Create(MainMenu);

MenuItem.Caption:='保存';

MainMenu.Items[0].Items[0].Add(MenuItem);

end;

end.

为主菜单添加图标

为菜单添加图标，首先用TImagaList组件为菜单指定好图标，将菜单中的Images属性设为ImageList1，然后选择要添加的图标索引。如图所示：

以上就是本文的全部内容，希望对大家的学习有所帮助，也希望大家多多支持编程小技巧。

总结

如果觉得编程之家网站内容还不错，欢迎将编程之家网站推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。

小编个人微信号 jb51ccc

喜欢与人分享编程技术与工作经验，欢迎加入编程之家官方交流群！