求助，一个SQL问题？

Question

如何对某一列的值进行求和，而且对这一个值要在delphi上表示出来。
adoquery1.SQL.Add('select sum(house_pri) from gwlk
比如要在dbedit上表示，怎么样？

Answer 1

adoquery1.SQL.Add('select sum(house_pri) fsum from gwlk')将dbedit的field设为fsum即可。

Answer 2

adoquery1.SQL.Add('select sum(house_pri) as house_pri_sum from gwlk');
设置DBEdit的DataField属性为house_pri_sum 

Answer 3

adoquery1.SQL.Add('select sum(house_pri) as fsum from gwlk')将dbedit的field设为fsum即可。一定要加as哦

Answer 4

楼上这位说得好像不行，datafield里面只有这个表的字段，怎么能设置fsum呢？

Answer 5

datafield里面时可以手工写的，写成fsum就可以了

Answer 6

我按照上面做了，可是没有反应啊。不知是哪里出错了，忘高手指点一下
procedure TForm1.sbtnslClick(Sender: TObject);
var
sel:boolean;
spri:string;
begin
sel:=(not rbroom.Checked) and (not rbgoods.Checked) and (not rbdinner.Checked) and (not rbgame.Checked);
if sel then
showmessage('请选择收入的方式')
else if rbroom.Checked then
begin
dataModule1.ADOQ_sl.Close;
dataModule1.ADOQ_sl.SQL.Clear;
dataModule1.ADOQ_sl.SQL.Add('select sum(house_pri) as spri from gwlk');
dataModule1.ADOQ_sl.Open;
dbedit1.DataField:=spri;
end;
end;
end.

Answer 7

dbedit1.DataField:=spri; 这句不对，
你不要把spri定义成变量，然后写上
dbedit1.DataField:='spri';
再看看

Answer 8

： yitong0834(西门山鸡) ( ) 信誉：100  2004-01-09 13:38:00  得分:0 
 
 
  adoquery1.SQL.Add('select sum(house_pri) as fsum from gwlk')将dbedit的field设为fsum即可。一定要加as哦
*****************************************
一定要吗？？SQL SERVER就不要

Answer 9

该为
procedure TForm1.sbtnslClick(Sender: TObject);
var
sel:boolean;
begin
sel:=(not rbroom.Checked) and (not rbgoods.Checked) and (not rbdinner.Checked) and (not rbgame.Checked);
if sel then
showmessage('请选择收入的方式')
else if rbroom.Checked then
begin
dataModule1.ADOQ_sl.Close;
dataModule1.ADOQ_sl.SQL.Clear;
dataModule1.ADOQ_sl.SQL.Add('select sum(house_pri) as spri from gwlk');
dbedit1.DataField:='spri';
dataModule1.ADOQ_sl.Open;
end;
end;
end.

Answer 10

不要不要 直接 edit1.text:=strtoint(table.fields[0].asinteger);哈哈