EConvertError

[feras]

Помогите исправить ошибку.
При выполнении программы появляется ошибка:"Project Project1.exe raised class EConvertError with message'''is not a valid integer value'.
Как исправить эту ошибку?

procedure TForm1.Button2Click(Sender: TObject);
var d:array[1..100]of string;e:array[1..100]of integer;n:integer;
begin
for n:=0 to 100 do begin
d[n]:= Memo1.Lines[n];end;
for n:=0 to 100 do begin
e[n]:=StrToInt(c[n]);end;

[Аватар]

for n:=1 to 100 do begin

e[n]:=StrToInt(c[n]); c[n] - это что? наверно d[n]? В d[n] все в Integer преобразуется?

feras
Да Это d[n]
я ошибся
но все равно не рботает

Еси d[n]='' то это тоже даст ошибку

for n:=1 to 100 do begin
  d[n]:=Memo1.Lines[n];
  try
    e[n]:=StrToInt(d[n]);
  except
    e[n]:=0;
  end;
end;

[feras]

Да Это d[n]
я ошибся
но все равно не рботает

[feras]

нет d[n]=числа в виде string

и я написал Ваш код но все рвно не рабоает

[A-IX-2]

Могу предположить, что от 0 до 99 нужно, или от 1 до 100. У Вас же 100 цифр в массиве, а если начинать с 0, то получается 101.

[Аватар]

Вы в отладке из дельфей запускаете? Попробуте просто exe-шник стартовать. Если опять ошибка, последний код сюда выложите и укажите на какой строчке и текст ошибки (если отличен от указанного ранее)

[feras]

Сообщение от A-IX-2

Могу предположить, что от 0 до 99 нужно, или от 1 до 100.

Без разницы

[feras]

Сообщение от Аватар

Вы в отладке из дельфей запускаете? Попробуте просто exe-шник стартовать. Если опять ошибка, последний код сюда выложите и укажите на какой строчке и текст ошибки (если отличен от указанного ранее)

Вы правы через exe-шник олучилось
Спасибо большое

[feras]

Все получилсь