需求: 求出E欄
A B C D E
==============
a q1 3 4 7
a q2 3 5 15
目前程式寫法如下: 但是求不出我想要的答案，請問要如何讓row-1呢?
while not que1.Eof do begin
temp.Append;
s := Que1.fieldbyname('C').AsFloat Que1.fieldbyname('D').AsFloat;
temp.FieldByName('e').AsFloat := s ;
que1.next;
temp.FieldByName('q').AsFloat := s s;
end;
A B C D E
==============
a q1 3 4 14
a q2 3 5 22

找到答案了，少寫一段~
while not que1.Eof do begin
temp.Append;
s := Que1.fieldbyname('C').AsFloat Que1.fieldbyname('D').AsFloat;
temp.FieldByName('e').AsFloat := s ;
s1:=s1 s;
que1.next;

temp.FieldByName('q').AsFloat := s1;
end;

編輯記錄