我主程序代码如下:
set talk off
set mark to
set compatible on
set escape off
set dele on
set safe off
close all
do form main
read events
config.fpw内容为screen=off(为了隐藏VFP主窗口)
表单main的QueryUnload事件内容如下:
if messagebox( '退出系统? ',4+32+256, '请确认 ')=7 &&用户回答 "否 "
nodefault &&表示不进行默认的行为模式
else
clear events &&是否要支行clear,视需要而定
quit
endif
运行之后,VFP6中点右上角×弹出窗口,点击按钮“是”可以正常退出;
但是VFP9中点右上角×弹出窗口,点击按钮“是”能退出表单,但同时显示一个VFP9主窗口。
这是为什么?该如何解决?
------解决方案--------------------------------------------------------
在
read events
加
quit
------解决方案--------------------------------------------------------
你把CONFIG。FPW排除了吗,要排除了以后才起作有