delphi7使用QuickReport快速生成报表
QuickReport报表组件是Delphi7之前版本广泛使用的数据库报表设计工具组件,
在Delphi7版本中默认没有加载在Delphi7的工具栏上。因此,需要手动安装加载一下,安装QReport组件插件步骤如下:
①在Delphi7中执行菜单[Component]==>[Install Packages...];
②点击按钮[Add...],出现‘Add Design Package’文件打开对话框;
③选择‘Borland\Delphi7\Bin’目录下的‘dclqrt70.bpl’文件,打开;
完成组件安装。
以下记录使用QReport设计开发简单的数据库报表程序,数据采用本地安装的SQLSERVER,使用ADO组件连接数据库,
一,在Delphi7中新建一个Application;
二,在Form1中设计组件:
1,放置TADOConnection、TADODataSet、TDataSource数据连接组件,再放置TGroupBox和TDBGrid组件便于观察对比表数据,再放置几个按钮,如图:
,
2,设置TADOConnection的ConnectionString属性,这里点击[Build...]按钮选择‘Microsoft OLE DB Provider for SQL Server’,设置好连接参数,并测试成功;
3,设置TADODataSet的Connection属性,CommandType为cmdTable,CommandText为测试表Products;
4,设置TDataSource的DataSet属性为已设置的ADODataSet组件;
5,设置TDBGrid组件的DataSource属性为已设置的DataSource组件;
三,新建一个Form2加入项目,在form2中设计报表:
1,在QReport组件标签下,找到QuickRep组件,在Form2上新建QuickRep对象:
设置QuickRep对象的Bands属性的分属性(依需要)HasTile、HasColumnHeader、HasDetail......的值为True(对应不同的TQRBand),其DataSet属性设为已设置的ADODataSet;
在的Tile、ColumnHeader等Band中放置报表需要的字段名称TQRLabel对象;
在Detail对象Band中放置QRDBText对象,并设置好DataSet、DataField属性;
在PageFooter的Band中放置QRExpr对象,设置好Expression属性;
2,按需要在form2中加入TQRCSVFilter、TQRHTMLFilter以便可以在预览报表中可以导出CSV、HTML格式文件;
四,在fomr1、form2中相互引入单元文件,form1中完成按钮事件的动作
form2.QuickRep1.Preview;
展现报表效果: