JSONArray in eine DataSet

[Ykcim]

Ich habe es tatsächlich über eine TFDMemTable gelöst. Ich habe mir seitens des Servers die Query in einen TStream gespeichert:

Delphi-Quellcode:

Query.Open;
      if Assigned(AStream) then begin
         Query.SaveToStream(AStream, sfJSON);
      end;

Den habe ich an den Client gegeben und im Client dann in die TFDMemTable geladen:

Delphi-Quellcode:

procedure TDB_Unit.Get_Propteries;
var   LClient: TxDataClient;
      LService: IDBService;
      LStream: TMemoryStream;

begin
   LClient := TXDataClient.Create;
   LStream := TMemoryStream.Create;
   Try
      LClient.Uri:= xData_Conect.URL;
      LService:= LClient.Service<IDBService>;
      LStream:=LService.Properties_Select as TMemoryStream;
      LStream.Position:=0;
      MTable_Properties.LoadFromStream(LStream, sfJSON);
   Finally
      LClient.Free;
      LStream.Free;
   end;
end;

Zu Test-Zwecken ein DataSource an die TFDMemTable gehängt und das Ergbenis in einem DBGrid angezeigt. Scheint zu funktionieren.

Jetzt muss ich mal gucken, was ich mit einer TFDMemTable im Gegensatz zu einer DataSet machen kann, denn damit habe ich noch nie gearbeitet.

Vielen Dank für die Unterstützung.

@Neumann Es ist keine Web-App, sondern eine VCL-App

Patrick