用户在使用数据库应用程序时经常要生成报表,利用Delphi 4的QReport部件,可以帮助我们快速方便地生成报表。这里以一个设备管理报表为例说明如何用QReport部件与Query部件设计从多个数据表中生成报表。
一、所用数据库
这里用到三个Foxpro数据表,DLBMK(设备大类编码)、SBXHK(设备型号及配置)、BMSBK(设备所在部门),存放在D:\SB目录下。其库结构如下:
(一) DLBMK
字段名称 | 字段类型 | 解释 |
1 | DLBH N3 | 设备大类的编号 |
2 | DLMC C20 | 设备大类的名称 |
(二)SBXHK
字段名称 | 字段类型 | 解释 |
1 | XHBM N3 | 设备型号的编码 |
2 | DLBH N3 | 同DLBMK中的DLBH字段 |
3 | SBXH C30 | 设备型号 |
4 | SBPZ C30 | 设备配置 |
5 | SBSL N3 | 设备数量 |
(三)BMSBK
字段名称 | 字段类型 | 解释 |
1 | BMMC C20 | 部门名称 |
2 | XHBM N3 | 同SBXHK中的XHBM字段 |
3 | SL N3 | 数量 |
利用这三个数据表,要生成一个只有电脑部有而其他部门没有的设备型号的情况。
二
程序中有两个窗体:主窗体mainForm与报表窗体repForm。主窗体mainForm中有两个TButton部件,设置如下:
部件 属性及属性值
PreviewBtn:TButton Caption:预览
PrintBtn: TButton Caption:打印
时间: 2024-10-31 14:25:44