TFDMemTable已修改的数据序列为流
TFDMemTable已修改的数据序列为流
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | uses FireDAC.Stan.Intf, FireDAC.Comp.Client; function fdmemtable2stream(fdmemtable: TFDMemTable): TStream; begin fdmemtable.CachedUpdates := True; Result := TMemoryStream.Create; if fdmemtable.State in dsEditModes then fdmemtable.Post; if fdmemtable.ChangeCount = 0 then Exit; fdmemtable.ResourceOptions.StoreItems := [siDelta, siMeta]; try fdmemtable.SaveToStream(Result, TFDStorageFormat.sfBinary); Result.Position := 0; finally fdmemtable.ResourceOptions.StoreItems := [siDelta, siMeta, siData]; end; end; |
本文来自博客园,作者:{咏南中间件},转载请注明原文链接:https://www.cnblogs.com/hnxxcxg/p/13468444.html
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步