我想達到數據的列的累加．

Question

我想達到數據的列的累加．
如有兩個列，
列１的值來源來數據庫，列２的值是列的的累加
列１，列２
  1,   1
  4,   5
  6,   11
  2,   13
  5,   18

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
temp:integer;
begin
adotable1.First;
temp:=0;
while not adotable1.Eof do
  begin
    adotable1.Edit;
    adotable1.FieldByName('f2').Value:=adotable1.FieldByName('f1').Value+temp;
    adotable1.Post;
    temp:=adotable1.FieldByName('f2').Value;
    adotable1.Next;
    end;
end;

Answer 2

在表中做个insert触发器，将列2的值改为SUM(列1)