Делфи работа с файлами и массивами

[ProQsy]

Вот допустим имеется переменная f: file of byte; и массив map:array [0..19,0..19] of byte; и нужно все что внутри красного квадрата записать в массив.Зеленое не важно

[eoln]

Не влезет в массив всё, в красном выделении более 20 строк и более 30 столбцов

[ProQsy]

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

Не влезет в массив всё, в красном выделении более 20 строк и более 30 столбцов

Я случайно область выделил, пусть будет матрица 20 на 30

[eoln]

http://delphibasics.ru/BlockRead.php

var
  f: file of byte;
  map:array[0..19,0..29] of byte;
begin
  assignfile(f,'имя_файла');
  reset(f);
  BlockRead(f, map, 600);
  closefile(f);
end;

[ProQsy]

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

http://delphibasics.ru/BlockRead.php

var
  f: file of byte;
  map:array[0..19,0..29] of byte;
begin
  assignfile(f,'имя_файла');
  reset(f);
  BlockRead(f, map, 600);
  closefile(f);
end;

Как то не так работает, после BlockRead в массив записываются числа 48 51 13 10.
(48 48 48 48 48 48 51 51 51 13 10 51 51 51 51) примерно так

[Аватар]

примерно так

Что в файле то и прочитало. В символьном виде:

000000333
3333

Файл приложи

[ProQsy]

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

Что в файле то и прочитало. В символьном виде:

000000333
3333

Файл приложи

Вот

[ProQsy]

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

Что в файле то и прочитало. В символьном виде:

000000333
3333

Файл приложи

Может вы знаете другой вариант решения проблемы? без BlockRead

[Аватар]

А что надо то? Обыкновенный текстовый файл из 20 строк с фиксированной длиной строки 31 символ. Прочитай как текстовый в массив строк. В каждой строке тоже по индексу можно обращаться к символам

[min@y™]

Как звучит оригинал задания?