string ls_jgy
dw_7.accepttext()
ls_jgy = dw_7.object.modetype[1];
choose case ls_jgy
case '1'
dw_2.dataobject = 'd_dwtz_fh'
go_Public.color.of_InitDWColor(dw_2, 1)
dw_1.dataobject = 'd_dwtz_fh_2'
dw_1.settransobject(sqlca)
go_Public.color.of_InitDWColor(dw_1, 1)
case '2'
dw_2.dataobject = 'd_dwtz_fh1'
go_Public.color.of_InitDWColor(dw_2, 1)
dw_1.dataobject = 'd_dwtz_fh_1'
dw_1.settransobject(sqlca)
go_Public.color.of_InitDWColor(dw_1, 1)
end choose
delbox()
以上代码执行结果 dw_2 没了