进销存管理系统:报告编制程序[3]

——本文摘自《Delphi数据库开发经典案例分析:定价、特价与购买> & gt()为了更好的说明QuickReport的使用，我们将从头开始重新设计，在一个报表中同时打印采购管理中采购单和采购单明细两个表的内容。

新建一个表单，保存为FormReport pas，加入项目在上面放置一个QuickRep控件并拖动到合适的位置，放置控件如图，其中两个QRSysData控件放置在页头带上，数据属性分别设置为Date和PageNumber在标题带上放置一个QRLabel控件，将标题设置为报表的标题；QRLabel控件和QRDBText控件放置在列标题带上，QRDBText的第一行指示以下数据内容。qrdbtext控件的第二行是下面明细带中明细数据的列名，qrdbtext控件的DataField属性分别设置为控件显示的字符。在明细栏中放置一个QRDBText以显示采购列表；在Summary Band中放一个QRExpr控件来计算总金额，并将其Expression属性设置为SUM(ADOQuery tax and price total)，这样我们就基本完成了收款报表的制作。右键单击报表，在弹出的快捷菜单中选择预览菜单项，可以直接查看打印预览结果。

图报表控件的布局

报表中的控件属性设置如下表所示。

表格报告表单中的其他控件列表

Lishi Xinzhi/Article/program/Delphi/201311/24936