首页 > 代码库 > DATASNAP为支持FIREDAC而增加的远程方法的数据类型TFDJSONDataSets

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

前面的博客提到用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