StringGrid сумма значений

[monushka]

Добрый день, форумчане!
Помогите разобраться с этой проблемой...
Есть StringGrid, в котором содержиться информация о товарах, их производители, характеристики, цены и количество. Сложность заключается в том, чтобы посчитать в итоге стоимость всех товаров и вывести в Edit. Т.е. к примеру стоимость единицы товара распологается в ячейках 3-го столбца, а количество данного товара в ячейках 4-го столбца. Количство наименований, т.е. строк у StringGrid неизвестно.

Наименование / Цена / Количество
Хлеб / 2 / 5
Масло / 3,5 / 3
Колбаса / 12 / 1

Итого = 2*5+3,5*3+12*1

Если количество строк фиксировано, то сложностей нет. Но вот вся проблема в том, что количество строк может быть разным. Натолкните, пожалуйста, на мысль, как же организовать этот цикл?

[raxp]

sum:= 0;
for i:=1 to stringgrid1.itemcount-1 (кол-во строк) do
 sum:= sum + strtoint(stringgrid1.cells[1,i])*strtoint(stringgrid1.cells[2,i]);

//- если у вас stringgrid содержит пустые строки, то делайте проверку
//if stringgrid1.cells[1,i]<>'' and stringgrid1.cells[2,i]<>'' then sum:=

[Stilet]

stringgrid1.itemcount-1

Проверял? понял то сам что написал?

Т.е. к примеру стоимость единицы товара распологается в ячейках 3-го столбца, а количество данного товара в ячейках 4-го столбца.

With StringGrid1 do begin
 for i:=1 to RowCount-1 do
  sum:=StrToFloatDEF(cells[3,i],0)*StrToFloatDEF(cells[4,i],0)+sum;
end;

[raxp]

RowCount, да, попутал с memo
но принцип остался

...КСТАТИ

cells[3,i],0)*StrToFloatDEF(cells[4,i],0)

- РАЗВЕ нумерация не с 0-го?!
cells[0,i]- 1 столбец
cells[1,i]- 2 столбец
cells[2,i]- 3 столбец
Наименование(0) / Цена(1) / Количество(2)
1-2-3

а вот если читать текст выше

в ячейках 3-го столбца, а количество данного товара в ячейках 4-го столбца

то вообще - 2 и 3 сеlls

[monushka]

Сообщение от Stilet

With StringGrid1 do begin
 for i:=1 to RowCount-1 do
  sum:=StrToFloatDEF(cells[3,i],0)*StrToFloatDEF(cells[4,i],0)+sum;
end;

Stilet, спасибо! Работает! Все оказывается куда проще, чем я представляла...

[Stilet]

РАЗВЕ нумерация не с 0-го?!

Обычно 0 строка - это шапка таблицы (FixedRow). Зачем его считать?

[monushka]

Да какие столбцы не столь важно, принцип-то один и тот же...

[raxp]

ок проехали.
(обычно если пишут - Наименование / Цена / Количество, то слева от наименования уже ничего нету, то бишь FixedСols)

[monushka]

Сообщение от raxp

ок проехали.
(обычно если пишут - Наименование / Цена / Количество, то слева от наименования уже ничего нету, то бишь FixedСols)

Да у меня и фиксированных нет. Я поняла, в чем загвоздка! Просто хлеб и колбаса были для примера, чтобы понятнее было, что я имею в виду! Вот... Но все равно спасибо!

[monushka]

А такой вопрос... Можно ли определенному столбцу задать определенный тип данных. Вот, к примеру, столбцу с количеством задать тип данных Integer?