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

晴儿584

晴儿584

2016-02-19 17:46

有一种朋友不在生活里,却在生命力;有一种陪伴不在身边,却在心间。图老师即在大家的生活中又在身边。这么贴心的服务你感受到了吗?话不多说下面就和大家分享delphi编程计算数据库某字段的值吧。

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

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

(本文来源于图老师网站,更多请访问http://m.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;

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)

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

展开更多 50%)
分享

猜你喜欢

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

编程语言 网络编程
delphi编程计算数据库某字段的值

Delphi3数据库编程中的查找字段

编程语言 网络编程
Delphi3数据库编程中的查找字段

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

delphi编程数据库日期显示

编程语言 网络编程
delphi编程数据库日期显示

delphi编程向数据库发送密码

编程语言 网络编程
delphi编程向数据库发送密码

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

delphi编程限制数据库记录数

编程语言 网络编程
delphi编程限制数据库记录数

用DELPHI编程访问SQL SERVER数据库

Delphi
用DELPHI编程访问SQL SERVER数据库

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

delphi编程实现播放背景音乐

delphi编程实现播放背景音乐

我只是一个孩子 - QQ伤感分组

我只是一个孩子 - QQ伤感分组
下拉加载更多内容 ↓