随笔

来源:互联网 发布:u盘mac系统安装教程 编辑:程序博客网 时间:2024/06/05 23:47

Parent.TriggerEvent("ue_interface")

 

Parent.Event ue_output_jindie(False,ls_filename)



dwobject ldwo_obj1,ldwo_obj2


//ldwo_obj1 = dw_2.Object.fpono
//ldwo_obj2 = dw_2.Object.fpono2


for ll_row = 1 to adw_data.rowcount()
ls_fodrno = adw_data.getitemstring(ll_row,"fpurodrno")
ll_fpono2 = adw_data.getitemnumber(ll_row,"fpurodrno2")

//20120301 modified by chen
cb_append.triggerevent(clicked!)
dw_2.SetColumn("fpono")
dw_2.setitem(il_fline,"fpono",ls_fodrno)
ldwo_obj1 = dw_2.Object.fpono
// string ls_dwo_obj1 
// ls_dwo_obj1 = ldwo_obj1.name
if dw_2.event itemchanged(il_fline,ldwo_obj1,ls_fodrno) = 1 then
cb_delete.triggerevent(clicked!)
continue

else
// dw_2.setitem(il_fline,"fpono",ls_fodrno)
end if

dw_2.SetColumn("fpono2")
dw_2.setitem(il_fline,"fpono2",ll_fpono2)
ldwo_obj2 = dw_2.Object.fpono2
// string ls_dwo_obj2 
// ls_dwo_obj2 = ldwo_obj2.name
if dw_2.event itemchanged(il_fline,ldwo_obj2,string(ll_fpono2)) = 1 then
cb_delete.triggerevent(clicked!)
continue
else
// dw_2.setitem(il_fline,"fpono2",ll_fpono2)
end if