表格处理程序
统计年鉴排版软件
下载地址

表格处理程序
统计年鉴排版软件
在线教程

 经验技巧



如何避免“不能退出 Visual FoxPro” 信息


     你是否遇到过这样的情形,当你不断的试着关闭你的VFP应用程序,而得到的回答是“不能退出Visual FoxPro”。为什么?因为应用程序仍然在事件循环中。如果在程序中有事件循环( READ EVENTS 命令), 在退出事件循环前,你就不能退出 VFP。 怎么办,只要你在编程时作如下处理,就可以很好地解决这个问题。
1、写一个名为 FileExit.prg 的程序,程序代码如下:
if messagebox('您真的要退出本系统吗?',4+32+256,'退出确认')<>6
  retu
endif
do whil txnlevel()>0
  rollback
enddo
clea even
do while _screen.formcount>0
  _screen.forms(1).release
enddo
QUIT

2、在主程序中加命令代码:
on shutdown do FileExit