使用 VFP ( Microsoft Visual FoxPro ) 设计一个简易计算器（下）

五、创建程序：

1、打开项目管理器（不小心关掉了的可以打开文件--》xxx.pjx），切换到“代码”--》程序--》新建

2、在弹出的程序框中编辑如下代码：

set default to I:\vfp Project\计算器
do form jsq.scx
read events

（注意上面的路径是创建工程时的路径）

关闭，保存为文件名为 jsq.prg 

3、然后右键单击 jsq 程序，设置主文件：

六、创建配置文件：

项目管理器--》其他--》文本文件--》新建：

添加代码：screen=off

关闭，保存为 config.fpw 

七、创建菜单：

1、其他--》菜单--》新建--》菜单：

2、依次填写三个顶层菜单名称 ：

写完之后，文件--》保存--》名称：jsq.mnx --》保存

3、为“编辑”菜单创建子菜单：

填写菜单名称，结果选菜单项，后面填入命令

点击 3 选项按钮，同时按下 Ctrl +C ，确定。（粘贴菜单重复上面的步骤）

4、为“查看”菜单添加子菜单：

在“菜单级”选“菜单栏”，会跳回顶层菜单编辑

选查看后面的创建按钮，依次填写子菜单名称：

5、为“帮助”菜单创建子菜单：

创建完成之后保存。

7、生成菜单：

双击菜单jsq ，打开菜单设计器，在系统菜单中选“生成”，确定输出文件，生成。

8、设置菜单属性：

单击系统菜单中“显示”--》常规选项，勾选“顶层表单”，确定。（最后还是别忘记保存）

9、修改表单 jsq.scx :

修改之前创建的表单，在表单属性面板中的方法程序中找到Init Event 方法，双击编辑代码：do jsq.mpr with this, .t.

找Destroy Event 方法，双击编写代码：

thisform.release 

clear events

保存关闭。

10、连编各文件：

在项目管理器中点击“连编”--》复选“连编可执行文件”--》确定。

应用程序名称自己定，如：计算器.exe