怎樣提交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;