主程序中使用了READ events,运行exe文件后,不能退出?
如题,主程序中使用了read events命令,下一个命令是quit,为什么运行连编后的exe文件后,不能退出visual foxpro.另外:运行exe文件时,弹出对话框“资源文件无效,是否改写为空文件”,选择否,运行正常,这是为什么?
主程序如下:
set talk off
set dele on
set date to ansi
set sysmenu off
close all
release window 常用,表单控件
zoom window screen max
deactivate window "项目管理器"
mypath=left(sys(16),rat("\",sys(16)))
set defa to (mypath)
do form 销售管理系统
read events
quit