Показать сообщение отдельно
  #1  
Старый 07.06.2011, 11:57
Мишка-90 Мишка-90 вне форума
Прохожий
 
Регистрация: 25.03.2011
Сообщения: 24
Репутация: 10
По умолчанию счет "итого" в StringGrid

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

Код:
var
d : array[0..300] of real;
i,j : integer;

d[1] := 0;
      for i:=6 to StringGrid1.RowCount-10 do d[1] := d[1] + StrToFloat(StringGrid1.Cells[2,i]);
        StringGrid1.Cells[2,30]:= FloatToStr(d[1]);

всего в нем 262 столбца.. как правильно сделать цикл для всего стринггрида?
Ответить с цитированием