有这样要求的报表:
重量 | 重量
100 | 20
200 | 200
300 | 20
总计: 600 | 240
注:就是把一个表的参数“重量”分成两栏显示,左边和右边又要分开统计求和我试过把band的columns设为2,也试过把page 的columns设为2,在masterfooter中用sum统计,但都达不到我要的效果,不能把左右分开统计,只能统计整个页面所有的重量和,大虾指点一二啊,先谢过了。
重量 | 重量
100 | 20
200 | 200
300 | 20
总计: 600 | 240
注:就是把一个表的参数“重量”分成两栏显示,左边和右边又要分开统计求和我试过把band的columns设为2,也试过把page 的columns设为2,在masterfooter中用sum统计,但都达不到我要的效果,不能把左右分开统计,只能统计整个页面所有的重量和,大虾指点一二啊,先谢过了。
解决方案 »
- Class包装成两个Unit,基础功课(大家请指点,谢谢)
- delphi 程序运行的时候在panel上自动显示当前时间,
- fastreport报错信息
- dbgird中选择多条记录,如何批量更新某一字段值?
- CnPack 开放源码 IDE 专家包发布 0.7.9 版
- 请帮忙写一个入门级的看图程序。
- 开始学习Rave做报表,请大侠介绍一点资料,最好要中文的,我的e文很差
- 这样的应用很难设计,能给点建议吗
- 如何F1book中放置一个Edit控件?
- 请问Delphi中有没有将数据项分类的接口?
- 如何实现象FOXMAIL查看邮件内容时的特别功能
- 关于ADOConnection的GetTableNames方法 ---- 为什么总出错?
不行就再用个查询专做统计。然后在FastReport中作为打印它。
重量 | 重量
100 (TQRDBText1) | 20(TQRDBText2)
200 | 200
300 | 20
总计: 600 (TQRLable1) | 240(TQRLable2)
var
SumQty1: real;procedure TQfmPrint.QRDBText1Print(sender: TObject;
var Value: String);
begin
inherited;
SumQty1 := SumQty1 + StrToFloat(Value);
if Value = '0.00' then
Value := '';
end;//每打印一次QRDBText1在SumQty上加procedure TQfmFinanceDelivery.QRLabel1Print(sender: TObject;
var Value: String);
begin
inherited;
Value := FloatToStr(SumQty1);
SumQty1 := 0.00;
end;//打印完SumQty后设SumQty为0;
谢谢你!
不过你提供的是quickreport的代码吧,我要用的是fastreport,不过还是很谢谢你!
这个没有办法画啊,自己画的怎么调数据呢?怎么统计和呢?