title: Transforming TRestResponse content to TFDJSONDataSets
body: <p>I am using delphi XE7, and I need help to transform <code>TRestResponse</code> content to <code>TFDJSONDataSets</code> on the client side of a Rest Client application.</p>
  
  <p>In the code posted below I need a function in this line:</p>
  
  <pre><code>LDataSets := function(sContent)--&gt;transform sContent to TFDJSONDataSets
  </code></pre>
  
  <p>How can I do this?</p>
  
  <pre><code>//client side
  procedure TaskComplete;
  var sContent:string;
  LDataSets: TFDJSONDataSets;
  begin
    sContent:=ModuloCliente.RESTResponse1.content;
    LDataSets := function(sContent)--&gt;Here I need to transform sContent to TFDJSONDataSets
    //Prepare temp MemoryTable 
    memTable.Active := False;
    memTable.AppendData(TFDJSONDataSetsReader.GetListValue(LDataSets, 0));
  end;
  
  //request to rest server
  procedure DoRequest;
  begin
    ModuloCliente.RESTClient1.BaseURL:='http://localhost:8080/datasnap/rest/TsrvServerMetodos';
    ModuloCliente.RESTRequest1.Resource:='"pending_msg_to_user_token"/{param1}';
    ModuloCliente.RESTRequest1.Params.ParameterByName('param1').Value:='1';
    ModuloCliente.RESTRequest1.ExecuteAsync(TaskComplete,true,true);
  end;
  
  //server side
  function TSrvServerMetodos.pending_msg_to_user_token(qry:string): TFDJSONDataSets;
  begin
    qryStaff.Active := False;
    with  qryStaff do begin
      Params.Clear;
      SQL.Clear;
      unprepare;
      SQL.Add(qry);
    end;
    Result := TFDJSONDataSets.Create;
    TFDJSONDataSetsWriter.ListAdd(Result, qryStaff);
  end;
  </code></pre>