如何在Qreport做出統計 |
|
答題得分者是：T.J.B
|
|
lilisn
一般會員   發表：35 回覆：62 積分：24 註冊：2003-03-09 發送簡訊給我 |
如下例:
QuickRep1.columns:=2;
項目 銷售 稅 總額 項目 銷售 稅 總額
001 2500 125 2650 007 9000 450 9450
011 2800 140 2940 017 8000 400 8400
.....
....
.....
小計 4300 265 5590 17000 850 17850
希望在每頁左右統計金額
用了下列元件
PageHeaderBand1
ColumnHeaderBand1
QRSubDetail1
QRBand1.BandType:=rbGroupFooter;
PageFooterBand1
做不出來可否先進教一下 發表人 - lilisn 於 2004/06/09 19:32:20
|
|
T.J.B
版主  發表：29 回覆：532 積分：497 註冊：2002-08-14 發送簡訊給我 |
有好幾種做法啦
給你一個提示
你要用的BAND 應該只要用
2個QRBand就可以了(關於其他種類的Band你自己再做處理 )
1個QRBand的BandType設為rbDetail
另1個QRBand的BandType設為rbSummary
妳要統計的有3個欄位的值(銷售 稅 總額)
你就設3個全域變數
在DetailBand的BeforPrint事件去把欄位的值加總後丟給變數
例如:
sum := sum query1.FieldByName('銷售').asinteger;
sum1 := sum1 query1.FieldByName('稅').asinteger;
sum2 := sum2 query1.FieldByName('總額').asinteger; 然後在PageFooterBand裏用3個QrLabel元件去分別接收這3個變數即可
例如
QrLabel1.caption := inttostr(sum) ;
QrLabel2.caption := inttostr(sum1);
QrLabel3.caption := inttostr(sum2) ; 要注意喔
最後在TQuickRep的BeforePrint事件
把這6個變數清為0 這樣才不會一直加下去
sum := 0;
sum1:= 0;
sum2:= 0; 自己做一遍 這樣才能有收穫 天行健
君子當自強不息~~@.@
------
天行健 君子當自強不息~~@.@ |
|
lilisn
一般會員 發表：35 回覆：62 積分：24 註冊：2003-03-09 發送簡訊給我 |
|
|
len123
一般會員 發表：1 回覆：2 積分：0 註冊：2007-08-08 發送簡訊給我 |
你好:
我也有此問題, 我是要做分群列印之每一群組累加.目前做出來是會累加至上一群組的值. 我照上面做後,目前是QRLabel無法險示出資料來,不知道 QrLabel2.caption := inttostr(sum1); 要放在那. pagrheadr , group,rbdetail,groupfooter,pagefooter. 請各位先進告知.謝謝. 我要總計的 QRLable 是放在rbdetail 我已解決了 |
發表時間：2004-06-09 19:30:01
IP:61.228.xxx.xxx 未訂閱
系統時間：2024-04-26 2:01:45
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |