5.1弹出菜单
弹出菜单又称为快捷菜单,是在某个组件上右击时弹出的菜单。快捷菜单中提供了与该组件相关的命令,如下图所示。
与主菜单相比,弹出菜单具有更高的灵活性,它不但可以用于窗体本身,还可以用于窗体中的各种组件。
1.创建弹出菜单
在Delphi程序设计中,使用Standard面板中的PopupMenu组件来创建弹出菜单。将PopupMenu组件添加到Form窗体中后,双击窗体中的PopupMenu组件可以打开PopuMenu菜单设计器。
在PopupMenu菜单设计器中设计菜单项的方法与在MainMenu设计器中设计菜单项的方法类似。下面以创建下图所示的快捷菜单为例,介绍如何创建快捷菜单。
![](http://hi.csdn.net/attachment/201110/16/0_1318745601aG7A.gif)
1)设计菜单项
在图中所示的PopupMenu菜单设计器中选中当前空菜单项,将Caption属性设为“撤销”,设置菜单名。然后依次添加分隔条、“剪切”、“复制”、“粘贴”、“删除”、分隔条和“全选”菜单项,即可得到如上图所示的快捷菜单。
2)设计菜单快捷键
快捷菜单也有快捷键。在默认情况下,系统会为快捷菜单中的每个菜单项自动关联一个快捷键,如上图所示,括号中的字母即为菜单项的快捷键。当快捷菜单弹出后,直接按菜单项右侧的字母键,即可执行该命令。
如果要自定义菜单的快捷键,需要将PopupM