myquit.prg

工程指令EO管理系统是飞机维修管理系统中的一个子系统

clear event
if _screen.formcount>0
	h=_screen.formcount
	dime tmpform(h)
	for i=1 to h
		tmpform(i)=_screen.forms(i)
	endfor
endif 
quit