delphi6 中用QReport组件做报表，要实现（可能多页）每一页、对本页金额汇总(100分)

S

seeme0526

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-23

• #1

delphi6 中用QReport组件做报表，要实现（可能多页）每一页、对本页金额汇总

 

T

ToDelphi8

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-23

• #2

使用计算字段

 

S

seeme0526

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-23

• #3

问题是该打印的页数及行数都是动态的，可以用delphi6自代的报表控件。谢谢

 

S

stuwe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #4

QR的話還是自己處理好一點,
可以在onneeddata裡面處理

 

S

stuwe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #5

樓主﹐有沒有固定每一頁最多只能打几行的?

 

S

seeme0526

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #6

可以固定每一頁最多只能打几行

 

S

stuwe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #7

那就好辦嗎﹗
你可以根據一個關鍵字段來排序﹐再計算某一段間的統計就能實現

 

Y

yanghaijun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #8

其实你可以自己算出每页的行数的(动态),然后根据计算出的行数加以控制...

 

Z

zm30

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #9

在PageFooter上放一个QrExpr,设置好表达式,如sum(je),设置ResetAfterPrint为true就行了

 

S

stuwe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #10

zm30的方法可以實現﹐還比較簡單

 

L

linbz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #11

我也刚学到的！
直接用quickreport页统计不行，页累计是可以的
放入QRexpr，设置expression为SUM（你想要累计的字段）
可以编程让quickreport实现页统计用qrlabel
设置一个单元内局部变量 PageSUM
在onStratpage时清零
在dataset的beforescroll事件中累加PageSUM
在qrlabel的onprint事件中设置value＝pagesum
就可以了

 

S

seeme0526

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-24

• #12

多人接受答案了。