[TotKtoNado]

Имееться ввиду суммировать все указанные ячейки но когда я написал число в первую ячейку то число появлятлось в Labele но когда я пишу 2 число в другую ячейку то число в лабеле исчезает. Как мне сделать так чтоб при написании второго числа число не исчезало а суммировалось из двух ячеек стринггрида

Код:

1 2 3 4 5 6 7 8 9

var   i,estRas : integer; begin estRas:=stringgridrashodi.rowcount; for i:=1 to estRas do begin label.Caption:=stringgridRashodi.cells[estRas-1,1]; end; end;

[Black Raider]

не совсем понял че вы делаете!

Код:

1 2 3 4 5

estRas:=<b>stringgridrashodi.<u>rowcount</u>;</b> for i:=1 to estRas do begin label.Caption:=stringgridRashodi.cells[<u><b>estRas-1</b></u>,1]; end;

вы берете строки но вставляете их в столбцы!!!

вот:

Код:

1 2 3 4 5 6 7 8 9

var   i,estRas : integer; begin estRas:=stringgrid1.rowcount; for i:=0 to estRas-1 do begin label1.Caption:=stringgrid1.cells[0,i]; end; end;

[TotKtoNado]

Сообщение от Black Raider

не совсем понял че вы делаете!

Код:

вы берете строки но вставляете их в столбцы!!!

вот:

Код:

нет я беру столбцы и суммирую их

[Black Raider]

тогда вот так:

Код:

1 2 3 4 5 6 7 8 9

var   i: integer; begin label1.Caption:='0'; for i:=0 to stringgrid1.Colcount-1 do begin label1.Caption:=inttostr(strtoint(label1.Caption)+strtoint(stringgrid1.cells[i,0])); end; end;