|

楼主 |
发表于 2008-3-8 23:07:32
|
显示全部楼层
没有成功:(
在窗体上加一个流程代理控件(Flowbroker),然后在这个控件的AfterFlowFinish 上去处理。
我是这样写的:
procedure TConfirmBaseMAINFORM.FlowBroker1AfterFlowFinish(Sender: TObject; Command: TFlowFinishCommand);
var depId,personId:String;
begin
//ҪеIJ¿ÃźÍÊôÓÐÕßҪдÈë×ʲúÊý¾Ý¿â
//µ÷²¦±í:AM_Dest_DEPART,AM_Dest_PERSON, ×ʲú±í,OwnerDepId,OwnerID
depId:=dsbAssetTransfer.DataSet.FieldByName('AM_Dest_DEPART').AsString;
personId:=dsbAssetTransfer.DataSet.FieldByName('AM_Dest_PERSON').AsString;
// дÈëÐÂÊý¾Ý
dsbAssets.DataSet.FieldByName('OwnerDepId').AsString:=depId;
dsbAssets.DataSet.FieldByName('OwnerID').AsString:=personId;
end;
但是没有成功,数据库中没有变。
我是在审批基类的窗体写的代码,是不是问题出在这儿?我有两个两个审批,处长审批和付处审批功能,继承基类,不想写两份代码,便写在基类中,但是好象不行
|
|