delphi7中怎么求表格dbgrid中一列值的和?

Question

delphi7中怎么求表格dbgrid中一列值的和?求和函数还是SQL语句，我什么都不会，那位帮个忙啊！

Answer 1

select sum(列名) as 别名 from 表名 where 条件
列：想求Table1表中aa字段全部的和。

var
sql: string;
v: string;
begin
sql := 'select sum(aa) as ASum from Table1';
query1.sql.text := sql;
query1.open;
v := query1.fieldbyname('ASum').asstring;
showmessage(v);
end;

以上代码仅供参考。