[TotKtoNado]

что эта за ошибка " Incompatible types: 'String' and 'TLabel'"

Код:

var
  x,o,z,n:integer;
  begin
    x:=StringgridObRashod.rowCount;
    o:=0;
    repeat
      begin
        LabelItogRashod.caption:=labelItogRashod+stringgridObRashod.cells[1,StringGridObRashod.RowCount];
      end;
    until x>=StringGridObRashod.rowCount;

Админ: Пользуемся тегами для оформления кода, иначе последуют санкции!

ругаеться LabelItogRashod.caption:=round(labelItogRashod+str inggridObRashod.cells[1,StringGridObRashod.RowCount]);

[flexterful]

Код:

LabelItogRashod.caption:= labelItogRashod.Caption + stringgridObRashod.cells[1,StringGridObRashod.RowCount];

[TotKtoNado]

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

Код:

LabelItogRashod.caption:= labelItogRashod.Caption + stringgridObRashod.cells[1,StringGridObRashod.RowCount];

вот теперь ругаеться
[Îøèáêà] UnitRashod.pas(56): Incompatible types

[friz]

если я правильно понял у тебя так:

Код:

LabelItogRashod.caption:=round(labelItogRashod.caption+stringgridObRashod.cells[1,StringGridObRashod.RowCount]);

а надо типа так:

Код:

LabelItogRashod.caption:=round(strtofloat(labelItogRashod.caption+stringgridObRashod.cells[1,StringGridObRashod.RowCount]));

[TotKtoNado]

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

если я правильно понял у тебя так:

Код:

LabelItogRashod.caption:=round(labelItogRashod.caption+stringgridObRashod.cells[1,StringGridObRashod.RowCount]);

а надо типа так:

Код:

LabelItogRashod.caption:=round(strtofloat(labelItogRashod.caption+stringgridObRashod.cells[1,StringGridObRashod.RowCount]));

Код:

[Ошибка] UnitRashod.pas(58): Incompatible types: 'String' and 'Int64'

слушай а как можно сосчитать все значения в столбце

[friz]

ах да я напортачил

Код:

LabelItogRashod.caption:=inttostr(round(strtofloat(labelItogRashod.caption + stringgridObRashod.cells[1,StringGridObRashod.RowCount])));

сперва складываем строки, затем переводим в число, округляем, и обратно в строку

что бы сосчитать все значения надо цикл мутить

Код:

for i:=1 to StringGridObRashod.RowCount do
showmessage(stringgridObRashod.cells[1,i]);

[TotKtoNado]

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

если я правильно понял у тебя так:

Код:

LabelItogRashod.caption:=round(labelItogRashod.caption+stringgridObRashod.cells[1,StringGridObRashod.RowCount]);

а надо типа так:

Код:

LabelItogRashod.caption:=round(strtofloat(labelItogRashod.caption+stringgridObRashod.cells[1,StringGridObRashod.RowCount]));

получилось количество строк

[TotKtoNado]

мож с помощью массивов попробовать?

var i:array [1..stringgridObRashod.rowCount] of integer;
begin
labelItogRashod.caption:=stringgridObRashod.cells[1..i]
end;

ток что то ругаеться
[Îøèáêà] UnitRashod.pas(51): Constant expression expected
[Îøèáêà] UnitRashod.pas(53): Not enough actual parameters

[Kailon]

var
x,o,z,n:integer;
begin
x:=StringgridObRashod.rowCount;
o:=0;
repeat
begin
LabelItogRashod.caption:=labelItogRashod+stringgri dObRashod.cells[1,StringGridObRashod.RowCount];
end;
until x>=StringGridObRashod.rowCount;

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

слушай а как можно сосчитать все значения в столбце

Задаешь цикл от нулевой до последней строки таблицы и все

Код:

Summ := 0;
for i := 0 to StringGrid.RowCount - 1 do
  Summ := Summ + StrToIntDef(StringGrid.Cells[1, i], 0); //где StringGrid.Cells[столбец, строка]
Label1.Caption := IntToStr(Summ);