怎样提交FIREDAC数据集的DELTA到中间件然后保存进数据库

你可以在客户端序列FireDAC数据集的DELTA , 将序列后的STREAM发送给中间件,

中间件的TFDQuery或TFDMemTable调用LOADFROMSTREAM()方法加载流,

然后调用ApplyUpdates()将数据保存进数据库中。

怎样转换TFDQuery或TFDMemTable的Delta为STREAM?

你将需要设置FDQuery或TFDMemTable的ResourceOptions.StoreItems 为 [siDelta]或 [siMeta, siDelta]。

然后调用SaveToStream()方法即可。

下面是演示用的代码:

var
Stream:TMemoryStream;
begin
// qryDataSource have 100 records,modified 1 record,so have 1
delta record
Stream := TMemoryStream.Create;
qryDataSource.ResourceOptions.StoreItems :=
[siData,siMeta,siDelta];
Stream := TMemoryStream.Create;
qryDataSource.SaveToStream(Stream);
//restore StoreItems
// qryDataSource.ResourceOptions.StoreItems :=
[siData,siMeta,siDelta];

Stream.Position := 0;
// remote app,transports stream by http
qryRemote.Close;
qryRemote.CachedUpdates := True;
qryRemote.UpdateOptions.KeyFields := ‘ID‘;
qryRemote.UpdateOptions.UpdateTableName := ‘BAS_COLORS‘;
qryRemote.SQL.Text := ‘select * from BAS_COLORS where 1=0‘;

qryRemote.ResourceOptions.StoreItems := [siMeta,siDelta,siData];
//It load 100 reocrds,not only 1 delta record
qryRemote.LoadFromStream(Stream);
Stream.Free;
// commit and refresh
qryRemote.ApplyUpdates();
qryDataSource.CommitUpdates;
qryDataSource.Refresh;

end;

 

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。