如何使用infopower控件,在wwdbgrid中添加合计(累计)行。(200分)

  • 主题发起人 主题发起人 worldmen
  • 开始时间 开始时间
W

worldmen

Unregistered / Unconfirmed
GUEST, unregistred user!
请问各位大虾:
如何使用infopower控件的wwdbgrid,在最后一行添加合计(累计)行。
对部分列的字段值进行合计。(我的数据结构:table+wwdbgrid)如
名称 数量1 数量2
产品1 10 20
产品2 50 80

(编程添加) 合计 60 100
请具体讲解,最好给出具体的事件和源程序。
 
我认为用wwdbgrid做合计不是很好,用Ehlib1.56吧,比wwdbgrid好多了,而且做合计很方便。
 
dxDBGrid的合计功能作的很不错
 
I also want to know!
 
请到我的网页下载ehlib 1.56 http://xalion.yeah.net
 
定义两个QUERY,1作datasource,2作合计

procedure TForm1.wwDBGrid1UpdateFooter(Sender: TObject);
begin
wwdbgrid1.ColumnByName('OrderNo').FooterValue:='合计';
wwdbgrid1.ColumnByName('ItemsTotal').FooterValue:=
FormatFloat('0.00',Query2.fields[0].asfloat);
wwdbgrid1.ColumnByName('AmountPaid').FooterValue:=
FormatFloat('0.00',Query2.fields[2].asfloat);

end;

procedure TForm1.wwDBGrid1DrawFooterCell(Sender: TObject; Canvas: TCanvas;
FooterCellRect: TRect; Field: TField; FooterText: String;
var DefaultDrawing: Boolean);
begin
wwdbgrid1.ColumnByName('OrderNo').FooterValue:='合计';
wwdbgrid1.ColumnByName('ItemsTotal').FooterValue:=
FormatFloat('0.00',Query2.fields[0].asfloat);
wwdbgrid1.ColumnByName('AmountPaid').FooterValue:=
FormatFloat('0.00',Query2.fields[2].asfloat);
end;
 
设置wwGrid属性option-dgshowfooter为true;
程序:wwDbGrid1.ColumnByName('total').FooterValue:='总计:';
wwDbGrid1.ColumnByName('字段1').FooterValue:=Floattostrf(QSumQurey.Fields.Fields[1].Asfloat,ffNumber,8,2);
 
多人接受答案了。
 
后退
顶部