首页 相关文章 delphi编程计算数据库某字段的值

delphi编程计算数据库某字段的值

  在数据库中,有时需要做汇总工作,那么就要对某个字段的所有记录进行求和,我们使用如下代码:

  先定义一个全局变量i,再加入Table1的OnCalcFields事件,那么就得出了数据库中金额字段的合计值

  

var i:double;{$R *.DFM} procedure TForm1.Table1CalcFields(dataset: Tdataset);varGoodsgold:double;beginGoodsgold:=table1.fieldbyname(金额).asfloat;i:=i+Goodsgold;label1.caption:=formatfloat(0.00,i);end;

  其中的i是求得的总和,在需要重新计算时将他复位为0,要不他总是有增无减。

...[ 查看全文 ]

2016-02-19 标签:

delphi编程计算数据库某字段的值的相关文章

手机页面
收藏网站 回到头部