父子调用.txt

来自「爱师软件工作室的教材管理系统源码」· 文本 代码 · 共 20 行

**init
lparameters dcjl
foreditjl=dcjl
select tbl_main
go foreditjl


**return
thisform.DataChecker1.VerifyChanges
release thisform
select tbl_main
foreditjl=recn()
go foreditjl


**被调
do form frm_son with recn()


mymainbar.cmdcsll.enabled=.t.