学士学位毕业设计(论文)课件

1、学士学位毕业设计（论文）药品管理系统应用程序 学生姓名：李丙吉 指导教师：张方舟 所在学院：成人教育学院 专 业：计算机 中国大庆 2008 年 12月摘 要随着科技的飞速发展，技术不断进步，电子计算机已经逐渐进入了千家万户。然而现在家庭里对计算机的应用却不够普及，很少有适合普通家庭应用的软件程序。本系统针对这一现象，专门为普通家庭设计出一套适合日常使用的财务管理系统。由于普通家庭所使用的计算机种类千差万别，为了使系统能够适应大众的需求，本系统后台数据库采用桌面型数据库Microsoft Access2000，前台程序采用Borland Delphi7开发。通过本系统可以实现家庭收支的统计，月

2、末的财务结算以及借贷情况的监测。本程序设计力求节减，贴近日常生活的使用，令家庭帐目清晰易见，让人一目了然。关键词： 家庭；财务管理系统 ；Borland Delphi7 Microsoft Access2000ABSTRACTTurn along with the national information developments fly to develop soon, guiding advanced technical and each university to also accelerate the information of the oneself turn with autom

3、ate developments, managing the teaching in droves, information management etc. is every kind of to transact the system leads into the daily pursuit, this time should effective demand, just for the campus hospital designs a set of then enter the sale saves for the main management software campus hosp

4、itals manage system.In consideration of the actual hardware term of the current campus hospital and the function that realizes, this system backstage database adoption tables top type database Microsoft Access2000, stage procedure adoption Borland Delphi7 development. Passing this system can realize

5、 an operation for storing in warehouse management, pharmacy sale management etc., this procedure designing tightly sticking actual need, nearly measuring reducing operating personnel step of drugs, try hard for simple, reduced obviously campus hospital drugs manage the workload of the aspect, making

6、 drugs the management becomes a relaxed work.Keywords: The teaching management system;Transacts the system;Desktop Database 目 录1 导言11.1 药品管理系统的作用及发展现状11.2 应用背景11.3 本章小结12 所用工具简介.22.1 Microsoft Access2000简介.22.2 Borland Delphi7简介22.3 本章小结33 关键技术介绍.43.1 用Delphi创建数据库应用程序43.2 事务管理63.3 DataSnap技术.63.4 MD

7、I窗体73.5 Rave介绍.73.6 INI文件.83.7 本章小结84 系统分析与概要设计.94.1 系统功能分析94.2 系统功能模块设计94.3 数据库需求分析104.4 数据库概念结构设计104.5 数据库逻辑结构设计124.6 创建应用程序154.7 本章小结28参考文献.29致谢.301 导言1.1 家庭财务管理系统的作用及发展现状 药品管理系统是 在传统的校医院管理系统中，库存管理的内容就是货物入库、出库和库存管理，它是货物管理的中间环节。用数据描述货物的收入、发出和储存状态，实际反映了货物在企业内流动的客观过程，仓库管理与货物管理的其他环节，一方面，仓库管理受计划管理和财务管

8、理的控制和监督。入库的品种规格数量和出库的品种规格数量由货物配送计划所规定；实际发出的入库、出库需接受财务监督，所有的原始单据和台账都必须经过财务人员的稽核；库存的品种规格数量受备货定额、周转储备定额以及储备资金定额的限制。另一方面，它又反作用于计划管理和财务管理。它实际反映了货物计划的完成情况和储备资金的执行情况；向计划管理提供当前库存数据，作为编制配送申请计划和采购计划时核算缺口或超储的原始数据项之一；向财务管理提供编制记账凭证的入库、出库原始数据，以进行材料核算。向统计分析提供进、销、存数据，所得出的货物流转统计数据，反过来又影响发货定额、备货定额、储备资金的制定。 经过对校医院的实际工

9、作情况的调查，本系统应该实现药品的入库、出库和库存管理，原始单据（入库单和出库单）管理，药房药品接收、开药等管理功能，还有打印，数据库备份等其它功能。 通过使用本系统，可以取代以前的手写记录，人工查库，实现了处方单的自动打印功能，从而有效的提高了校医院的工作效率。1.2 应用背景 经过对校医室的实际工作情况的调查，本系统应该实现药品的入库、出库和库存管理，原始单据（入库单和出库单）管理，药房药品接收、开药等管理功能，还有打印，数据库备份等其它功能。 通过使用本系统，可以取代以前的手写记录，人工查库，实现了处方单的自动打印功能，从而有效的提高了校医室的工作效率1.3 本章小结 本章主要是对现阶段

10、的校医院各管理职能做个大概的描述，说明现在比较需要一个管理功能更多、操作更简便的管理系统来为我们服务，让人们享受更好的服务 。 2 所用工具简介2.1 Microsoft Access2000简介 Access是Office办公套件中一个极为重要的组成部分。刚开始时微软公司是将Access单独作为一个产品进行销售的，后来微软发现如果将Access捆绑在Office中一起发售，将带来更加可观的利润，于是第一次将Access捆绑到OFFICE97中，成为OFFICE套件中的一个重要成员。现在它已经成为Office办公套件中不可缺少的部件了。自从1992年开始销售以来，Access 已经卖出了超过6

11、000万份，现在它已经成为世界上最流行的桌面数据库管理系统。 后来微软公司通过大量地改进，将Access的新版本功能变得更加强大。不管是处理公司的客户订单数据；管理自己的个人通讯录；还是大量科研数据的记录和处理，人们都可以利用它来解决大量数据的管理工作。 你也许要问，Access的功能这么强，那使用起来会不会很麻烦呢？这一点你可以放心，随着版本的升级，Access的使用也变得越来越容易。过去很繁琐的工作现在只需几个很简单的步骤就可以高质量地完成了。2.2 Borland Delphi7简介 Delphi是著名的Borland（现在已和Inprise合并）公司开发的可视化软件开发工具。“真正的程

12、序员用C，聪明的程序员用Delphi”，这句话是对Delphi最经典、最实在的描述。Delphi被称为第四代编程语言，它具有简单、高效、功能强大的特点。和VC相比，Delphi更简单、更易于掌握，而在功能上却丝毫不逊色；和VB相比，Delphi则功能更强大、更实用。可以说Delphi同时兼备了VC功能强大和VB简单易学的特点。它一直是程序员至爱的编程工具。 2.3 本章小结 本章主要针对此次管理系统设计所应用到的主要工具Microsoft Access2000和Borland Delphi7做以简单介绍，可以使没有接触过的读者也可以对过这两个工具有个大概的了解，方便以后对此系统深层次的了解和使

13、用。 3 关键技术介绍 在系统开发中主要是应用到数据库的连接、事务管理、DataSnap技术、MDI窗体、Rave报表组件、INI文件等关键技术。3.1 用Delphi创建数据库应用程序 指导你通过一个INTERBASE数据库应用程序的创建，来查看和更新数据库样本。你将使用DELPHI IDE来创建数据库应用程序。3.1.1 数据库结构的概述 应用程序的结构起初看起来是复杂的，但是复合组件简化了实际数据库应用程序的发展和维持。数据库应用程序包括3部分：用户界面，一组数据库访问组件，和数据库。在这篇文章中，你创建一个DBEXPRESS数据库应用程序。其他的应用程序都有相同的结构。用户界面包括数据

14、访问组件例如网格以便用户能够编辑和更新数据到数据库中。数据访问组件包括数据源，客户端数据集，数据提供者，一个单向数据集，和一个连接数据集。数据源扮演一个用户界面到客户端的连接者。客户端数据集应用程序的核心，因为它包含一组从底层数库来的记录集。提供者在客户端数据集和单向数据集之间转化数据，其中这些数据直接取自数据库。最后，连接组件创建一个连接到数据库。每一个单向数据集使用一个不同类型的连接组件。3.1.2 设置数据库访问组件 数据访问组件是连接数据集到你应用程序的其他部分的组件。每一个数据访问组件指向下一个低层的组件。例如，数据源指向客户端数据集，客户端数据集指向提供者如此等等。当你建立一个数据

15、访问组件时，你首先要添加最底层的组件。接下来，添加组件来创建数据库连接，单向数据集，提供者，客户端数据集，和数据源。然后，你将为应用程序创建用户界面。这些组件是放在组件板中的DBEXPRES页，数据访问页，数据控制页里。 将你的用户界面和数据源组件隔离在不同的窗体上是一个好主意。但是，为了简单化，你可以将用户界面和所有的组件放在同一个窗体中。3.1.3 ADO技术简介 ActiveX Data Objects (ADO) 是微软最新的数据访问技术，是Microsoft发展的基于 COM的数据访问规则API访问的OLE DB技术。它被设计用来同新的数据访问层OLE DB Provider一起协同

16、工作，以提供通用数据访问（Universal Data Access）。OLE DB是一个低层的数据访问接口，用它可以访问各种数据源，包括传统的关系型数据库，以及电子邮件系统及自定义的商业对象。如果多个ADO组件需要共享一个连接，则要用TADOConnection组件来连接数据库，然后，这些ADO组件通过他们的Connection属性来指定这个TADOConnection组件。 组件面板的数据访问页（Data Access）提供用于连接数据源的组件。数据控制页（Data Controls）中的数据可视化组件用于从数据库获得数据或送数据到数据库。ADO页的组件使用ActiveXData Obje

17、cts技术通过OLE DB访问数据库信息。InterBase页的组件用于直接访问InterBase数据库。 ADO向我们提供了一个熟悉的，高层的对OLE DB的Automation封装接口。对那些熟悉RDO的程序员来说，你可以把OLE DB比作是ODBC驱动程序。如同RDO对象是ODBC驱动程序接口一样，ADO对象是OLE DB的接口；如同不同的数据库系统需要它们自己的ODBC驱动程序一样，不同的数据源要求它们自己的OLE DB提供者（OLE DB provider）。目前，虽然OLE DB提供者比较少，但微软正积极推广该技术，并打算用OLE DB取代ODBC。3.1.4 建立数据库连接 DB

18、EXPRESS页上有一组快速访问SQL数据库服务器的组件。为了连接数据库，你需要增加一个连接组件。使用的连接组件的类型依赖于所使用的数据集组件。在这节课上，你将使用TSQLCONNECTION和TSQLDATASET组件。添加一个DBEXPRESS连接组件：确定INTERBASE服务器已经启动以便你可以连接到这节课所使用的雇员数据库中。更多的关于启动服务器，可以查看INTERBASE操作向导。 在组件板上点击DBEXPRESS页，并双击TSQLCONNECTION组件来将它定位到窗体中。为了找到TSQLCONNECTION组件，将光标指向模板一会儿，帮助提示就会显示组件的名字。组件的默认名字为

19、TSQLCONNCERION1。这个组件是不可见的，所以不管你将它放在窗体的什么位置都是没有关系的。但在这里，我们一致将全部的不可见组件放在窗体的顶部。为了显示组件的标题，你把焦点定位在一个窗体上，选择 工具|环境选项|设计,并点击显示组件标题。3.2 事务管理 事务管理(Transaction Management)是目前所有数据库软件都必须支持的重要功能之一。原本事务管理只出现在较大型的关系型数据库中，但是现在事务管理功能也被大多数基于文件的数据库支持。 数据库提供的事务管理必须提供四个最基本的功能，那就是：Atomic(原子性)：事务管理必须完全执行，或是完全不被执行。Consisten

20、t(一致性)：事务管理会维护数据库的内部一致性。Isolated(隔离性)：事务管理可保证数据库中似乎只有目前的事务在执行，而没有其他事务。Durable(持久性)：事务管理的执行结果即使是在数据库发生错误时也不会遗失。 3.3 DataSnap技术 DataSnap以前的名字是MIDAS，DataSnap不但强化了MIDAS原有的功能，更加入了许多新的组件，让程序员可以使用它开发出功能更为强大的应用系统。此外，DataSnap也改善了MIDAS的执行效率，让使用它的应用程序能够执行得更快速。DataSnap的核心技术在两个组件中，TDatasetProducer和TClientDataSet

21、。Connection组件这些组件所对应的数据模块，提供的是数据包引入的媒介。在Delphi帮助文件里，“Deploying multi-tiered database applications (DataSnap)”主题下是这样介绍的，DataSnap provides multi-tier database capability to Delphi applications by allowing client applications to connect to providers in an application server.（通过让客户端程序连接到运行在外部应用服务器中的prov

22、ider，DataSnap提供Delphi程序员创建多层数据库应用的能力。） Delphis support for developing multi-tiered applications is an extension of the way client datasets communicates with a provider component using transportable data packets. Once you understand how to create and manage a three-tiered application, you can create

23、and add additional service layers based on your needs.“ （Delphi对多层应用开发的支持是通过扩展客户端dataset和服务器端provider组件的数据包通讯技术而来的，当你懂了如何创建和管理一个三层应用，就可以根据需要创建、附加额外的服务了）理解基于Provider的多层应用在Delphi组件面板的DataSnap页和DataAccess页里的组件都是支持多层应用的，还有一个向导（在New Items对话框Multitier页上）用于创建远程数据模块。多层应用是在provider组件打包数据为可传输数据包和根据从客户端返回的delt

24、a包中携带的数据更新请求来刷新数据这两个功能的基础上形成的。 DataSnap协议有多种connection组件可以连接一个客户端dataset到应用服务器。他们都是TCustomRemoteServer的子类，根据所使用的通信协议不同（DCOM, CORBA, TCP/IP, HTTP, 或SOAP）而不同。 Connection组件用于和应用服务器之间建立连接，并且返回IAppServer接口给客户端dataset来调用provider。 这一节是我们讨论DataSnap应用中设计准则的开始。对于多层应用，我们首先要考虑用于做RPC（远程过程调用）的低层技术。RPC是业界术语，指的是从远程

25、调用过程或方法的技术。3.4 MDI窗体 在MDI应用程序中，可以同时显示多个文档，每个文档显示在自己的窗口中。文档窗口包含在父窗口内，父窗口为应用程序中的所有文档窗口提供操作空间。例如，在Word中，可以建立和显示多个不同类型的文档窗口，每个窗口被限制在Word父窗口的区域内。也就是说，一个MDI应用程序可以含有三类窗体，即普通窗体(也称标准窗体)、MDI父窗体和MDI子窗体，通常把MDI父窗体简称为父窗体或MDI窗体，而把MDI子窗体简称为子窗体。 3.5 Rave介绍 Rave报表组件已经在Delphi7中被默认的安装了。使用过报表组件的开发人员都知道，如果一个好的报表组件就必须具备以下

26、几个特点。简单易用模块化强有供开发人员和用户使用的报表设计器可以与应用程序高度集成具备优秀的数据库连接能力 而我们已经知道的报表组件QuickReport、FastReport、ReportBuilder都具备了这样的几个特点，那么Rave又是怎样支持这样的几个特点的呢？如果想了解这些内容，那么就必须进行深入的使用才可以让我们充分的体会到Rave强大的功能。3.6 INI文件 INI文件在系统配置及应用程序参数保存与设置方面，具有很重要的作用，所以可视化的编程一族，如VB、VC、VFP、Delphi等都提供了读写INI文件的方法，其中Delphi中操作INI文件，最为简洁，这是因为Delphi

27、3提供了一个TInifile类，使我们可以非常灵活的处理INI文件。 有必要了解INI文件的结构： 注释 小节名 关键字=值 INI文件允许有多个小节，每个小节又允许有多个关键字， “=”后面是该关键字的值。值的类型有三种：字符串、整型数值和布尔值。其中字符串存贮在INI文件中时没有引号，布尔真值用1表示，布尔假值用0表示。注释以分号“;”开头。3.7 本章小结 本章主要是对管理系统中所应用到的关键技术做以介绍，其中主要用到数据库的连接、事务管理、DataSnap技术、MDI窗体、Rave介绍、INI文件等关键技术。其中对于数据库的连接是最为基础的，主要用到Delphi中ADO控件连接到Acc

28、ess数据库中。4 系统分析与概要设计 系统开发的总体任务是实现家庭财务管理的系统化、规范化、和自动化，从而达到家庭财务管理效率的目的。4.1 系统功能分析本系统中的药品管理系统需要完成的功能主要有以下几点：药品管理各种信息的输入，包括收支、借贷、还款的输入等。药品管理各种信息的查询、修改和维护。报表的生成。用户管理功能。月末总结功能。借贷情况添加功能。图3 药品入库ER图图5 药品出库ER图图7 药房库存ER图4.5 数据库逻辑结构设计在上面的实体以及实体之间的关系的基础，形成数据库中的表格和各个表格之间的关系。表1 病例表 Case字段名称数据类型说明Id自动编号主关键字text文本字段名

29、称数据类型说明药品ID药品拼码药品名称规格产地单位适应症主要成份用法用量自动编号文本文本文本文本文本文本文本文本主关键字表2 药品字典表 DRUG_Base字段名称数据类型说明药品ID药品拼码药品名称数量单位有效期进价数字文本文本数字文本日期/时间货币主关键字主关键字主关键字表3 药房库存表 DRUG_Front表4 药库库存表 DRUG_STORAGE字段名称数据类型说明药品ID药品拼码药品名称数量入库日期有效期进价总价数字文本文本数字日期/时间日期/时间货币货币主关键字主关键字主关键字表5 入库单表 IN_STORAGE字段名称数据类型说明入库单号药品ID药品拼码药品名称入库数量入库日期有

30、效期进价金额剩余数量操作员自动编号数字文本文本数字日期/时间日期/时间货币货币数字文本主关键字主关键字主关键字主关键字表6 出库单表 OUT_STORAGE字段名称数据类型说明出库单号药品ID药品拼码药品名称出库数量剩余数量有效期出库日期进价操作员单位自动编号数字文本文本数字数字日期/时间日期/时间货币文本文本主关键字主关键字主关键字主关键字表7 开药表 SellList字段名称数据类型说明SellDate药品ID药品名称操作员数量单价日期/时间数字文本文本数字货币主关键字主关键字表8 药品接收表 Send_Drug字段名称数据类型说明药品ID药品拼码药品名称数量有效期进价单位数字文本文本数字

31、日期/时间货币文本主关键字主关键字主关键字表9 用户表 USER字段名称数据类型说明IDNAMEPWDTYPEREMARK文本文本文本文本文本主关键字4.6 创建应用程序本系统有四个程序构成。创建的过程是一样的：启动Delphi7，依次点击FileNewApplication，来创建出应用程序。四个应用程序分别为：系统登陆、药房管理、药库管理、用户管理。4.6.1 系统登陆实现的功能：系统启动后，根据用户所输入的密码，进入不同的界面。本系统有四种用户类型，“超级管理员”、“药房管理员”、“药库管理员”、“GUEST”。图9 系统登陆图10 选择管理本程序有一个Data Module容器，其中有

32、一个ADOConnection，及两个ADOQuery组件，用来完成初使化下拉列表及登陆验证。在程序开始时检查是否带有参数(用户名及密码)，如果有，则直接用参数进入程序，如果没有，则请用户输入。本程序名为“Pro_Logon.exe”。假如系统中有一个类型为“超级管理员的”的用户ID为“sa”，密码“1234”。除了运行程序让用户输入密码外，也可以用如下形式进入本程的图10画面：Pro_Logon.exe sa 1234启动有参数是否进入程序界面提示用户名密码出错密码正确否以该用户身份进入程序图11 程序启动过程流程图当进入程序后，程序会根据用户身分判断应该调用的下一个程序，其中有：药房管理（

33、YaoFang.exe）、药库管理（YaoKu.exe）、用户管理（YongHu.exe）。调用时，本程序将用户名仍以参数方式传给下一个程序。调用函数如下：以调用药房为例procedure TForm_select.Btn_YaoFangClick(Sender: TObject);var s:string;begin s:=yaofang.exe +Form_Logon.ID+ +Form_Logon.Pwd; WinExec(Pchar(s),0); Application.Terminate;end;4.6.2 用户管理本程序进入时会先检查用户身分是否为超级管理员，如果不是则提醒用户出错

34、。本程序可以实现用户的添加、删除及修改等。当用户退出时，在窗体的OnClose事件中加入了下列代码调用系统登陆程序（Pro_Logon.exe）：procedure TForm_User.FormClose(Sender: TObject; var Action: TCloseAction);var s:string;begin s:=Pro_Logon.exe +UserID+ +UserPwd; WinExec(PChar(s),0);end;4.6.3 药房管理本程序界面如图所示，其中包括日常模块、库存模块、病例模块、加价率模块。其中日常模块包括诊断、开药、退药三个页面。图14 日常诊断

35、模块图15 日常开药模块图16 日常退药模块以上三个页面都在一个子窗体中，本程序中其它模块也都是子窗体，是在运行中动态创建的，其中函数在附录中给出。此处只给出调用范例：OpenChildForm(TForm_RC,Form_RC, Self);在窗体的OnClose事件中加入内存释放语句：Action:=caFree; 图17 库存管理模块本块可以实现库存查询，及打印。图18 添加病例模块本模块可以实现常用病例的插入，修改及删除。可以提高操作员的工作效率。本模块用于设置药品的加价率。可以使价格随时变化。此外，本程序还有一个“接收药品”功能，用来接收药库出库的药品。如果发现药房库存中有相同药品，

36、则数量相加，否则向药房库存中插入该药品。图19 加价率模块4.6.4 药库管理图20 药库管理模块本程序包括入库管理、出库管理、库存管理、药品字典等模块。本程序启动时同样用户身份以实现不同功能。其中入库管理模块包括入库单的录入、入库单的删除及其查询。操作员可以反复添加想要入库的药品、最后点击保存来完成药品的入库。同时系统自动将入库单保存进入库单表，由于此处对为两个表进行操作，所在用到了事务。当点击保存时，建立事务，然后对两个表操作，如果成功则确定，否则回滚事务。利用此功能可以保证数据的一致性。入库管理页面如下面三个图片。图21 入库单录入页面图22 入库单修改页面药品入库单查询可以按多种方式查

37、询，如果不输入查询内容，则查询全部药品。 图23 入库单查询页面药品出库过程和入库过程是一样了。这里不在赘述。库存管理模块可以实现库存查询及库存的初使化，界面如下：图24 库存查询页面当以药品名称及数量查询时，可以按“合并同类药品”方式查询，此方式可以显示药品名相同的数量之和。下图为库存修改页面，主要实现库存的初使化功能。一般只在第一次使用本系统时才用到此页面的功能。图25 库存修改页面本程序还有一个“警报设定”功能，其页面如下：图26 警报设置页面此页面用来设定药品的过期警报及数量警报，当启动时本程序会自动提醒操作员是否有药品过期或库存过低。4.6.5数据备份本程序用来备份，其程序界面如下：

38、图27 数据备份模块左侧有两个选项：“数据备份”和“数据恢复”，选“数据备份”后，在右边选择将要备份到的文件名，然后点击“开始备份”。恢复方法是一样的，这里不再赘述。本程序以读INI文件的方式找到源数据库的位置，然后作为源文件复制到要备份的地方。其读写INI文件的代码如下：procedure Tbuckup_Form.FormShow(Sender: TObject);var L_DB:tinifile;begin L_DB:=tinifile.Create(.Mams.ini); L_ss:=L_DB.ReadString(Dbinfo,position,aaainfirmary.mdb);

39、 L_DB.Destroy; l_ss:=ExpandFileName(l_ss);end;复制文件时用到一个自编的函数，在附录中给出，本处只给出调用的方式：copyfa(l_ss,f1);其中第一个参数为源文件，第二个参数为目标文件。报表的创建：在Delphi7中，报表是用一个新的工具实现的，他就是Rave，版本号为5.0，他有十分强大的功能，在此，我将演示本系统中的报表是如何完成的。启动报表设计器使用Delphi 集成开发环境下的菜单项选项，如下图所示：图28 报表设计器菜单项选项界面如果此时你的计算机系统足够快的话，不用几秒钟，你一定会看到Rave的报表设计器界面：进入本页后，先进行打印

40、页面的设置，然后在上面对面工具栏中点击要添加的项目，最后界面如下图所示：图30 报表生成最终界面当然，本系统中的所有报表都是动态的，可以从数据集中得到应该得到的数据，并显示出来，这必须在报表中添加一个数据集链接。图31 报表中添加数据集链接在此处必须注意，如果后台数据库中的字段为中文，那么必须在Delphi7的数据集的参数设置字段中把所有字段对应没英文的，这样才可以在Rave的“Direct Data View”中正确的显示出全部字段。首先将Rave中所有的数据组件的DataView属性的值都设置为DataView1，然后再根据要显示的不同字段，选择不同的DataField值。这样一个报表就生

41、成了。不过要想调用这个报表，还需要在Delphi中加入几个组件，它们分别是RvDataSetConnection、RvProject、RvSystem。其中RvDataSetConnection用来给我们设计的报表提供一个数据链接，让报表得以显示数据，而RvSystem1是用来设定执行打印时的一些选项，在本系统中，我只用到了TitlePreview、TitleSetup及FormState，其中第一个用来设置打印预览的标题，第二个用来设是执行时对话窗体的标题，第三个是设定打印预览的窗体为最大化。将这些都设定好后。将RvProject的Engine属性设置为RvSystem，这样在调用打印时就可以看到效果了。在打印按钮的程序段中加入调用程序。 if DM.DS_KaiYao_RC.Active=true then begin rv_KaiYao_RC.SetParam(caozuoyuan,Form_Main.UserName); rv_KaiYao_RC.SetParam(sum,label_Sum_RC2.Caption); rv_KaiYao_RC.ExecuteR