invalid numeric input

[Fri]

Здравствуйте! Собственно в программе пишет вот такую ошибку. Ввожу данные из текстового файла в СтрингРид.

type
  matr=array[1..7,1..7] of Integer;
  var
 fp:TextFile;
 n,i,j:Integer;
 A:matr;

begin
  AssignFile(fp,'vvod.txt');
  Reset(fp);
  read(fp,n);
  for i:=1 to n do
  for j:=1 to n do
  begin
    read(fp,A[i,j]);
    StringGrid1.Cells[j,i]:=IntToStr(A[i,j]);

  end;
  CloseFile(fp);


end;

end.

Вот ещё прикрепляю исходник с самим текстовым файлом. Может так будет легче понять...

[artyom256]

Вы читаете содержимое файла в массив чисел, но в самом файле присутствуют не только числа.
Поменяйте
matr=array[1..7,1..7] of Integer;
на
matr=array[1..7,1..7] of String;

[Fri]

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

Вы читаете содержимое файла в массив чисел, но в самом файле присутствуют не только числа.
Поменяйте
matr=array[1..7,1..7] of Integer;
на
matr=array[1..7,1..7] of String;

тогда будет ругатся на

StringGrid1.Cells[j,i]:=IntToStr(A[i,j]);

Это тогда какой перевод будет, если не IntToStr?

[artyom256]

Теперь можно обойтись без IntToStr, ведь элементы массива и так строки, их не нужно переводить:
StringGrid1.Cells[j,i]:=A[i,j];

[Fri]

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

Теперь можно обойтись без IntToStr, ведь элементы массива и так строки, их не нужно переводить:
StringGrid1.Cells[j,i]:=A[i,j];

Да я так пробывал ошибку не пишет, но по нажатию на кнопку данные в таблицу всё равно не заносятся.

------------------------------------------

[Fri]

Кто знает,почему данные из файла в стринг грид не заносятся?