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)其他要说明的问题
①给菜单项添加热键,方法是在菜单名的后面用“\
③ 添加菜单项目之间的分割线:只需把菜单项的名字写成:“\-”,其他项采用系统默认值即可。