彩票走势图

FastReport VCL报表开发人员手册:自定义数据库引擎编写

翻译|使用教程|编辑:杨鹏连|2021-07-12 09:39:34.660|阅读 161 次

概述:FastReport 提供了 ADO、BDE、IBX、DBX、FIB 引擎。您可以创建自己的引擎,然后将其连接到 FastReport。

# 慧都年终大促·界面/图表报表/文档/IDE等千款热门软控件火热促销中 >>

相关链接:

FastReport VCL是用于 Delphi、C++ Builder、RAD Studio 和 Lazarus 的报告和文档创建 VCL 库。它提供了可视化模板设计器,可以访问 30 多种格式,并可以部署到云、网站、电子邮件和打印中。

立即点击下载FastReport VCL v6.9最新版

FastReport 不仅允许基于应用程序中定义的数据构建报告。您也可以直接在报告中定义自己的数据源(与数据库的连接、查询)。FastReport 提供了 ADO、BDE、IBX、DBX、FIB 引擎。您可以创建自己的引擎,然后将其连接到 FastReport。

下图显示了用于创建数据库引擎的类层次结构。新引擎组件以绿色突出显示。

FastReport VCL报表开发人员手册:自定义数据库引擎编写
如您所见,一组标准的数据库引擎组件包括数据库、表和查询。您可以创建所有这些组件或其中的一些组件(例如,许多 DB 没有 Table 类型的组件)。您还可以创建不包含在标准集中的组件(例如, StoredProc )。

让我们详细检查一下基本类。

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 – 连接参数。
从给定的类TDatabase继承了一个类型的组件。对于它的创建,有必要覆盖所有虚拟方法并将必要的属性放在 topublished 部分中。此外,还需要为您的组件添加特定的属性。

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– 表类型的数据库组件的基本类。类涵盖了 Table 类的组件。
  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 – 索引字段名称。
Table 类型的组件继承自该类。对于它的创建,有必要像往常一样定义所需的属性,数据库。也有必要覆盖来自TfrxCustomDataset,TfrxCustomTable类的虚拟方法。

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;
SQL和Params属性(对于所有 Query 组件都是通用的)在类中定义。由于不同的 Query 组件具有不同的参数实现(例如,TParams和TParameters),因此“Params”属性具有TfrxParams类型,并且是具体参数类型的包装器。
此类中定义了以下方法:
  • SetSQL是设置SQL“查询”类型的组件属性;
  • GetSQL是获取SQL“Query”类型的组件属性;
  • UpdateParams是将参数值复制到 Query 类型的组件中。如果查询组件参数是TParams类型,则通过frxParamsToTParams标准程序执行复制。
让我们使用 IBX 示例来说明数据库引擎的创建。完整的引擎原文可以在 SOURCE\IBX 目录中找到。下面是一些引自原文的引文和我们的评论。

围绕我们将建立包装IBX组件TIBDatabase,TIBTable和TIBQuery。因此,我们的组件将被命名为TfrxIBXDatabase、TfrxIBXTable和TfrxIBXQuery。

如果您对 FastReport 感兴趣,欢迎加入 FastReport QQ 交流群:702295239

还想要更多吗?您可以点击阅读【FastReport报表2021最新资源盘点】查找需要的教程资源。上是FastReport .NET慧正在网火热销售中!>>查看价格详情


标签:

本站文章除注明转载外,均为本站原创或翻译。欢迎任何形式的转载,但请务必注明出处、不得修改原文相关链接,如果存在内容上的异议请邮件反馈至chenjj@pclwef.cn

文章转载自:

为你推荐

  • 推荐视频
  • 推荐活动
  • 推荐产品
  • 推荐文章
  • 慧都慧问
扫码咨询


添加微信 立即咨询

电话咨询

客服热线
023-68661681

TOP