Query1.SQL:="select sum(数量) as 数量合计 from table";
Query1.Active:=true;
sum:=Query1.FieldByName("数量合计").AsInteger;

解决方案 »

  1.   

    query1.close;
    query1.sql.clear;
    query1.sql.add('select count(字段)from tablename')
    query1.prepared;
    query1.open;
      

  2.   

    DBLOOKUPLISTBOX中listsource所对的query的sql要写对,用distinct关键字
    'select distinct field1,field2 from table1 where...'这样保证对于field1,field2的每一个组合都是唯一的
      

  3.   

    按如下方法即可,
            Currency m_currSz=0;
            Query1->Close();
            Query1->SQL->Clear();
            Query1->SQL->Add("SELECT SUM(资金量) FROM tmpMacc");
            Query1->Open();
            m_currSz=Query1->Fields->Fields[0]->AsCurrency;//读计算字段的值还可将SUM函数改成其它SQL函数来获得更多的计算结果
      

  4.   

    使用SQL语言的函数!
    if Query1.Active then Query1.Close;
    Query1.SQL.Clear;
    Query1.SQL.Add('Select Sum(你要求的字段名) From 表名');
    Query1.Open;
    sum:=Query1.Fields[0].AsCurrency;