1、第九章 菜单设计与应用第9章 菜单设计与应用菜单在应用程序中是必不可少的。开发者通过菜单将应用程序的功能、内容有条理的组织起来展现给用户使用。菜单是应用程序与用户最直接交互的界面。Visual FoxPro为开发者提供了自定义菜单的功能，从而使开发者能根据需要设计符合应用的菜单。本章将具体的介绍菜单的设计以及应用。9.1 Visual FoxPro系统菜单系统菜单即菜单栏，由若干个下拉菜单组成，每个下拉菜单包含一组菜单命令。利用系统菜单是开发者调用Visual FoxPro系统功能的一种方式或途径。所以在介绍菜单设计与应用之前，应首先了解Visual FoxPro系统菜单的结构、特点和行为。9
2、.1.1 菜单结构Visual FoxPro支持两种类型的菜单：条形菜单（一级菜单）和弹出式菜单（子菜单）。它们都有一个内部名称和一组菜单选项。内部名称不会显示在屏幕上，只用于在代码中引用。而菜单选项将显示在屏幕上供用户选择。用户选择其中的任意一个选项时都会有一定的动作。这个动作可以是下面三种情况中的一种：执行一条命令、执行一个过程或是激活另外一个菜单。每一个菜单选项都可以设置一个热键和一个快捷键。热键通常是一个字符。当菜单激活时，可以按相应的热键快速选择该菜单项。快捷键通常是Ctrl键加上另外一个字符键组成的组合键。热键与快捷键的区别是热键需要首先激活菜单，而快捷键不需要激活菜单就可以选择相
3、应的菜单选项。典型的菜单一般都是由一个条形菜单和一组弹出式菜单组成。条形菜单作为主菜单，弹出式菜单作为子菜单。这种菜单类型也称为下拉式菜单。当用户选择一个条形菜单选项时，激活相应的弹出式菜单。常见的菜单除了上面提到的下拉式菜单，还有快捷菜单。快捷菜单一般从属于某个界面对象，列出有关该对象的一些操作。一般由一个或一组上下级的弹出式菜单组成，单击鼠标右键会弹出一个快捷菜单。在设计应用程序的时候，无论创建哪一种菜单，首先都要根据实际需要对应用程序的菜单进行规划与设计，明确需要多少个菜单及子菜单。每个菜单的标题和需要完成的任务等。规划好以后才是利用菜单设计器进行设计创建。9.1.2 系统菜单Visua
4、l FoxPro系统菜单是一个典型的菜单系统。其主菜单是一个条形菜单。包含文件、编辑、显示、工具、程序、窗口等菜单项。选择条形菜单中的每一个菜单项都会激活一个弹出式菜单，如图9-1所示。图9-1 Visual FoxPro系统菜单通过SET SYSMENU命令可以允许或者禁止在程序执行时访问系统菜单。其命令格式如下： SET SYSMENU ON | OFF | AUTOMATIC | TO | TO | TO DEFAULT | SAVE | NOSAVE其中：ON允许程序执行时访问系统菜单，OFF禁止程序执行时访问系统菜单，AUTOMATIC可使系统菜单显示出来，可以访问系统菜单。TO子句
5、用于重新设置系统菜单。TO 以弹出式菜单项内部名字列出可用的弹出式菜单。例如，命令SET SYSMENU TO _MFILE,_MEDIT将使系统菜单只保留“文件”和“编辑”两个子菜单。TO 以条形菜单项内部名字列出可用的子菜单。例如，上面的系统菜单设置命令也可以写成如下格式：SET SYSMENU TO _MSM_FILE,_MSM_EDIT。TO DEFAULT将系统菜单恢复为缺省配置。SAVE将当前系统菜单配置指定为缺省配置，NOSAVE将缺省设置恢复成Visual FoxPro系统的标准配置。要将系统菜单恢复成标准设置，可先执行SET SYSMENU NOSAVE命令，然后执行SET
6、SYSMENU TO DEFAULT命令。不带参数的SET SYSMENU TO 命令将屏蔽系统菜单，使系统菜单不可用。例如，在命令窗口中输入：SET SYSMENU TO命令，回车执行，系统菜单将不可用。在命令窗口中输入：SET SYSMENU TO DEFAULT命令，回车执行，系统菜单恢复。9.2 下拉式菜单设计下拉式菜单是应用程序的总体菜单，由一个条形菜单和一组弹出式菜单组成。用Visual FoxPro提供的菜单设计器可以方便的进行下拉式菜单的设计。具体来说，菜单设计器的功能有两个：一是通过定制Visual FoxPro系统菜单建立应用程序的下拉式菜单，此时其条形菜单的内部名称总是_
7、MSYSMENU；二是为顶层表单设计独立于Visual FoxPro系统菜单的下拉式菜单。9.2.1 菜单设计的基本过程建立下拉式菜单的基本过程如下：首先打开菜单设计器，在菜单设计器中进行菜单定义，保存菜单，生成菜单程序，执行菜单程序。1.调用菜单设计器无论建立菜单或者修改已有的菜单，都需要打开菜单设计器窗口。其操作方法是：在Visual FoxPro系统主菜单下，从“文件”菜单中选择“新建”菜单项。打开“新建”对话框后，选择“菜单”单选按钮，然后单击“新建文件”按钮，屏幕上出现“新建菜单”对话框，如图9-2所示。图9-2 “新建菜单”对话框此时若选择“菜单”按钮，将进入菜单设计器窗口。如果要
8、用菜单设计器修改一个已有菜单，可以从“文件”菜单中选择“打开”命令打开菜单定义文件（.mnx文件），打开“菜单设计器”窗口。也可以利用命令调用菜单设计器建立和修改菜单。命令格式如下： MODIFY MENU 其中，的默认扩展名为.mnx。2.菜单定义设计在“菜单设计器”窗口中定义菜单，制定菜单的各项内容。如菜单项的名称、快捷键等（具体方法将在后面进行详细介绍），指定完成菜单的各项内容后，保存菜单。3.生成菜单菜单设计器定义了菜单的各项内容，但这个文件本身是不能运行的。在菜单设计器窗口处于打开状态时，允许选择“菜单”菜单项中的“生成”命令来生成菜单程序。“生成菜单”对话框，有一个“输出文件”文本
9、框，用来显示系统默认的菜单程序路径及程序名，用户可以自行修改，再选择“生成”按钮就会生成一个可执行的菜单程序文件。4.显示菜单对生成的菜单文件可以使用DO来运行显示菜单。例如：DO mymenu.mpr注：文件名的扩展名.mpr此处不能省略。9.2.2 定义菜单在本小节将详细介绍如何在“菜单设计器”窗口中设计定义下拉式菜单。1“菜单设计器”窗口介绍对下拉式菜单进行设计定义，首先要明白一个下拉式菜单是由一个条形菜单（一级菜单）和一组弹出式菜单（子菜单）组成。“菜单设计器”打开时，首先显示和定义的是条形菜单，每一行定义当前菜单一个菜单项，包括“菜单名称”、“结果”和“选项”三列内容。另外“菜单设计
10、器”还有“菜单级”下拉列表框及一些命令按钮。如图9-3所示。图9-3 “菜单设计器”窗口 “菜单名称”列该列指定菜单项的名称，也可以称作标题，并非内部名字。用于显示。在设计规划菜单的时候对需要用快捷方式访问的菜单项。可以在此处设置：在访问键的字符前加上“”两个字符。如：“显示（V）”，那么字母V即为该菜单项的访问热键。可以根据各个菜单项功能的相似性或相近性，将弹出式菜单的菜单项分组，比如常见的将剪切、复制、粘贴分为一个组。设置方法是在相应行的“菜单名称”列上方插入一行，输入“-”两个字符。注：当“菜单级”为菜单栏时，不能使用分组，如果在此处使用分组，运行时将会提示语法错误。 “结果”列该列用于
11、指定用户选择该项后进行的动作。“结果”列中有命令、过程、子菜单和填充名称或菜单项#四种选择。命令：选择此选项，列表框右侧将会出现文本框，用于输入选择此项后将执行的命令。例如，当菜单项中有“退出”时，一般在该菜单项的“命令”文本框中输入命令“SET SYSMENU TO DEFAULT”，当运行菜单后，单击“退出”菜单项会恢复到系统菜单。过程：选择此选项，列表框右侧将会出现“创建”命令按钮，点击此按钮将打开一个过程编辑窗口，可以在其中输入代码，如图9-4所示。输入完代码后，当选择该菜单项时，将执行此过程代码。图9-4 “菜单项”创建过程子菜单：选择此选项，列表框右侧也会出现“创建”命令按钮，点击
12、后会切换到子菜单页，可在其中定义子菜单。此时右侧“菜单级”列表框不再是菜单栏。而是对应用户操作的子菜单的内部名字。选择“菜单级”下拉列表框内的选项，可以返回到上级子菜单或最上层的条形菜单的定义页面。默认的子菜单内部名称为上级菜单相应菜单项的标题，但可以重新指定。最上层的条形菜单不能指定内部名字，其在“菜单级”下拉列表框内显示为“菜单栏”。填充名称或菜单项#：选择此选项，列表框右侧会出现一个文本框。可以在文本框内输入菜单项的内部名字或序号。若当前菜单为条形菜单，该选项为“填充名称”，应指定菜单项的内部名字。若当前菜单为子菜单，该选项为“菜单项#”，应指定菜单项的序号。注意：默认的子菜单内部名字为
13、上级菜单相应菜单项的标题，但可以重新指定。最上层的条形菜单不能指定内部名字。 “选项”列每一个菜单项的“选项”列都有一个无符号按钮，单击该按钮就会出现“提示选项”对话框，如图9-5所示，供用户定义菜单项的其他属性。当设置过快捷方式等属性后，按钮将会出现符号。图9-5 “提示选项”对话框快捷方式：指定菜单项的快捷键。方法是：单击“键标签”文本框，然后在键盘上按下快捷键即可。例如，按下Ctrl+A，则“键标签”文本框内就会出现Ctrl+A。快捷键通常是Ctrl或者是Alt键与另一个字符键的组合。如果要取消定义好的快捷键，可以单击“键标签”文本框，然后按空格键。跳过：指定一个表达式，由这个表达式最终
14、结果来决定这个菜单项是否可选。当菜单激活时，如果表达式结果为真，那么此菜单项可选，否则，此菜单项成灰色显示，将不可选用。信息：定义菜单项的说明信息。当鼠标指向该菜单项时，将会在Visual FoxPro 的状态栏出现此信息。 “菜单级”下拉列表框此列表框一般用于条形菜单与子菜单之间切换。 “菜单项”命令按钮“插入”按钮：单击此按钮，可在当前菜单项前增加一个新的菜单项。“插入栏”按钮：单击此按钮，可在当前菜单项行前增加一个Visual FoxPro 系统菜单命令。如图9-6所示。然后在对话框中选择需要添加的菜单命令，并单击“插入”按钮。该按钮仅在定义弹出式菜单时有效。图9-6 “插入系统菜单栏”
15、对话框“删除”按钮：单击该按钮，可删除当前菜单项行。 “预览”按钮单击此按钮，可预览菜单效果。2.“显示”菜单在菜单设计器环境下，系统的“显示”菜单下会出现两个菜单项：“常规选项”与“菜单选项”。 “常规选项”对话框单击“显示”中“常规选项”命令，就会打开“常规选项”对话框，如图9-7所示。在这个对话框里，可以定义整个下拉式菜单系统的总体属性。图 9-7 “常规选项”对话框过程：为条形菜单中的菜单选项指定一个默认的过程代码。如果条形菜单中的某个菜单选项没有定义子菜单，也没有其他命令动作，那么当选择此菜单选项时，将执行这个默认过程。位置：指明正在定义的菜单与当前系统菜单的关系。“替换”：默认关系
16、为替换，即用当前定义的菜单替换系统菜单。“追加”：在系统菜单后追加当前定义的菜单内容。“在之前”：将当前定义的菜单插入在系统菜单的某个弹出式菜单之前。“在之后”：将当前定义的菜单插入在系统菜单的某个弹出式菜单之后。菜单代码：在“菜单代码”下有“设置”与“清理”两个复选框。任意选择一个后，单击“确定”按钮后，都将打开一个代码编辑窗口。如果选择的是“设置”，那么这段代码将在菜单产生之前执行。否则将在菜单显示出来后执行。顶层表单：如果选择此复选框，那么可以将正在定义的下拉式菜单添加到一个顶层表单里。否则将作为一个定制的系统菜单。 “菜单选项”对话框单击“显示”中“菜单选项”命令，就会打开“菜单选项”
17、对话框，如图9-8所示。图 9-8 “菜单选项”对话框在这个对话框里，可以为当前的条形菜单，定义一个默认的过程代码。如果当前的是弹出式菜单，那么在对话框中还可以定义该菜单的内部名字。9.2.3 为顶层表单添加菜单顶层表单是一个独立的、不存在父表单的表单，用来创建一个应用程序，或作为其它子表单的父表单。顶层表单与其它 Windows 应用程序的级别相同，且可以在 Windows应用程序的前面或后面显示。为Visual FoxPro为顶层表单添加下拉式菜单的方法过程如下：1. 在“菜单设计器”窗口中设计下拉式菜单。2. 在“显示”菜单下的“常规选项”对话框中选择“顶层表单”复选框。3. 将表单的S
18、howWindow属性值设置为“2-作为顶层表单”。4. 在表单的Init事件代码中添加调用菜单程序的命令，格式如下：DO WITH THIS ,”“文件名”是指菜单程序文件名，其扩展名.mpr不能省略。通过“菜单名”可以为条形菜单指定一个内部名字。5. 在表单的Destroy事件代码中添加清除菜单程序的命令，格式如下：RELEASE MENU EXTENDEDEXTENDED表示在清除条形菜单时一起清除其下属的所有子菜单。【例9-1】设计一个下拉式菜单。要求条形菜单中的菜单项有数据查询（C），数据维护（W），输出报表（B），退出（R）。数据查询的弹出式菜单有按学号查询，按姓名查询，他们的快捷
19、键分别是Ctrl+H，Ctrl+X。数据维护的弹出式菜单有维护学生表，维护教师表，快捷键分别是Ctrl+S，Ctrl+T。输入报表无弹出式菜单。退出将系统菜单恢复为标准设置。操作步骤如下：1. 在命令窗口输入命令：MODIFY MENU cd，选择“菜单”。打开“菜单设计器”窗口。2. 设置条形菜单的菜单项，如图9-9所示：图9-9 设置主菜单3. 为菜单项“退出”定义过程代码：单击菜单项“结果”列上的“创建”按钮，打开文本编辑窗口，输入下面的代码：SET SYSMENU NOSAVESET SYSMENU TO DEFAULT定义数据查询的弹出式菜单：单击“数据查询”菜单项“结果”列上的“创
20、建”按钮，使设计器窗口切换到子菜单页，如图9-10所示。图9-10 设置“数据查询”子菜单然后为“按学号查询”设置快捷键：单击菜单项“选项”列上的按钮，打开“提示选项”对话框，然后单击“键标签”文本框，并在键盘上按组合键Ctrl+H，如图9-11所示。用同样的方法为“按姓名查询”菜单项设置快捷键Ctrl+X。图9-11 设置快捷方式4. 从“菜单级”列表框中选择“菜单栏”，返回到主菜单页。5. 用与第4步相同的方法定义数据维护的弹出式菜单。6. 保存菜单定义：单击“文件”菜单中的“保存”按钮，结果保存在菜单定义文件cd.mnx和菜单备注文件cd.mnt中。7. 生成菜单程序：单击“菜单”菜单中
21、的“生成”命令。产生的菜单程序文件为cd.mpr。【例9.2】将菜单添加到顶层表单中基于数据库“成绩管理”建立顶层表单，表单文件名为smform.scx，表单控件名为smform，表单标题为“成绩管理系统”。1. 表单内含一个表格控件Grid，当表单运行时，该控件将按用户的选择来显示“成绩表”中某一课程的所有成绩，RecordSourceType的属性为4（SQL说明）；2. 建立菜单（文件名为kcmenu.mnx），其条形菜单的菜单项为“课程成绩”，“退出”。“课程成绩”的下拉菜单为“大学英语”、“数学”、“普通话”，单击下拉菜单中任何一个菜单命令后，表格控件均会显该门课程的课程名、学号、成
22、绩。3. 菜单项“退出”的功能是关闭表单并返回到系统菜单。操作步骤如下：1. 建立表单通过“文件”菜单下的“新建”命令或用命令CREATE FORM打开表单设计器。修改表单各属性值，Name=“smform”，Caption=“成绩管理系统”；设置表格控件属性Name = “Grid”，RecordSourceType=“4”。将表单以smform.scx为文件名保存。2. 建立菜单通过“文件”菜单下的“新建”命令或用命令CREATE MENU打开菜单设计器。单击“显示”菜单下的“常规选项”命令，选中“顶层表单”复选框。在菜单设计器中建立各菜单项“课程成绩”、“退出”，在“课程成绩”的菜单项的
23、结果列中选中“子菜单”，并点击“创建”进入子菜单设计页面，在其中建立3个菜单项：“大学英语”、“数学”、“普通话”。在“大学英语”菜单项的结果列中选择“过程”，并点击“创建”进入过程编辑窗口，添加此菜单项执行的命令smform.grid.recordsource=select 课程名称,学号,成绩 from 课程表,成绩表 where 课程表.课程号=成绩表.课程号 and 课程名称=大学英语。用同样的方法建立“数学”和“普通话”菜单项，并分别添加执行的命令：smform.grid.recordsource=select 课程名称,学号,成绩 from 课程表,成绩表 where 课程表.课程
24、号=成绩表.课程号 and 课程名称=数学。smform.grid.recordsource=select 课程名称,学号,成绩 from 课程表,成绩表 where 课程表.课程号=成绩表.课程号 and 课程名称=普通话。 单击“菜单级”列表框中的“菜单栏”，返回上一级菜单，设置“退出”菜单项的结果列为“命令”，然后在右侧的文本框内输入命令smform.release来关闭表单并返回到系统菜单。以kcmenu为文件名保存菜单，最后单击“菜单”下的“生成”命令，生成kcmenu.mpr程序。3. 将表单smform.scx中的ShowWindows属性设置为 “2-作为顶层表单”，并在表单的
25、LOAD事件中添加“do kcmenu.mpr with this,”kcm”，在Destroy事件中添加“release menu kcm extended”。4. 保存表单，并运行各项功能。运行效果如图9-12所示。图 9-12 表单运行效果图9.3 快捷菜单快捷菜单，显示与特定项目相关的一列命令的菜单，即鼠标右击时常出现的那个菜单，所以也叫右键菜单。对于一个应用程序来说，一个下拉式菜单的菜单系统列出了整个程序所具有的功能。而对于某个界面为了方便用户操作。通常需要利用快捷菜单来实现。快捷菜单从属于某个界面对象，当用鼠标单击该对象时（通常设置为鼠标右键），就会在单击处弹出快捷菜单。快捷菜单通
26、常列出与处理该对象有关的一些功能命令。类似创建下拉式菜单（如图9-2），单击“快捷菜单”后将进入快捷菜单设计器。利用系统提供的快捷菜单设计器可以方便地定义与设计快捷菜单。与下拉式菜单不同的是，快捷菜单只有弹出式菜单。而没有条形菜单。利用快捷菜单设计器建立快捷菜单的方法和过程如下：1. 用与设计下拉式菜单相同的方法设计菜单项。并保存生成菜单程序文件。2. 在快捷菜单的“清理”代码中添加清除菜单的命令，使得在选择、执行菜单命令后能及时清除菜单，释放其所占的内存空间。命令为：RELEASE POPUPS EXTENDED。3. 在表单设计器环境下，选定需要添加快捷菜单的对象。4. 在选定对象的Rig
27、htClick事件代码中添加调用快捷菜单程序的命令：Do 其中的文件扩展名.mpr不能省略。【例9.3】创建快捷菜单建立表单，表单文件名和表单控件名均为myform。为表单建立快捷菜单kjmenu，快捷菜单有选项“变大”和“变小”；运行表单时，在表单上单击鼠标右键弹出快捷菜单（如图9-13所示），选择快捷菜单的变大或变小选项时，表单大小将缩放10%。操作步骤：1. 建立表单：在“文件”菜单中选择“新建”，在新建对话框中选择“表单”，单击“新建文件”按钮，将表单的Name属性改成myform，Caption=“快捷菜单测试”，并以myform为文件名保存表单。2. 建立快捷菜单：在“文件”菜单中
28、选择“新建”对话框中选择“菜单”，单击“新建文件”按钮，选择“快捷菜单”，在菜单设计器中输入两个菜单项“变大”和“变小”，并分别在变大“过程”选项中输入以下代码:myform.width = myform.width + myform.width * 0.1myform.height = myform.height + myform.height * 0.1在变小“过程”选项中输入：myform.width = myform.width - myform.width * 0.1myform.height = myform.height - myform. height * 0.1单击“菜单”菜
29、单选择“生成”命令，按提示保存为mymenu，并生成菜单程序文件。3. 在表单中调用快捷菜单：双击表单myform的空白处，打开代码窗口。在过程中选择RightClick，输入代码：do mymenu.mpr。图 9-13 快捷菜单效果图本章小结本章首先介绍了Visual FoxPro系统菜单的情况，然后对常见的下拉式菜单和快捷菜单进行详细讲解。重要的知识点是利用设计器对下拉式菜单和快捷菜单进行设计建立。课后习题一、选择题1. 在Visual FoxPro中，扩展名为.mnx的文件是（ ）。 A备注文件 B. 项目文件 C表单文件 D. 菜单文件2. 在Visual FoxPro中，要运行菜单
30、文件menu.mpr，可以使用命令（ ）。 ADo menu B. Do menu.mpr CDo MENU menu D. Run menu.mpr3. 以下是与设置系统菜单有关的命令，其中错误的是（ ）。 ASET SYSMENU NOSAVE B. SET SYSMENU DEFAULT CSET SYSMENU TO DEFAULT D. SET SYSMENU SAVE4. 菜单设计中，在定义菜单名称时为菜单项指定一个访问键。规定菜单项的访问键为“x”的菜单名称定义为（ ）。 A成绩查询(x) B. 成绩查询(x) C成绩查询(x) D. 成绩查询(/x)5. 为顶层表单添加菜单时，
31、如果在表单的Init事件代码中加入的命令是 Do mymenu.mpr with this, “aaa”,那么在Destroy事件代码中应写入的命令是（ ）。 ARELEASE MENU aaa extended B. thisform.release CRELEASE mymenu aaa extended D. RELEASE mymenu.mpr6. 为表单定义了快捷菜单mymenu，调用命令代码为do mymenu.mpr with this。此代码应当放在表单事件中的（ ）。 ADestroy事件 B. Init事件 CLoad事件 D. RightClick事件二、填空题1. 典型的菜单系统一般是一个下拉式菜单，下拉式菜单通常是一个_和一组_组成。2. 要为表单设计下拉式菜单，首先需要在菜单设计时，在_
