如何在DBGRID中作累计(100分)

  • 主题发起人 主题发起人 Kengapp
  • 开始时间 开始时间
K

Kengapp

Unregistered / Unconfirmed
GUEST, unregistred user!
我在SQLsever 7.0 和Dephi 4.0 需要按一定条件作行累计(即小计,合计)。
已知道在SQLsever7.0中有Compute [sum(fieldname)] by [fieldname],
在SQL中运行正确,但在Dephi 中运行时,却只增加了一行与最后一行相同的记录。
我的数据库为多层结构,用client dataset模式,请问,我需做何操作才能在Dephi中
增加一行累计值呢?(注,不用QuickReport,我指的是在DBGrid中,需要与SQL中运行
结果一致。)
请将解决方法mail给我,信箱地址为Kengapp@990.net,谢谢!
 
看看clientdataset的(TAggregates)属性吧!

 
用IP控件中的wwDBGrid
 
你的SQL Query写多个SELECT 然后用UNION连接
 
agree with DJ
 
动态建立第二个Query,对数据进行统计。再符值给对应控件。
 
<a href="http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=110757">到这里看看可能对你有用</a>
 
InfoPower控件中wwDbgrid,强力推荐!
 
InfoPower控件中wwDbgrid上哪要?
 
对某字段的所有记录求和,使用如下代码:
var i:double;
...
procedure TForm1.Table1CalcFields(dataset: Tdataset);
var Goodsgold:double;
begin
Goodsgold:=table1.fieldbyname('金额').asfloat;
i:=i+Goodsgold;
label1.caption:=formatfloat('0.00',i);
end;
其中的i是求得的总和,在必要时才将他复位为0,要不他总是有增无减。
 
多人接受答案了。
 
后退
顶部