[TotKtoNado]

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

Код:

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]

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

Код:

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

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

вот:

Код:

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

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

Код:

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

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

вот:

Код:

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

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

[Black Raider]

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

Код:

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;