вычислиьт сумму чисел в мемо
как вычислиьт сумму чисел в мемо с 44 по 54 и 78 по 89, и запихнуть в мемо100?
не все мемки с числами, есть пустые
у меня почему то никак не получается
подскажите, плиз
не все мемки с числами, есть пустые
у меня почему то никак не получается
подскажите, плиз
Комментарии
var
ArrOfMemo : array [0..99] of TfrxMemoView;
i, j, k : integer;
begin
ArrOfMemo[0] := Memo1;
ArrOfMemo[1] := Memo2;
.....
ArrOfMemo[99] := Memo100;
for i := 43 to 53 do
begin
j := j + StrToInt(ArrOfMemo.Text);
end;
for i := 77 to 88 do
begin
k := k + StrToInt(ArrOfMemo.Text);
end;
ArrOfMemo[99].Text := IntToStr(j + k);
end;
if ArrOfMemo.Text := '' then ... суммируем с нулем