现代数据库技术.doc

第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术江西财经大学信息管理学院2007江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术13.1 Delphi7报表组件概述13.2 R ave R eports报表相关组件13.3 -个简单的报表设计13.4TeeChart图表制作13.5图表编程实例木章小结江西财经人学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术13」Delphi 7报表组件概述统计与报表技术是数据库程序中不可缺少的部分通过统计和报表，企 业相关人员可以对企业数据一F1 了然，帮助决策者制定企业发展规划Q uickReport^Qusoft公司开发的一组制作报表的工具，Delphi7Z前 一直使用Quick report 3.0D elphi7控件板中取消了Quick report 3.0,取而代之的是Nevrona公司 的Rave Reports,在Tools功能表中有Rave Designer 5.0R ave R eports是-一个基于组件的可视化报表设计工具，报表功能包括： 翻转文字注释、全图示显示、版而调整、页而精确定位、打印配置、字 体控制、打印预览、可重复利用的报表内容和对PDF、HTML、RTF和 tex t报表的显示支持。

DeW 7控件板中節卜酥谱趣急淼淖櫃 鞘荘chart组件和TDBChart组件，分别位于Additional面板和Data Controls面板上 江西财经大学信息管理学院,2007 数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术13.2 Rave Reports报表相关组件Rave有自己的可视报表设计器，以自己的文件格式保存报表这 样报表独立于应用程序Z外，进行升级和通过网络进行更新Rave数据由应用程序提供，其数据由TADOTable、TADOQuery 和TADODataSet组件从数据库中检索出来1) D ata conne ction 组件包括：①TRvCustomConnection:用來访问内存数组和二进制记录文件这样的非数据库数据§)TRvDataSetConnection:用来访问TADODataSet派生的组件 包括第三方数据组件©TrvTableConnection：仅用于BDE控件而板上的TTable组件或他们的各个派生组件©TrvQueryConnection：仅用于BDE控件面板上的TQuery组件或他们的各个派生组件。

江西财经人学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术(2) TRvProject 组件TRvPmjec吮许创建、修改、打印和设计报表项FI属性如下：©Engine:指定相应报表生成的Pl的地一般情况下，是RvSysterrio%1 LoadDesigner:允许用户调用报表设计器值为true,表示可以调用；©ProjectFile (.RAV file)：相应报表项H文件，指定详细H录路径报表项H文件 用来储存R“ve visual designer111的报表定义它是二进制文件主要的方法：①Open方法：RvProject l.Open;打开相应的报表以供操作1 Close方法：RvProject 1.Close;关闭一个报表的操作1 Execute方法：RvProject 1 .Execute;打印选择的相应报表文件， ©ExecuteReport方法：RvProject I .ExecuteReport(ReportName:String); ReportName是相应的报表的名称3) TRvSystem组件打印或者预览报表时，进行打印参数设置，使用时与RvProject结合。

展性如下：%1 RvSystem 1 .SystemPrinter.Orientation :=poLandScape; 〃页面为横向的%1 RvSystem 1 .SystemPreview.FormState := wsMaximized; 〃预览窗体最大化%1 RvSystemI .SystemPreview.MarginPercent :=3; 〃报表页面据预览窗体的边距 TitleSetup> TitleStatus和TitlePreview属性可以将报表设置和预览的窗体的标题改为 所想要的江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术(3) TRvSystem组件打印或者预览报表时，进行打印参数设置，使用时与RvProject结合展性如下：©RvSystem 1 .SystemPrinter.Orientation :=poLandScape; //!z(面为横向的©RvSystem 1 .SystemPreview.FormState := wsMaximized; 〃预览窗体最大化%1 RvSysteml.SystemPreview.MarginPercent :=3; //报表页而据预览窗体的边距TitleSetup> TitleStatus和TitlePreview属性可以将报表设置和预览的窗体的标题改为所想要的。

⑷ Reports一个Rave报表由报表页而和储存在这些页而的可视报表组件组成Rave Designer集成开发环境的界面(5) Global Pages存储在报表项H的Global Pages分类中，它们对所有报表都是可见的 Global Pages对于储存模板用于其他报表页面非常有用江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术报表开发技术(6) Data ViewsData Views给提供数据连接组件提供一个接口当创建新的Data Views吋，必须有活动的数据Data Views让数据连 接组件去检索元数据(meta■血⑸信息，如字段名，数据类型等字段 组件包含在每个Data Views'P，可用来设置每个数据列的属性7) RvSystem打印或者预览报表时，进行打印参数设置的使用时与RvProject结 合主要包括如下属性：©DefaultDest:指定打印的方式%1 rdPreview：预览%1 rdFile：文件%1 rdPrinter：打印机%1 RuleiType：相应的标尺单位江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术报表开发技术13.3 一个简单的报表设计设计一个报表，用于显示员工的基本信息，实现步骤如下：(1)新建一个工程，保存表单Form 1文件为Report.pas,工程文件为PrjReport.dpro⑵设计表单Form I,其相应属性江四财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术(3)设计表单界面其中：TADOConnection: name^JadoConnectionT ADOQuery: name 为 aqryEmpl oyeeT ADOQuery: connection 为 adoConnectionTADOQuery: SQL属性为:江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术selectEmployeeNo,EniployeeName,DepartmentNanie,sex,EmployeeDafrom Employee a,Department bwhere a.DepartmentNo=b.DepartmentNoTdataSource： name^jdsEmployeeTdataSource： DataSet ^jadoConnectionTDBGrid： name 为 dbgEmployeeTDBGrid： DataSource 为 dsEmployee查询按钮TButton： name为btnSearch 预览按钮TButton： name为btnView 条件输入框TEdit： name为edtSearch⑷ 编写frmReport 1表单的onShow事件，用于建立数据库的连接，检索 所有员工的信息。

编写frmReport 1表单的onClose事件，用于断开数据库的连接，释放 资源5)编写btnSearch按钮的onClick事件，用于根据条件从数据库中检索 数据江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术报表开发技术⑹选择Rave页丄的RvProject选项在窗体中添加一个RvProject,设置projectfile属性为myRave l.rav0 myRavel.ra v为报表文件7) 选择Rave页丄的TRvDataSetConnection选项在窗体中添加一个TrvDataConnection,设置dataset属性为要连接的 aqryEmployeeo(8) 选择预览按钮，编写该按钮的onClick事件9) 设计报表文件myRavel.ravo(10) 设计完后关闭R“ve集成开发环境，回到简单报表设计界面，运行该表单 单击预览按钮，岀现江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术选择“Preview”后，按“OK?按钮出现最后出现下图，该界面显示的是aqryEmployee组件中检索出來的数据。

江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术13.4 TeeChart图表制作TeeChart的主类是TCharto使用了56个类、325个属性、125个方法 以及28个事件，这里仅介绍其中一些重要类的属性和方法1） TChart.Height：图表的高度（像素）⑵TChart.Width：图表的宽度（像素）⑶ TChart.Header：图表的题头（Ititles类）（4） TChart.Series：序列（Series类的数组）Series是要显示的数据的主体在一个图表中可以有一个或多个序 列，每个序列可以有不同的显示类型如Line、Bar. Pie等等5） TChart.Axes：坐标轴（Iaxes类）Axes控制图表坐标轴的属性，在缺省情况下，坐标轴可以自动地根 据不同的数据设置好标度范围和间隔，也可以手工调整江西财经大学信息管理学院,2007数据库系统及应用第第13 13章章Delphi7 Delphi7报表开发技术 报表开发技术13.4.1 TeeChar 使用初步TeeChart组件共有四个：TChar控件,位于Additional组件页中，是最基本的核心控件；TDBChail控件，位于D。