Сложить значения в StringGrid

[zluchka]

Подскажите...
как сложить числовые значения в ячейках StringGrid по столбцам, так чтобы получилась строка с суммами по каждому столбцу.

[mihali4]

Пройтись в цикле по строкам каждого столбца, сложить и занести в нижнюю строку...

[raxp]

var i,j: integer;
    temp: extended;
begin
 for i:=0 to stringgrid1.ColCount-1 do begin
  temp:= 0;
  for j:=0 to stringgrid1.RowCount-2 do
   try temp:= temp+ strtofloat(stringgrid1.Cells[i,j]) except end;
  stringgrid1.Cells[i,stringgrid1.RowCount-1]:= floattostr(temp)
 end
end;

[raxp]

вот так всегда... помогаешь плохо, подталкиваешь к решению - просют написать сразу и тоже недовольны