《数据库应用基础与实训教程——Visual_FoxPro》第9章：Visual_FoxPro_6.0菜单设计

第九章 Visual FoxPro 6.0菜单设计,（时间：2次课，4学时）,第九章 Visual FoxPro 6.0菜单设计,学习目的与要求： 本章介绍利用菜单设计器设计自定义菜单，包括创建自定义系统菜单、条形菜单和快捷菜单。菜单的基本使用方法以及向表单中添加自定义工具栏等。,第九章 Visual FoxPro 6.0菜单设计,9.1 菜单设计引例 9.2 创建自定义的工具栏 9.3 本章实训 9.4本 章 习 题,9.1 菜单设计引例,9.1.1 菜单的创建和运行 9.1.2 快捷菜单设计,菜单和工具栏为用户提供了一个方便、快捷访问应用程序的途径。用户可以通过菜单命令和工具栏中的图标实现对应用程序的操作。菜单的实现可以通过两种途径，其一是使用系统菜单，方便、设计简单，但功能并不如我们所愿；其二是自定义的菜单。Visual FoxPro 6.0支持的菜单有两种：下拉式菜单和弹出式菜单。,9.1.1菜单的创建和运行,1、创建下拉式菜单 （1）打开菜单设计器 执行系统菜单【文件】|【新建】命令，在弹出的【新建】 对话框中选择【菜单】单选框，单击【新建文件】按钮，弹出 如图9.1所示的对话框。也可以通过项目管理器打开此对话框。,图9.1 新建菜单对话框,单击【菜单】按钮，激活【菜单设计器】。也可以通过以下2条命令激活【菜单设计器】。 CREATE MENU MODIFY MENU （2）定义菜单 在【菜单设计器】中，将菜单名称、菜单项的过程及命令，菜单类型等设计完成后，以扩展名为.MNX的文件进行保存。 （3）生成菜单 保存的.MNX文件不是可直接运行的菜单文件，只是初始的源文件。当.MNX文件在【菜单设计器】中打开的情况下，执行系统菜单【菜单】|【生成】命令，在弹出的对话框中确定（或输入）可执行菜单文件的路径及名字，单击按【生成】按钮结束生成。有关界面可参考第1章中的1.4章节。,（4）运行菜单 运行菜单的方法有： 在【项目管理器】的【其他】选项卡里选中准备运行的菜单名，单击【运行】按钮 在命令窗口中输入执行菜单的命令： DO 2、实例 【例9.1】设计一下拉式菜单，具体内容为：主菜单包括【数据操作】(dz)、【编辑】(ed)、【退出】(ex)3个菜单项。【数据操作】菜单中包括【浏览记录】、【查询人数】子菜单；【编辑】菜单中包括【复制】、【剪切】、【粘贴】子菜单；【退出】没有子菜单，其任务是将菜单恢复为系统默认的标准设置的菜单。,（1）制作下拉式主菜单 用前述方法打开如图9.1所示的【新建菜单】对话框，单击【菜单】按钮建立下拉式菜单；单击【快捷菜单】按钮则建立弹出式菜单。 单击【菜单】按钮后，弹出【菜单设计器】，输入主菜单项后的界面如图9.2所示。,图9.2 菜单设计器,（2）设计【数据操作】子菜单 在图9.2选中【数据操作】菜单项，单击【创建】按钮，输入【数据操作】的子菜单，设计后的界面如图9.3所示。,图9.3设计【数据操作】菜单项,设置【浏览记录】的快捷键为CTRL+L、【查询人数】为CTRL+Z，具体操作如下： 在图9.3中单击【浏览记录】菜单的【选项】按钮，打开【提示选项】对话框，如图9.4所示。单击【键标签】后面的文本框，在键盘上直接按下快捷键CTRL+L，则设定完成。【查询人数】的快捷键设置相同。,图9.4设置浏览记录的快捷键,设置【数据操作】菜单的内部名称。打开【数据操作】菜单的子菜单设计界面，如图9.3所示，执行系统菜单【显示】|【菜单选项】命令，弹出如图9.5所示的菜单选项对话框，在【名称】栏中输入要定义的内部菜单名，完成后单击【确定】按钮。【编辑】和【退出】菜单的内部名称用相同的方法定义。,图9.5【菜单选项】对话框,（3）设计【编辑】子菜单 【编辑菜单】中的各菜单项分别使用系统标准菜单中的复制、剪切、粘贴。具体步骤如下：单击【插入栏】按钮，弹出【插入系统菜单栏】对话框，选择需要的系统菜单名，如选中【剪切】项，单击【插入】按钮，即可完成【剪切】项的插入。其它系统菜单项【复制】与【粘贴】操作同上，完成后的界面如图9.6所示。,图9.6【编辑】子菜单,（4）【退出】菜单的设计 在菜单设计器中，选中【退出】菜单项后，将其【结果】设置为过程，单击【创建】按钮，在打开的过程窗口中，输入命令SET SYSMENU TO DEFAULT和SET SYSMENU TO NOSAVE。 （5）保存菜单文件，生成菜单可执行文件，在命令窗口中输入命令DO MAIN.MPR即可运行。,9.1.2 快捷菜单设计,1、快捷菜单的建立步骤 （1）执行系统菜单【文件】|【新建】命令，在【新建】对话框中选择【菜单】单选按钮。 （2）在【新建菜单】对话框中单击【快捷菜单】按钮。 （3）与设计下拉式菜单相似，在【快捷菜单设计器】窗口中设计快捷菜单，生成菜单，保存菜单文件。 （4）执行系统菜单【显示】|【常规选项】命令，打开如图9.7所示的【常规选项】对话框。单击【清理】复选框，弹出【清理】的过程代码窗口，在此窗口中编写清除菜单的命令，使得在选择、执行菜单命令后能及时清除菜单，释放其占用的内存空间。,命令格式：RELEASE POPUPS 。 单击【设置】复选框，弹出【设置】的过程代码窗口，编写接收当前表单对象引用的语句：PARAMETERS 。,图9.7 【常规选项】对话框,（5）设计表单，打开表单设计器，选定需要添加快捷菜单的对象。 （6）对在要使用弹出式菜单的对象的RightClick事件，写入调用快捷菜单的命令“DO ”。 2、实例 【例9.2】为某一表单的编辑框创建快捷菜单（菜单名为pb.mnx，内部名称为ziti），对编辑框的字体格式进行设置，步骤如下：,（1）用上述方法打开【快捷菜单设计器】，输入有关菜单项和要执行的命令，如图9.8所示。,图9.8 快捷菜单的设计,（2）打开快捷菜单的【常规选项】对话框，在【设置】代码窗口中输入如下代码： PARAMETERS edi 在【清理】代码窗口中输入如下代码： RELEASE POPUPS ZITI （3）对表单中的编辑框的RightClick事件输入代码： do pb.mpr with this （4）运行表单，在表单编辑框中单击右键，显示的快捷菜单如图9.9所示。,图9.9 例9.2快捷菜单运行结果,（2）打开快捷菜单的【常规选项】对话框，在【设置】代码窗口中输入如下代码： PARAMETERS edi 在【清理】代码窗口中输入如下代码： RELEASE POPUPS ZITI （3）对表单中的编辑框的RightClick事件输入代码： do pb.mpr with this （4）运行表单，在表单编辑框中单击右键，显示的快捷菜单如图9.9所示。,图9.9 例9.2快捷菜单运行结果,9.2 创建自定义的工具栏,9.2.1 定义工具栏 9.2.2 在表单中使用自定义的工具栏 9.2.3 命令执行的几种方式,9.2.1 定义工具栏,Visual FoxPro 6.0提供了一个工具栏基类，可以在此基础上创建工具栏。 在Visual FoxPro 6.0中利用类设计器创建或修改类库，创建类的步骤如下： （1）执行系统菜单【文件】|【新建】命令，在【新建】对话框中选择【类】，单击【新建】命令。 （2）在弹出的对话框中，输入新建类的名称和基类。 （3）在【类名】框中输入类的名称；在【派生于】框中选择派生的基类名，对于工具栏选择Toolbar；输入类文件的路径及文件名，操作结果如图9.10所示。,（4）在【新建类】对话框中单击【确定】按钮。在类设计器中添加【表单控件】对话框中的控件。如图9.11所示。,图9.10 创建工具栏类,图9.11 创建工具栏,9.2.2在表单中使用自定义的工具栏,1、在【表单设计器】中联系工具栏和表单。 在表单集中添加工具栏，让工具栏与表单集中的各个表单一起打开、关闭、实现的步骤如下： （1）按上节所述的方法建立一个工具栏类的类库。 （2）打开要使用工具栏类的表单集，在【表单控件】工具栏中单击【查看类】按钮 ，在下拉的菜单中单击【添加】命令，从显示的列表中选择要加入的工具栏类。 （3）单击【表单控件】工具栏中的类（要放置在表单上的工具栏类），然后将此工具栏放置有适当的位置。如果没有表单集，系统会提示是否创建表单集。 （4）为工具栏中的每个命令按钮定义操作，方法同命令按钮。,2、使用代码定义的工具栏 除通过【表单设计器】添加自定义的工具栏，还可以在表单集的INIT事件中，使用代码将自定义的工具栏添加到表单集中。例如：将MYTOOLBAR工具栏添加到表单集中，该工具栏在TOOLBAR类文件中的TOOLBAR类中。代码如下： set classlib to toolbar this.addobject(“mytoolbar”,”toolbar”) this.mytoolbar.show,9.3 上 机 实 训,实验目的： 学习在菜单中如何编写程序代码使菜单与表 单联结起来的方法 学习对菜单项进行控制的方法,实验内容： 1在菜单中编写程序代码使菜单与表单联结起来 操作提示：先打开在前面第1章实训中已经建立的菜单文件main。 实验分析：将以上各章实训中已经建立的表单与菜单联结起来。下面以工资管理中的“工资维护”为例进行说明，其他可参照进行操作。以下是操作步骤。,(1)在打开的“小型超市管理系统”项目管理器中打开菜单main，如图9.12所示。,图9.12 小型超市管理系统中的一级菜单,(2)单击如图9.12所示的【编辑】按钮，打开如图9.13所示的下级菜单。,图9.13 工资管理菜单的下级菜单,(3)单击如图9.13所示的结果下拉组合框，选择【命令】项，在后面的文本框中输入如下代码： do form gzform 操作后的界面如图9.14所示。,图9.14 将菜单与表单联结在一起,(4)用同样的方法完成菜单与对应的表单联结 2对菜单项进行控制 实验分析：如果希望操作员“admin”不能对“工资管理”、“入库管理”、“销售管理”进行操作，则可以通过使对应的菜单失效来实现。 实验步骤： (1)保证菜单操作界面是在一级菜单操作界面 (2)单击“工资管理”菜单后面的选项按钮，如图9.15所示，弹出的操作界面