【正确答案】步骤1:单击常用工具栏中的"新建"按钮,文件类型选择"菜单"。
步骤2:在"新建菜单"对话框中选择"菜单"按钮,在菜单设计器中的"菜单名称"中依次输入"文件"、"编辑"和"退出"这三个主菜单项。
步骤3:在"退出"主菜单的"结果"中选择"过程"并输入下列语句:
myform.release
set sysmenu to default
步骤4:单击"显示"菜单中的"常规选项"命令,在"常规选项"对话框中选中"顶层表单"复选框。
步骤5:单击工具栏上"保存"按钮,在弹出"保存"对话框中输入"mymenu"即可。
步骤6:在"菜单设计器"窗口下,选择"菜单"菜单中的"生成"命令,生成"mymenu.mpr"文件。
步骤7:单击常用工具栏中的"新建"按钮,文件类型选择"表单",打开表单设计器。单击工具栏上"保存"按钮,在弹出"保存"对话框中输入"myform"即可。
步骤8:在表单的"属性"对话框的ShowWindow处选择"2-作为顶层表单",在Name处输入"myform",在Caption处输入"顶层表单"。双击"Init Event",在"myform.Init"编辑窗口中输入"do mymenu.mpr with this ,'xxx'",启动菜单命令。双击"Destroy Event",在"myform.Destroy"编辑窗口中输入"release menu xxx extended",在表单退出时释放菜单。操作完毕后运行表单。
【答案解析】