如何在最后一页才统计数据(10分)

我有一个报表，有一个单价字段和一个数量字段，还有一个金额字段，当然金额字段是等于
单价*数量，我现在想在最后一页才统计金额字段，没有必要每页都统计，如何实现？

procedure Tfrm_prt_pd.QuickRepEndPage(Sender: TCustomQuickRep);
var
i:integer;
begin

i:=0;
while not query1.Eofdo

begin

i:=query1.FieldValues['本月结余']*query1.FieldValues['价格']+i;
query1.Next;
end;

qrlabel11.Caption:=inttostr(i);
end;

end.

大家看这个怎么样？还是不需要编程久可以？

多少页X多少就行啦

有没有搞错？QREPORT自带的函数就是到最后一页才统计

多人接受答案了。