VFP中怎样控制程序的退出
编号：QA000262
建立日期: 1998年12月26日 最后修改日期：2003年7月27日
所属类别：
Ｑ
chhc:
我的程序编译后在关闭时,它提示:"不能退出foxpro"。
Ａ回答:
wangqiongyue的意见：
release thisform
release thisformset
quit
clear
close
辣妹的意见：
事件循环用
read events
在退出的地方必须加一条命令：
clear events
才能正确的退出VFP。
chlin的意见：
用EXIT命令
佚名的意见：
在VFP中当要退出程序时，将会执行Shut 事件，这个事件可以用On ShutDown 命令设定它的执行程序。默认程序是显示 “不能退出 VFP”信息框。下面这个函数是询问您是否想退出程序。
**************************************
* Usage: On ShutDown do OnShutDown
*************************************
FUNCTION OnShutdown()
Yes_No = 4
Questionicon=32
DownNO=7
ASSKEY=MESSAGEBOX("您是否要退出这个程序", YES_NO+Questionicon ,
_screen.caption )
IF Asskey=DownNO
return .F.
Else
&&这里做退出程序的处理
EndIf
ENDFUNC
KILLER的意见：
_screen.activeform.release()
clear events
SET SYSMENU TO DEFAULT
此问题由佚名等回答。
附加关键字：编程, 源程序, programming, source code, FoxPro/Visual FoxPro, Foxbase, dBase, xbase, FoxPro, VFP, Visual FoxPro, 其他方面, , 错误信息, error, error message, link, compile, runtime。
| |
|
|
| |
|
|
