FastReport VCL是用于 Delphi、C++ Builder、RAD Studio 和 Lazarus 的報告和文檔創建 VCL 庫。它提供了可視化模板設計器，可以訪問 30 多種格式，并可以部署到云、網站、電子郵件和打印中。

立即點擊下載FastReport VCL v6.9最新版

FastReport 不僅允許基于應用程序中定義的數據構建報告。您也可以直接在報告中定義自己的數據源（與數據庫的連接、查詢）。FastReport 提供了 ADO、BDE、IBX、DBX、FIB 引擎。您可以創建自己的引擎，然后將其連接到 FastReport。

下圖顯示了用于創建數據庫引擎的類層次結構。新引擎組件以綠色突出顯示。

讓我們詳細檢查一下基本類。

TfrxDialogComponent是所有非可視化組件的基礎類，可以放在一個FastReport報表設計對話窗體上。其中沒有定義任何重要的屬性或方法。

TfrxCustomDatabase class 是“Database”類型的 DB 組件的基本類。

  TfrxCustomDatabase = class(TfrxDialogComponent)
  protected
    procedure SetConnected(Value: Boolean); virtual;
    procedure SetDatabaseName(const Value: String); virtual;
    procedure SetLoginPrompt(Value: Boolean); virtual;
    procedure SetParams(Value: TStrings); virtual;
    function GetConnected: Boolean; virtual;
    function GetDatabaseName: String; virtual;
    function GetLoginPrompt: Boolean; virtual;
    function GetParams: TStrings; virtual;
  public
    procedure SetLogin(const Login, Password: String); virtual;
    property Connected: Boolean read GetConnected write SetConnected default False;
    property DatabaseName: String read GetDatabaseName write SetDatabaseName;
    property LoginPrompt: Boolean read GetLoginPrompt write SetLoginPrompt default True;
    property Params: TStrings read GetParams write SetParams;
  end;

• Connected – 數據庫連接是否處于活動狀態；
• DatabaseName - 數據庫名稱;
• LoginPrompt – 連接數據庫時是否要求登錄；
• Params – 連接參數。

TfrxDataset, TfrxCustomDBDataset,TfrxDBDataset類提供數據訪問的功能。FastReport 核心使用這些組件進行導航和尋址數據輸入字段。在這種情況下，它們是公共層次結構的一部分，我們不感興趣。

TfrxCustomDataSet是派生自TDataSet. 從此類繼承的組件是“Query”、“Table”和“StoredProc”克隆。事實上，這個類將TDataSet.

  TfrxCustomDataset = class(TfrxDBDataSet)
  protected
    procedure SetMaster(const Value: TDataSource); virtual;
    procedure SetMasterFields(const Value: String); virtual;
  public
    property DataSet: TDataSet;
    property Fields: TFields readonly;
    property MasterFields: String;
    property Active: Boolean;
  published
    property Filter: String;
    property Filtered: Boolean;
    property Master: TfrxDBDataSet;
  end;

• DataSet是指向埋藏對象TDataSet類型的鏈接；
• Fields 是指向 DataSet.Fields 的鏈接；
• Active - 數據集是否處于活動狀態；
• Filter - 過濾表達式；
• Filtered – 過濾是否處于活動狀態；
• Master 是指向主從關系中的主數據集的鏈接。
• MasterFields是字段列表，如 field1=field2。用于主從關系。

  TfrxCustomTable = class(TfrxCustomDataset)
  protected
    function GetIndexFieldNames: String; virtual;
    function GetIndexName: String; virtual;
    function GetTableName: String; virtual;
    procedure SetIndexFieldNames(const Value: String); virtual;
    procedure SetIndexName(const Value: String); virtual;
    procedure SetTableName(const Value: String); virtual;
  published
    property MasterFields;
    property TableName: String read GetTableName write SetTableName;
    property IndexName: String read GetIndexName write SetIndexName;
    property IndexFieldNames: String read GetIndexFieldNames write SetIndexFieldNames;
  end;

• TableName – 表名；
• IndexName – 索引名稱；
• IndexFieldNames – 索引字段名稱。

TfrxCustomQuery是“查詢”類型的數據庫組件的基本類。此類是查詢類型組件的封面。

  TfrxCustomQuery = class(TfrxCustomDataset)
  protected
    procedure SetSQL(Value: TStrings); virtual; abstract;
    function GetSQL: TStrings; virtual; abstract;
  public
    procedure UpdateParams; virtual; abstract;
  published
    property Params: TfrxParams;
    property SQL: TStrings;
  end;

• SetSQL是設置SQL“查詢”類型的組件屬性；
• GetSQL是獲取SQL“Query”類型的組件屬性；
• UpdateParams是將參數值復制到 Query 類型的組件中。如果查詢組件參數是TParams類型，則通過frxParamsToTParams標準程序執行復制。

圍繞我們將建立包裝IBX組件TIBDatabase，TIBTable和TIBQuery。因此，我們的組件將被命名為TfrxIBXDatabase、TfrxIBXTable和TfrxIBXQuery。

如果您對 FastReport 感興趣，歡迎加入 FastReport QQ 交流群：702295239

還想要更多嗎？您可以點擊閱讀【FastReport報表2021最新資源盤點】，查找需要的教程資源。上是FastReport .NET慧正在網火熱銷售中!>>查看價格詳情