900分(二),请大家来分析下ClientDataSet的更新过程,弄明白更新原理,使程序做得更好,越细越好。---DoApplyUpdates!(300分)

  • 主题发起人 主题发起人 天地弦
  • 开始时间 开始时间

天地弦

Unregistered / Unconfirmed
GUEST, unregistred user!
第一部分是调用中间层更新的DoApplyUpdates函数(希望能扩展到中间层)。
function TCustomClientDataSet.DoApplyUpdates(Delta: OleVariant;
MaxErrors: Integer;
out ErrorCount: Integer): OleVariant;
var
OwnerData: OleVariant;
begin
A01 do
BeforeApplyUpdates(OwnerData);
A02 Result := AppServer.AS_ApplyUpdates(ProviderName, Delta, MaxErrors, ErrorCount, OwnerData);
A03 do
AfterApplyUpdates(OwnerData);
end;
 
三层联盟
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1543819
 
接受答案了.
 
后退
顶部