DATASNAP为支持FIREDAC而增加的远程方法的数据类型TFDJSONDataSets

浏览数：78 / 时间：2015年06月09日

前面的博客提到用FIREDAC全面替代COM那一套东西：DATAPROVIDER,OLEVARIANT,CLIENTDATASET,DBEXPRESS。。。

显然，DATASNAP的远程方法必须增加对FIREDAC数据集直接序列的参数类型。

从XE5的UPDATE2开始增加一个新的单元文件：Data.FireDACJSONReflect

TFDJSONDataSets是一个数据集列表对象，顾名思义可以返回一个或多个数据集对象，不论是单表或者主从表数据都可传递。

服务端演示代码：

function TServerMethods1.GetJSONData: TFDJSONDataSets;
begin
  Result := TFDJSONDataSets.Create;
  if not FDMemTable1.Active then
    FDMemTable1.LoadFromFile(‘../../customer.fds‘)
  else
    FDMemTable1.Active := False;
  TFDJSONDataSetsWriter.ListAdd(Result, FDMemTable1);
end;

客户端演示代码：

var
  DSList: TFDJSONDataSets;
begin
  FDMemTable1.Close;
  DSList := ClientModule1.ServerMethods1Client.GetJSONData;
  FDMemTable1.AppendData(
      TFDJSONDataSetsReader.GetListValue(DSList, 0));
  FDMemTable1.Open;
end;

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

DATASNAP为支持FIREDAC而增加的远程方法的数据类型TFDJSONDataSets