delphi: Add an example application

- Load a report layout from 'Order.repx'
- Read the order ID as a CLI parameter
- Connect to the sample database `nwind.db` using SQLite
- Export and write a report to 'Order_<id>.pdf'

Co-authored-by: Alexey Pertsev <alexey.pertsev@devexpress.com>
Co-authored-by: Ilia Nenashev <ilia.nenashev@devexpress.com>
Co-authored-by: Denis Garavsky <denis.garavsky@devexpress.com>

Author: 4 people

.gitignore

@@ -31,6 +31,7 @@
 # Most of the time, files here have not there place in a code repository.
 #Win32/
 #Win64/
+#Win64x/
 #OSX64/
 #OSXARM64/
 #Android/
@@ -61,6 +62,7 @@
 *.cfg
 *.hpp
 *Resource.rc
+*.rsp
 
 # Delphi local files (user-specific info)
 *.local
@@ -75,6 +77,39 @@ __history/
 __recovery/
 *.~*
 
+
+# ------------------------------------------------------------
+# C++Builder specific
+# ------------------------------------------------------------
+
+# C++Builder compiler outputs
+*.obj
+*.hpp
+*.ilc
+*.ild
+*.ilf
+*.ils
+*.map
+*.tds
+
+# Precompiled headers
+*.pch
+
+# C++Builder packages and libraries
+*.bpl
+*.bpi
+*.lib
+*.a
+*.dll
+*.so
+
+# C++Builder intermediate / cache files
+*.cbproj.local
+*.cbproj.identcache
+*.cbproj.user
+*.cbtemp
+
+
 # Castalia statistics file (since XE7 Castalia is distributed with Delphi)
 *.stat
 

Delphi/Order.repx

@@ -0,0 +1,76 @@
+program PDFReportGenerator;
+
+{$APPTYPE CONSOLE}
+
+{$R *.res}
+
+uses
+  System.SysUtils, System.Classes, System.StrUtils, dxBackend, dxBackend.Bundled,
+  dxBackend.ConnectionString.SQL, dxReport, dxReport.Parameters;
+var
+  AOrderID: string;
+
+// Export a report to a PDF file in non-interactive mode:
+// without showing the report in the Report Designer or Report Viewer, or otherwise using UI.
+// Parameters:
+// AOrderID: order ID to use in report data, for example, '11077'
+procedure ExportReportToPdf(const AOrderID: string);
+var
+  AConnection: TdxBackendDatabaseSQLConnection;
+  AReport: TdxReport;
+  AStream: TMemoryStream;
+  AOutputFileName: string;
+
+begin
+  // Step 1: Create a report instance and load the report layout
+  AReport := TdxReport.Create(nil);
+  try
+    // Set an internal report name (does not affect the exported PDF content and file name)
+    AReport.ReportName := 'OrderReport';
+    // Load the report layout from the specified file
+    AReport.Layout.LoadFromFile('Order.repx');
+
+    // Step 2: Create a database connection
+    AConnection := TdxBackendDatabaseSQLConnection.Create(nil);
+    try
+      // Assign a database name matching the name specified in the report layout
+      AConnection.DisplayName := 'NWindConnectionString';
+      // Assign a connection string required to use the local SQLite database
+      AConnection.ConnectionString := 'XpoProvider=SQLite; Data Source=nwind.db; Mode=ReadOnly';
+
+      // Step 3: Define Report Parameter Values
+      AReport.LoadParametersFromReport;
+      // Set the "OrderIdParameter" value in the report layout
+      AReport.Parameters['OrderIdParameter'].Value := AOrderID;
+
+      // Step 4: Export a report to PDF
+      AStream := TMemoryStream.Create;
+      try
+        // Export a report to a memory stream in the PDF format
+        AReport.ExportToPDF(AStream);
+        // Save memory stream content to a file
+        AOutputFileName := 'Order_' + AOrderID + '.pdf';
+        AStream.SaveToFile(AOutputFileName);
+        Writeln('Report saved to: ', AOutputFileName);
+      finally
+        AStream.Free;
+      end;
+    finally
+      AConnection.Free;
+    end;
+  finally
+    AReport.Free;
+  end;
+end;
+
+// The helper application entry point that parses command-line parameters and calls the export procedure
+begin
+  if ParamCount < 1 then
+  begin
+    Writeln('Error: OrderID parameter is required. For example: PDFReportGenerator.exe 11077');
+    Halt(1); // Exit with error code 1
+  end;
+
+  AOrderID := ParamStr(1); // Read the first parameter as OrderID
+  ExportReportToPdf(AOrderID);
+end.