菜单类组件和工具栏.PPT

第4章 菜单类组件和工具栏 Delphi实用教程 第4章 菜单类组件和工具栏 4.1 Delphi 7的菜单类组件简介 菜单分为 下拉式菜单 下拉式菜单的主菜单栏显示在窗体的标题栏之下，在下拉菜 单中排列各菜单选项。 快捷菜单 快捷菜单通过单击鼠标右键可以出现在用户区的任何地方。 4.2主菜单组件MainMenu Delphi7通过MainMenu组件来创建主菜单，MainMenu组件为非可视组件。在设计阶段，为窗体添加菜单后，MainMenu组件也显示在窗体上，而运行时主菜单将自动显示在菜单栏的位置。MainMenu组件位于组件面板Standard选项卡上（图标为 ）。 创建主菜单时，将该组件拖 放到当前窗体中（MainMenu组件不 能改变大小），这时对象查看器中 会显示出MainMenu的属性。 4.2.1 MainMenu组件的主要属性 1. AutoMerge属性 AutoMerge属性属性决定在多窗口的应用程序中。非主窗体 的主菜单是否和主窗体中的主菜单合并。 2. Images属性 Images属性是通过指定一组Bitmap或Icon的文件，在 MenuItem中指定Images的索引，这样可以实现在菜单项中 加入图标。 3. Items属性 Items属性用于存储主菜单中各菜单项的内容。在菜单编辑 器中编辑菜单，编辑好后该项会自动设置。 4.2.2 菜单编辑器 双击窗体中的MainMenu组件或者在对象查看器中单击MainMenu组件的Items属性右侧的省略号将进入菜单编辑器。 4.2.2 菜单编辑器 菜单项（MemuItem）中几个重要的属性： 1. Caption属性 Caption属性决定了菜单的标题。 2. Name属性 Name属性是菜单项对象的标志，在代码设计过程中通过 Name对菜单进行引用。 3. Checked属性 Checked属性可以标记菜单项是否是选中状态。 4. Enable属性 该属性确定菜单项是否有效。 5. ShortCut属性 该属性给菜单项定义快捷键，可以通过下拉列表选择。 6. Visible属性 该属性决定菜单项是否可见。 4.2.2 菜单编辑器 7. Break属性 该属性可以把一个菜单分成几列来显示。它有下面3种设置方式： l????mbNone：在该菜单处不折行。 l?? mbBarBreak：在该菜单处折行，并且两列之间有一竖线分隔。 l????mbBreak：在该菜单处折行，两列之间没有竖线分隔。 4.3快捷菜单组件PopupMenu4.3.1 快捷菜单 在菜单编辑区中单击鼠标右键将打开快捷菜单。 4.3.1 快捷菜单 菜单项加上相应的菜单OnClick事件代码有下面3种方法： 方法1： 通过在菜单编辑器中双击某一菜单项，Delphi 7将自动定位 到光标在代码编辑器相应菜单项的OnClick事件代码处。 Procedure Tform1.File1Click(Sender:Tobject); Begin {用户可以在此编写OnClick事件响应内容} end; 这时就可以在代码编辑区内编写正确的OnClick事件代码。 双击主窗体中的菜单项，也可以进入菜单项的事件代码编辑 区。 4.3.1 快捷菜单 方法2： 通过对象查看器，在对象查看器中选择Event选项卡，在想 要 加入的事件右侧的输入区内双击即可进入相应的事件代码 编辑区。 例: 想进入菜单项的OnDrawItem事件代码编辑区，可以 在对象查看器的Event选项卡中选择OnDrawItem，单 击右边的空白区，则进入如下所示的事件代码编辑 区。 ProcedureTform1.File1DrawItem(Sender:Tobject; Bcanvas:Tcanvas;Arect: rect;Selected:Boolean); Begin {可以在此编写OnDrawItem的事件代码} end; 4.3.1 快捷菜单 方法3： 在应用程序代码中实现菜单设计，用TmainMenu类的方法， Create、Add、Insert和Delete。 （1）Create方法 ▲语法： Constructor Create(Aowner:TComponent);override; Create方法是一个构造函数，调用它可以创建一个菜 单项，并自动设置新建菜单项的Enabled和Visible属性。