字段的纵向累加问题!(50分)

  • 主题发起人 主题发起人 ludao
  • 开始时间 开始时间
L

ludao

Unregistered / Unconfirmed
GUEST, unregistred user!
我想统计query查出来的全部记录的同一个字段“金额”(类型为货币型)的字段值的
和,放到Edit框里,要怎么做?(要类型转换)
谢谢!
 
query.first
edit.text:=query.fieldbyname('...').asstring
 
with query do
begin
SQL.Clear;
SQL.Add('select sum(money) from yourtable');
ExecSQL;
Active := True;
edit.text := Fields[0].AsString;
Close;
end;

then ok

 
var
nsum;single
with query do
begin
first
while not eof do
begin
nsum:=nsum+filebyname('金额').value;
next;
end;
end;
edit.text:=floatTostr(nsum);
 
多人接受答案了。
 

Similar threads

回复
0
查看
1K
不得闲
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
900
SUNSTONE的Delphi笔记
S
后退
顶部