澄清：如果TQUICKREP的DATASET是TQUERY(not TTABlE),如何用TQRExpr算出某一页某一列数的合计数,关键在于TQuery与TQUICKREP不在同一个Form

[MOZ]

[dengdeng]

在TQuickrep所在的单元中Use含TQuery的单元。这样Quickrep的DataSet属性

中Query控件就可见。

[liu]

你可以在程序的实现部分加上uses FormX;FormX为TQuery所在的窗体。然后将TQuickRep的DateSet属性设为FormX.Query1.最后用TQRExpr进行计算。

[bpc]

你可以指定你的QUICKREP的DATASET属性为类似
FORM1.QEURY1的形式，然后再使用SUM函数对
某一列（某一个字段）求和。（sum(FORM1.QEURY1.字段名)）

[app2001]

在不在同一单元很重要吗？楼上的几位老兄们的办法都很可行的呀

[catthunder]

自己手算啊,然后在一个TQRLabel中显示出来

[renzhm]

动态设置报表控件的属性:
..执行查询:
str_sql:='select 姓名,年龄,性别,班 from table ';
Query.Open;//我要简单写啦!在另一单元如:DMC
------------------------------------------------
在打印按钮事件里写:
with Qrp do
begin
dateset:=DMC.Query;
QRDBText1.dateset:=DMC.Query;
QRDBText1.datefield:='姓名'
QRDBText2.dateset:=DMC.Query;
QRDBText2.datefield:='年龄'
QRDBText3.dateset:=DMC.Query;
QRDBText3.datefield:='性别'
QRDBText4.dateset:=DMC.Query;
QRDBText4.datefield:='班'
preview;//or print;
end;
你也可以设置其他报表控件的属性:
QRLabel.Caption:='';
QRExpr.expression:='sum([要合计的字段])';

某一页某一列数的合计数的实现:

在PageFooter带中放一个QRExp控件,指定要合计的字段,
记住:一定要把它的resetafterprint属性值设为true;

贴子该了结了吧?

[Qing_li]

如果我是一个临时的dataset呢？该如何处理？