回 帖 发 新 帖 刷新版面

主题:VFP 不能正常退出控件?求救

表单中的“退出”控件的代码 ,运行时老是提示,说不能清除对像 %,因为她正在被使用?为什么会这样,代码如下

_screen.activeform.tag="0"
ask=messagebox("确实要退出系统吗?",4+32+256,"图书管理系统")
if ask=6
close all
clear all
release all
clear events
else
_screen.activeform.tag="1"
endif


求朋友们帮忙?

回复列表 (共1个回复)

沙发


_screen.activeform.tag="0"
ask=messagebox("确实要退出系统吗?",4+32+256,"图书管理系统")
if ask=6
    [color=FF0000]thisform.release()[/color]
    close all
    clear all
    release all
    clear events
else
    _screen.activeform.tag="1"
endif
试一下加入以上红色代码,我认为是没释放表单的原因吧!

我来回复

您尚未登录,请登录后再回复。点此登录或注册