VFP6.0连编后运行一闪而过

来源：百度知道 编辑：UC知道 时间：2024/06/14 17:24:18
一下是我的主程序的代码：
do form 开始.scx
set exact on
set confirm off
set escape on
set safety on
set status off
set scoreboard off
set decimals to 3
set talk off
set sysformats on
set century on
set date to ansi
zoom window screen max
close all
release window 常用
set sysmenu to
_screen.caption="欢迎使用XXX公司市场营销管理信息系统"
_screen.minbutton=.f.
_screen.maxbutton=.f.
read even
我的程序是可以正常执行了
在我连编成可执行文件后，关闭了VFP，再点生成的.exe文件，程序会一闪就不在了。请问是哪里出了问题？
照你们说的改了下，就是主表单的activate事件我加入了read events
但是会让主表单一直停留，不会释放，是否该加句clear events
或者是thisform.release？

一楼的没错。
如果按照楼主的思路，不做别的改动，只要移动一下语句的位置即可：
set exact on
set confirm off
set escape on
set safety on
set status off
set scoreboard off
set decimals to 3
set talk off
set sysformats on
set century on
set date to ansi
zoom window screen max
close all
release window 常用
set sysmenu to
_screen.caption="欢迎使用XXX公司市场营销管理信息系统"
_screen.minbutton=.f.
_screen.maxbutton=.f.
do form 开始.scx 将开始的这句移到此位置即可
read even

将“开始”表单WINDOWTYPE改为1 模式表单即可。

应在Init事件中加入read events
在unlod中加入clear events 这个先别加先加上面的，看看行不行，

1.用main.prg作主程序，包含环境保存和设置语句，全局变量的申明和赋值，最后调用主表单 do form main_form.
2.在主表单加入一个退出按钮。退出按钮的Click事件代码为：
thisform.release
clear events
3.主表单的activate事件代码为：
read events.
还有一个问题就是必须在VF的主程序的最后加入READ EVENTS语句，否则编译之后就会一闪而过