有一种朋友不在生活里,却在生命力;有一种陪伴不在身边,却在心间。图老师即在大家的生活中又在身边。这么贴心的服务你感受到了吗?话不多说下面就和大家分享delphi编程计算数据库某字段的值吧。
【 tulaoshi.com - 编程语言 】
在数据库中,有时需要做汇总工作,那么就要对某个字段的所有记录进行求和,我们使用如下代码:
先定义一个全局变量i,再加入Table1的OnCalcFields事件,那么就得出了数据库中金额字段的合计值
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)
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,要不他总是有增无减。
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)来源:http://www.tulaoshi.com/n/20160219/1616012.html
看过《delphi编程计算数据库某字段的值》的人还看了以下文章 更多>>