/*协调对像* /
procedure TmtsUpdateCoorObj.UpdatePublishers(vDatas: OleVariant;
iMaxError: Integer; var iErrorCount: Integer);
begin
FMyDM.dcomcPublishers.AppServer.UpdateDatas(vDatas, iMaxError, iErrorCount);
{经测试这里的vDatas还是有效的
SetComplete;
except
SetAbort;
end;
end;
==========================================================================procedure TmtsPublishers.UpdateDatas(vDatas: OleVariant;
iMaxErrors: Integer; var iErrorCount: Integer);
begin
try
dspPublishers.ApplyUpdates(vDatas, iMaxErrors, iErrorCount);
{运行到上面会出现无效的 vDatas}
SetComplete;
except
SetAbort;
end; // try/except
end;
书中提到了修改“comobj.pas,provider.pas"两个文件然后生成*.dcu,我已经直接在VCL下进行修改,怎么再生成新的dcu?
是什么原因呢?
环境:D6+win200pro+SQL2000(Access)
谢谢!
procedure TmtsUpdateCoorObj.UpdatePublishers(vDatas: OleVariant;
iMaxError: Integer; var iErrorCount: Integer);
begin
FMyDM.dcomcPublishers.AppServer.UpdateDatas(vDatas, iMaxError, iErrorCount);
{经测试这里的vDatas还是有效的
SetComplete;
except
SetAbort;
end;
end;
==========================================================================procedure TmtsPublishers.UpdateDatas(vDatas: OleVariant;
iMaxErrors: Integer; var iErrorCount: Integer);
begin
try
dspPublishers.ApplyUpdates(vDatas, iMaxErrors, iErrorCount);
{运行到上面会出现无效的 vDatas}
SetComplete;
except
SetAbort;
end; // try/except
end;
书中提到了修改“comobj.pas,provider.pas"两个文件然后生成*.dcu,我已经直接在VCL下进行修改,怎么再生成新的dcu?
是什么原因呢?
环境:D6+win200pro+SQL2000(Access)
谢谢!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货