VFP6中文本编辑控件右键弹出式菜单的设计方法

第七章菜单一、菜单分类：条形菜单和弹出式菜单（也叫快捷菜单）二、菜单概念：1、弹出式菜单：单击右键所弹出的菜单叫做弹出式菜单（也叫快捷菜单）2、条形菜单：菜单项所在同一行，也就是说各菜单项没有了菜单，就叫做条形菜单，3、下拉式菜单：如果条形菜单各菜单项有子菜单就说是下拉式菜单，其条形菜单是下拉式菜单的一种。

三、建立菜单1、使用菜单设计器文件→新建→菜单→菜单（或快捷菜单）2、利用项目管理器在项目管理器中选择文档选项卡→其他→新3、建→新建菜单（或快捷菜单）4、利用手工命令 create menu 菜单名四、修改菜单1、使用菜单设计器文件→打开2、利用命令 modify menu 菜单名五、运行菜单1、在菜单设计器中选择菜单项运行菜单项里的菜单名.mpr运行2、命令 do 菜单名.mpr六、菜单设计的基本过程七、退出菜单命令1、退出菜单：set sysmenu to default2、退出标准菜单：set sysmenu nosaveset sysmenu to default八、快捷键的设置：在每个菜单项的“选项”列都有一个无符九、号按钮，单击此按钮会弹出“提示选项”对话框，在键标签框里同时按住所要设的快捷键。

如：ctrl+t。

此时那个无符号按钮上面出现”√”十、热键的设置：在该菜单项名称后输入斜杠在输入对应的热键（如：退出（\R））十一、菜单项与菜单项之间的一条直线的设置：在两个菜单项之间插入一个菜单项，在这个菜单项里输入(\-)十二、为顶层表单添加菜单（重点）1、先用菜单设计器设计好菜单2、在菜单设计时，在“常规选项”对话框中选择“顶层表单”复选框。

3、将表单showwindows属性设置为2—作为顶层表单4、在表单的load 或init事件中输入:do 菜单名.mpr withthis5、在表单的destroy ：release menu 菜单名.mpr extended 十三、快捷菜单及一般菜单的调用命令：do 菜单名.mpr。

在Windows应用程序中，利用弹出式菜单（Pop-up Menu）是增加软件易用性的一个重要方式。

本文将向大家介绍在VB6.0中实现弹出式菜单的几种方法。

利用VB6.0内置的PopupMenu方法PopupMenu方法（Method）是VB6.0内置的实现弹出式菜单的方法，用于在MDIForm或Form等对象中的鼠标点位置或指定位置显示弹出式菜单。

其语法为：Object.PopupMenu menuname, flags, x, y, boldcommand说明如下：通过设置对象（Object）的Scalemode属性来规定X，Y坐标的度量单位，X，Y坐标设定弹出式菜单在对象（Object）中显示的相对位置，如果省略X，Y，则弹出式菜单将显示在当前鼠标点位置。

当用PopupMenu方法激活弹出菜单后，要等到用户选择了弹出菜单中的某个菜单项之后（这种情况下，还要先运行被选择菜单项的相应代码）或在表单其它位置单击鼠标左键消除弹出菜单后，后面的代码才能继续执行。

并且，一次只能激活一个弹出式菜单，当已经有一个弹处菜单被激活或已经有一个下拉菜单被打开时，对PopupMenu方法的调用将被忽略。

下面的例子演示当用户在表单上点击鼠标右键时，在鼠标点处显示弹出式菜单。

欲试验此例子，建立一个表单，在表单中建立一个菜单控件，将其命名为mnuFile（mnuFile菜单至少包含一个子菜单）。

在表单的声明（Declaration）区域加入如下代码：Private Sub Form_MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = vbRightButton ThenPopupMenu mnuFileEnd IfEnd SubPopupMenu方法是VB6.0内置的方法，使用起来方便简单，但该方法有一个不足，即当点击鼠标弹出菜单后，如果不选择菜单项而在其他位置点击鼠标，则菜单并不会在新的鼠标点处显示。

第x章菜单与工具栏设计本章将介绍下拉式菜单设计、快捷菜单设计和自定义工具栏的设计。

x.1 下拉式菜单设计13.1.1菜单生成的基本步骤菜单设计器可用来设计并生成下拉式菜单与快捷菜单。

生成菜单程序的基本步骤包括：打开菜单设计器窗口→进行菜单设计→保存菜单程序→生成菜单程序→运行菜单程序一、打开菜单设计器窗口无论建立菜单或者修改已有的菜单，都需要打开菜单设计器窗口。

1、通过系统菜单来建立或打开（1）菜单的建立“文件→新建”，在“新建”对话框中单击“菜单”选项→单击“新建文件”按钮，得到“新建菜单”对话框，单击“菜单”则进入“菜单设计器”，“快捷菜单”按钮则用来创建一个快捷菜单。

（2）菜单的打开：2、用命令来建立或打开：Modify Menu 菜单名扩展名为.Mnx，但允许缺省。

3、通过项目管理器来建立或打开二、菜单设计菜单设计器窗口打开后，系统菜单中将自动增加一个“菜单”菜单，显示菜单中也会增加两个命令。

用户可利用菜单设计器窗口和这些新增的命令进行菜单设计。

三、保存菜单定义“文件→保存”，形成.Mnx菜单定义文件。

.MNT四、生成菜单程序“菜单→生成”，生成.Mpr菜单程序文件。

五、运行菜单程序1、菜单：2、命令：Do 菜单名.Mpr注意：菜单程序扩展名.MPR不可省略，例如 DO CD.MPR。

运行菜单程序时，VFP会自动对新建或修改后的.MPR文件进行编译并产生目标程序.MPX，而且对于主名相同的.MPR和.MPX程序总是运行后者。

13.1.2快速菜单命令当打开“菜单设计器”后，VFP的主菜单中会增加一个名为“菜单”的菜单。

单击“菜单”下的“快速菜单”，一个与VFP系统菜单一样的菜单会自动复制入菜单设计器窗口，供用户修改成符合自己需要的菜单。

注意：①快速菜单在菜单设计器窗口为空时才允许选择，否则它是浅色。

②快速菜单命令仅可用产生下拉式菜单，不能用于产生快捷菜单。

“快速菜单”是设计菜单的捷径，它类似于一种向导，只能设计单一形式的菜单，缺乏灵活性。

实验课程名称 Visual Foxpro 实验项目名称设计下拉式菜单和快捷菜单专业班级学号指导教师第5章设计下拉式菜单和快捷菜单1、实验目的:（1）熟悉菜单设计器的使用。

（2）掌握设计下拉式菜单的方法。

（3）掌握快捷菜单的设计和调用。

2、实验要求:（1）设计一个“货物管理系统”下拉式菜单，要求如下：①包括“数据录入”、“数据维护”和“数据查询”3个子菜单，如图2.5.2所示；②能够对货物表作浏览、录入、更新、删除等操作。

（2）设计一个快捷菜单，要求具有查找及导入导出功能，供在“货物管理系统”菜单中绣服挥清词数据时使用。

3、实验要求:阅读主教材5.1.1节、5.1.3节、5.1.4节和5.2节。

4、实验步骤:（1）建立“货物管理系统”菜单：执行命令“MDIFY MENU 货物管理系统”→在随即出现的“新建菜单”对话框中选定“菜单”按钮，即出现“菜单设计器”窗口（参阅图2.5.1）。

在“菜单名称”列中输入“数据录入(\<L)”→在“结果”列中选择“子菜单”→单击“创建”按钮进入子菜单页→建立“数据浏览”和“数据添加”两个菜单项。

用同样方法建立“数据维护”及其“数据修改”和“数据删除”两个菜单项，“数据查询”菜单及其“按货号查询”和“按货物名称查询”两个菜单项，以及“退出”菜单。

显示情况如图2.5.2所示。

（2）进入“数据录入”菜单的子菜单页→单击“数据浏览”行→在“结果”列中选择“命令”→在命令框中输入命令“BROWSE TITLE ‘浏览货物信息’NOMENU NODELETE NOMODIFY”→选定“选项”列按钮→参照主教材 5.1.3节，在“提示选项”对话框中将Ctrl+L定义为“数据浏览”菜单项的快捷键。

单击“数据维护”行→在“结果”列中选择“命令”→在命令框中输入“APPEND NOMENU”→进入“提示选项”对话框→定义快捷键为Ctrl+T，并在“信息”文本框中输入“”货号以字母开头，后跟4位数字字符。

ＶＦＰ中菜单的使用ＶＦＰ中菜单的使用发布日期：2010/5/2 10:26:00 来源：作者：点击：343-一.菜单:菜单是应用程序的一个重要组成部分.菜单即是一系列选项,每个菜单项对应一个命令或程序,能够实现某种特定的功能,图63是vfp 的系统菜单.菜单包括主菜单和快捷菜单,主菜单是显示在标题栏下方的菜单;快捷菜单是我们用鼠标右键点击某个对象而出现的菜单.在vfp中,我们使用菜单设计器为自已编制的应用程序定制菜单.二.菜单设计器:1.打开菜单设计器的方法:★使用"文件"菜单下的"新建"命令或常用工具栏上的"新建"按钮★使用create menu命令★使用项目管理器:打开项目管理器后,选择"全部"或"其他"选项卡,"文件"类型选"菜单",单击项目管理器中"新建"按钮,在弹出的"新建菜单"对话框中,选"菜单"命令,如图642.菜单设计器的界面:如图65,菜单设计器可分为4个部分,左侧是"菜单定义"列表框,用于输入我们要定义的各个菜单项的名称;右上角为"菜单级"列表框,用于切换菜单的层次;右侧的中部是3个命令按钮:"插入","插入栏"和"删除";右下角是"预览"按钮,点此按钮可预览我们设计的菜单的效果.●"菜单定义"列表框:如图66所示,这个列表框包含4列,在"菜单名称"列中输入菜单项的名称后,如在"结果"列中选择该菜单项的类型是"子菜单"或"过程",右侧会出现"创建"按钮,可再点击"创建"按钮生成该菜单项(如果在"结果"列中菜单类型选择的是"过程",会弹出编辑窗口,把该菜单项控制的过程代码输进去).●"菜单级"列表框:此列表框位于菜单设计器的右上角.当我们定义了不同层次的菜单后,可以单击此列表框,在子菜单和上级菜单之间切换.●右侧三个命令按钮的作用:(1)"插入"按钮:使用这个按钮,可以在当前选中的菜单项前添加一个新的菜单项.这个新菜单项的标题为"新菜单项",用户可以自己修改成合适的标题.(2)"插入栏":在子菜单的当前菜单项前插入一个系统菜单项.上系统菜单项列在"插入系统菜单项"对话框中,如图67,可从中选择所需的菜单项.(3)"删除"按钮:将当前选中的菜单项删除.(4)"预览"按钮:单击该按钮可暂时屏蔽当前使用的系统菜单,然后将用户自定义的菜单显示在系统菜单条的位置,同时在屏幕中显示"预览"对话框,每当用户选择了一个菜单项后,在"预览"对话框中都会显示出当前正在预览的菜单的菜单名,提示及命令等信息.3.设置菜单项的分界线:在菜单项中通常会把不同的功能进行分组,只要在"菜单名称"中输入"\-",则在菜单中该菜单项的位置处出现一条分界线.三.创建主菜单:例:建立一个简单的菜单1.打开"菜单设计器"2.在"菜单名称"输入第一个菜单项的名称"浏览工资情况",在"结果"列表中选"过程",然后单击右侧的"创建",在弹出的代码窗口中输入如下代码:set default to e:\myvfpif !used("工资情况") &&如果"工资情况"表没打开,打开它;如果已经打开,则选择它use 工资情况elseselect 工资情况endifbrowsereturn3.同样方法,建立第二个菜单项,名为"浏览职工档案","结果"列表中选"过程",过程代码为:set default to e:\myvfpif !used("职工档案") &&如果"职工档案"表没打开,打开它;如果已经打开,则选择它use 职工档案elseselect 职工档案endifbrowsereturn4.菜单定义完毕后,回到菜单设计器界面,如图68,单击VFP系统菜单中的"菜单",选择"生成"命令,此时弹出"生成菜单"对话框,如图69所示,在对话框中单击生成按钮,系统自动生成这个菜单的程序代码,并以扩展名.mpr存盘.此时,单击菜单设计器中的"预览"按钮,即可预览设计好的菜单.四.执行自定义的菜单:在命令窗口中输入命令:do 菜单1.mpr,如果是在项目管理器中,选择要运行的菜单文件,单击项目管理器中的"运行"按钮即可.执行菜单后,新的菜单将替换系统菜单,如图70所示如果要恢复系统的主菜单,可以命令窗口执行如下命令:set sysmenu to default四.创建快捷菜单:1.使用项目管理器:打开项目管理器后,选择"全部"或"其他"选项卡,"文件"类型选"菜单",单击项目管理器中"新建"按钮,在弹出的"新建菜单"对话框中,选"快捷菜单"命令,如图642.弹出的"快捷菜单设计器"使用方法与"菜单设计器"的使用方法相同,这里不再多述.3.创建并生成快捷菜单后,可将其附加到对象中,这样,当用户右击对象时,即会显示快捷菜单.4.将快捷菜单附加到对象中的步骤:(1)选择要附加快捷菜单的对象(例如,表单或表单上的某个控件,比如命令按钮)(2)在"属性"窗口中选择"全部"或"方法程序"选项卡,再选择"rightclick event"项(即右击事件)(3)双击"rightclick event"项,在弹出的代码窗口中输入"do right.mpr"命令(假设我们刚才设计并生成一个名为right.mpr的快捷菜单)(4)运行时,右击此对象,即会弹出快捷菜单原文链接：。