如何做数据库的统计

Question

我用的是PARADOX 7
Ttable Tdatabase

Answer 1

用TABle那你就只有一个记录一个记录加了,用Tquery吧,一句SQL就行

Answer 2

有更好方法吗?
或者用TQUERY 怎么做?

Answer 3

用Tquery做表
select sum(你要统计的列名)  form yourTable
用Table
procedure TForm1.Button1Click(Sender: TObject);
var
  sd:integer;//sd为合计
begin
  with Table1 Do
    begin
      sd:=0;
      first;
      while not EOF do
        begin   
          sd:=sd+Fields[3].value;
          next;   
        end;
    end;
  Edit1.text:=IntToStr(sd);
end;