狠人们进来！！

Question

a    b    c   d   e    f 
1    2    3   4   10   0.4
2    0    5   3   10   0.5
上面是一个dbgrideh输入，其中 a,b,c,d是手动输入，e是他们值的总和，
f是它们（a,b,c,d）其中最大一个值除以总和的值。
现在想请大家帮忙求  e,f .

Answer 1

dbgrideh没用过，不过在Excel中是这样的E2中写"=SUM(A2:D2)"
F2中"=IF(E2=0,0,MAX(A2:D2)/E2)

Answer 2

弄两个计算字段就有了//FieldByName('E').AsInteger 是计算字段．
procedure TForm1.Query1CalcFields(DataSet: TDataSet);
begin
  with DataSet do
  begin
    FieldByName('E').AsInteger:=FieldByName('A').AsInteger+FieldByName('B').AsInteger
       +FieldByName('C').AsInteger+ FieldByName('V').AsInteger+FieldByName('E').AsInteger;
  end;    // with
end;