各们高手,感谢相助,可我试了三位的建议,可还是不行呢?过程如下:
procedure T_Main.TabSheet1Show(Sender: TObject);
begin
query1.Close;
query1.SQL.Clear;
query1.SQL.add('select sum(金额) as 帐户总金额 from FA.Financing');
query1.open;
edit1.text:=query1.fields(0).asstring;
end;

解决方案 »

  1.   

    procedure T_Main.TabSheet1Show(Sender: TObject);
    begin
    query1.Close;
    query1.SQL.Clear;
    //FA.Financing 中FA是什么?是数据库的话需要 FA..Financing
    query1.SQL.add('select sum(金额) as 帐户总金额 from FA.Financing');
    query1.open;  //这里有没有错了?
    edit1.text:=query1.fieldbyname('帐户总金额').asstring;
    end;
      

  2.   

    你的edit1.text:=query1.fields(0).asstring;
    应该写成edit1.text:=query1.fields[0].asstring