vfp流程是:主程序-欢迎界面-密码验证-菜单文件,编译后,前面三步都能实现,但是,就是不现实菜单?
------解决方案--------------------------------------------------------
如何建立一个带有菜单的顶层表单
1、建一个顶层表单(表单的ShowWindow为2)作为主表单,在此表单的Init事件中:do 菜单名.mpr With This,.T.(此表单即为菜单所在的表单)
2、建一个菜单,要把菜单的<常规选项>中<顶层表单>和<替换>选中。操作如下:
打开你的菜单,点击VFP菜单的“显示”(View)->“常规选项”(General Options)->选中“顶层表单”(Top-Level Form),位置(Location)设置成“替换”(Replace)
点击VFP菜单中的“菜单”(Menu)->“生成”(Generate)->出现窗口后,点击“生成”(Generate)。
3、其它子表单的ShowWindow为1 (即“在顶层表单中”),并且WindowsType的值为1(即模式表单)。
4、建一个程序(prg)为项目的主文件。在这个程序中调用一个主表单,Prg的内容参考如下:
Close Databases All
_Screen.Visible=.F.
Set Date To YMD
Set Century On
Set Hours To 24
Set Safe Off
Set Talk Off
Set Sysmenu To
Set Exclusive On
Set Event On
...........
Do Form 表单A &&表单A为你的主表单名
Read Events
...........