procedure ExportToCSV(AStream: TStream);

uses
  dxBackend.ConnectionString.JSON, // Declares the TdxBackendInMemoryJSONConnection component
  dxReport, // Declares the TdxReport component
  dxShellDialogs; // Declares the TdxSaveFileDialog component
// ...

procedure TMyForm.cxButtonExportToCSVClick(Sender: TObject);
var
  AReport: TdxReport;
  AJSONDataConnection: TdxBackendInMemoryJSONConnection;
  AStream: TMemoryStream;
  AJSONData: string;
begin
  // Define a table that consists of three columns ("id", "Region", and "Sales") and five data rows
  AJSONData :=

  '[{"id": 1, "Region": "Asia", "Sales": 4.7685},' + // Row #1
   '{"id": 2, "Region": "Australia", "Sales": 1.9576},' + // Row #2
   '{"id": 3, "Region": "Europe", "Sales": 3.3579},' + // Row #3
   '{"id": 4, "Region": "North America", "Sales": 3.7477},' + // Row #4
   '{"id": 5, "Region": "South America", "Sales": 1.8237}]'; // Row #5

  if not dxSaveFileDialog1.Execute(Handle) then Exit; // Displays the "Save File" dialog

  AJSONDataConnection: := TdxBackendInMemoryJSONConnection.Create(Self); // Creates a data connection
  try
    AJSONDataConnection.Name := 'JSONData'; // Assigns a name to the created data connection
    AJSONDataConnection.SetJSONValue(AJSONData); // Assigns the defined JSON data string
    AReport := TdxReport.Create(Self); // Creates a TdxReport component
    try
      AReport.Layout.LoadFromFile('MyReportLayout.repx'); // Loads an XML-based report layout
      AReport.ReportName := 'MyReport'; // Defines a report name
      AStream := TMemoryStream.Create; // Creates a stream as an intermediary container
      try
        AReport.ExportToCSV(AStream); // Exports content to a stream in the CSV format
        AStream.SaveToFile(dxSaveFileDialog1.FileName); // Saves CSV stream content to a file
      finally
        AStream.Free; // Releases the intermediary memory stream
      end;
    finally
      AReport.Free; // Releases the TdxReport component
    end;
  finally
    AJSONDataConnection.Free; // Releases the data connection component
  end;
end;

#include "dxBackend.ConnectionString.JSON.hpp" // Declares the TdxBackendInMemoryJSONConnection component
#include "dxReport.hpp" // Declares the TdxReport component
#include "dxShellDialogs.hpp" // Declares the TdxSaveFileDialog component

// Add the following linker directives to the corresponding CPP source file:
#pragma link "dxReport" // Required to use dxDashboard.Control.hpp declarations
#pragma link "dxShellDialogs" // Required to use dxShellDialogs.hpp declarations
#if defined(_WIN64) // Required to use dxBackend.ConnectionString.JSON.hpp declarations
  #pragma link "dxBackend.ConnectionString.JSON.o"
#else
  #pragma link "dxBackend.ConnectionString.JSON.obj"
#endif
// ...

void __fastcall TMyForm::cxButtonExportToCSVClick(TObject *Sender)
{
  TdxReport *AReport;
  TdxBackendInMemoryJSONConnection *AJSONDataConnection;
  TMemoryStream *AStream;

  // Define a table that consists of three columns ("id", "Region", and "Sales") and five data rows
  UnicodeString AJSONData =

  "[{\"id\": 1, \"Region\": \"Asia\", \"Sales\": 1.9576}," // Row #1
   "{\"id\": 2, \"Region\": \"Australia\", \"Sales\": 1.9576}," // Row #2
   "{\"id\": 3, \"Region\": \"Europe\", \"Sales\": 3.3579}," // Row #3
   "{\"id\": 4, \"Region\": \"North America\", \"Sales\": 3.7477}," // Row #4
   "{\"id\": 5, \"Region\": \"South America\", \"Sales\": 1.8237}]" // Row #5

  if(!dxSaveFileDialog1->Execute(Handle)) { return; } // Displays the "Save File" dialog

  AJSONDataConnection = new TdxBackendInMemoryJSONConnection(this); // Creates a data connection
  try
  {
    AJSONDataConnection->Name = "JSONData"; // Assigns a name to the created data connection
    AJSONDataConnection->SetJSONValue(AJSONData); // Assigns the defined 
    AReport = new TdxReport(this);
    try
    {
      AReport->Layout->LoadFromFile("MyReportLayout.repx"); // Loads an XML-based report layout
      AReport->ReportName = "MyReport"; // Defines a report name
      AStream = new TMemoryStream(); // Creates a stream as an intermediary container
      try
      {
        dxReport1->ExportToCSV(AStream); // Exports content to a stream in the CSV format
        AStream->SaveToFile(dxSaveFileDialog1->FileName); // Saves CSV stream content to a file
      }
      __finally
      {
        delete AStream; // Releases the intermediary memory stream
      }
    }
    __finally
    {
      delete AReport; // Releases the TdxReport component
    }
  }
  __finally
  {
    delete AJSONDataConnection; // Releases the data connection component
  }
}