用QReport组控件制作报表
QuickReport是Quick Soft Development公司专为Delphi设计的用于制作报表的工具。
Delphi 3中QReport组控件十分丰富，只要很好地利用这些控件就能制作出效果不错的报
表来。
1.建立一个报表
(1)首先我们在Form2上放置一TQuickRep控件，TQuickRep控件是建立一报表必不可少
的控件。可以改变该控件的属性设置，以使其外观符合要求。在缺省情况下，TQuickRep
控件的尺寸为放置在窗口上的尺寸，TQuickRep控件根据当前控件的尺寸来自动设置数据
区的范围。
改变TQuickRep控件外观最简单的方法是：在TQuickRep控件内单击鼠标右键，在弹出
菜单中选择Report Settings项来打开设置窗口。
(2)设置数据。把TQRBand控件放到TQuickRep控件上，并把BandType属性设为rbTitle，
缺省情况下Align属性是a1Top。然后把TQRLabel控件放到TQRBand控件上，修改它的
Caption属性，作为报表的标题。
(3)把数据放到报表上。首先再将一个TQRBand控件放到TQuickRep控件上，并把
BandTye 属性设为rbDetail，然后把一个TTable控件(名为Table1)放到From2上，设置
它的DataBaseam e属性和TableName属性，并把TTable控件的Active属性设为True。与
Delphi2不同的是，Dlph i3中TQuickRep控件没有DataSource属性而以DataSet属性来代替，
因此设置TQuickRep控件的DataSet属性值为Table1。
(4)把一个TQRDBText控件放到第二个TQRBand控件上，设置它的DataSet属性值为
Table， 设置DataField属性为要显示的字段。
到此，就可在TQuickRep内单击鼠标右键，在弹出菜单中选择Review项来预览报表。
2.预览及打印报表
在运行期间也可以调用TQuickRep的Preview方法来预览报表，在预览窗口中可单击
打印按钮来打印报表，但也可直接调用TQuickRep的Print方法来打印报表。
3.给报表的数据画上网格
在省缺情况下，报表的数据周围是没有网格的。我们可以给数据周围加上网格，使其
看起来更像一个表格，方法是设置TQRBand控件的高度与TQRDBText高度控件相同，将所有
的TQRDT ext控件的AutoSize属性设为False，并将它们首尾相连，然后将每一个TQRDBText
控件的Frme 的子属性DrawBottom、DrawLeft、DrawRight、DrawTop设为True，子属性
Style设为poSoid。这样即可加上网格线。
QReport控件组共有16种报表制作工作，以上只是一个粗略的介绍，不能尽述其强大的
功能。在具体应用中，用户可以通过加载其它报表制作控件设计出有个性的报表来。
要想知道更多， 请使用本论坛的搜索功能， 关键词： QuickReport
内容多得不得了！
