回复 10楼 sdta
另一个表单是一个登录器表单,由登录器表单打开顶层表单
*主程序中写上:
PUBLIC lSysLogin
lSysLogin=.F.
DO FORM form\Login.scx
READ EVENTS
IF lSysLogin=.T.
DO FORM form\mainform.scx
READ EVENTS
ENDIF
*我的,Login.scx与mainform.scx都是顶层表单,如果正常登录,lSysLogin=.T.
*我是在Login.scx的Destroy事件中
CLEAR EVENTS
[ 本帖最后由 mywisdom88 于 2015-6-9 17:22 编辑 ]