关于中止表单初始化--想破了脑袋实在没招了
我想通过一个参数x 来控制一个表单是否要运行
我的入口是do form f1
f1的init里加了下面的代码:
if x<>1
中止,退出
endif
换了多个思路发现f1是必须要执行完init,中间不可能释放表单
[解决办法]
在
do form f1
之前把x声明成public的,根据条件赋值给X
然后把判断代码放在表单load事件里
if x<>1
clear events
quit
endif
[解决办法]
表单LOAD事件中:
QUIT
[解决办法]
If 全局变量<>1 Return .F.Endif