3.在顶层表单中调用一般菜单

(1)建立菜单

操作步骤如下:

①单击“文件”菜单中的“新建”菜单项,在弹出的窗口中选择文件类别为“菜单”,单击“新建文件”按钮。在弹出的“新建菜单”窗口中选择“菜单”,单击“确定”按钮,启动了“菜单设计器”窗口。

②输入菜单项的相应名称,并选择结果为“子菜单”,表示将来单击该项,会弹出一个下拉子菜单,如下图所示。

③单击“文件调用”项右边的“创建”按钮,来设计“文件调用”的下拉子菜单。此时,“菜单设计器”上的菜单级显示为“文件调用”,表示目前正在设计“文件调用”项的子菜单,如下图所示。

④输入相应的菜单名称,在“结果”列中选择“命令”,如图所示。

注:菜单项的结果为“命令”的含义是当单击该菜单项时,会执行一条VFP命令,要执行的命令在后面的框中输入,如:“bd1表单”项的结果为“命令”,命令代码为:do form bd1。

⑤选择“菜单级”中内容为“菜单栏”后,单击“日期与时间”菜单项右边的“创建”按钮,来设计该项的下拉子菜单,并根据下图所示为相应的菜单项选择相应的“结果”项。

注:

① 单击“日期”项右边的“创建”,输入日期过程代码如下:

RQ=DATE()

Messagebox(ctod(RQ))

② 退出菜单项的命令是:set sysmenu to default  &&恢复VFP的菜单为系统默认菜单。

③ 结果中的“过程”选项的含义是执行多条命令,而结果中的“命令”选项的功能是执行一条命令。

⑥设置该菜单可被一个顶层表单调用

在“显示”菜单中选择“常规选项”命令,在打开的对话框窗口中,选中“顶层表单”复选框。

⑦单击“文件”菜单下的“保存”命令,保存菜单文件名为Mymenu.mnx。

⑧在“菜单设计器”状态下,单击“菜单”中的“生成”命令,可将Mymenu.mnx文件生成Mymenu.mpr的菜单程序文件。

(2)在顶层表单中调用菜单

①新建一个表单文件DCBD.SCX。

②设置DCBD.SCX为顶层表单,即在表单的属性窗口中将该表单的SHOWWINDOW属性设置为2-作为顶层表单。

③双击表单,选择过程为INIT(或load),在表单的INIT(或load)事件中输入如下代码:do mymenu.mpr with this,.t.。.

④在窗口中输入命令:do form DCBD.SCX,来运行表单DCBD,测试菜单项的执行情况。

(3)其他要说明的问题

①给菜单项添加热键,方法是在菜单名的后面用“\

③ 添加菜单项目之间的分割线:只需把菜单项的名字写成:“\-”,其他项采用系统默认值即可。