функция позволяющая читать из файла по столбцам

Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду

Ответить
oif
Сообщения: 42
Зарегистрирован: 09 ноя 2006, 21:03

Спасибо всем за помощь.
А есть ли функция которая позволяет читать из файла не построчно,а по столбцам.
Или надо писать цикл?
Аватара пользователя
Nikoshka
Сообщения: 120
Зарегистрирован: 15 май 2006, 05:24

oif,
А в файле есть столбцы?
oif
Сообщения: 42
Зарегистрирован: 09 ноя 2006, 21:03

Допустим есть файл 320х192(320 столбцов 192 строчки)
Как считать символ 1 столбца по всем строчкам? Есть ли функция в delphi?
Аватара пользователя
somewhere
Сообщения: 1858
Зарегистрирован: 31 авг 2006, 17:14
Откуда: 71 RUS
Контактная информация:

Допустим есть данные в файле, 61440 байт (320х192), каждое значение есть символ. Содержимое файла представляет собой таблицу 320х192 символа. Тогда символ с координатами A,B (A - номер строки, B - номер столбца, начиная с 0) будет иметь смещение = 320*А + B

Небольшая подсказка :-)
It's a long way to the top if you wanna rock'n'roll
Аватара пользователя
LAngel
Сообщения: 277
Зарегистрирован: 30 мар 2005, 08:19
Откуда: Ульяновск
Контактная информация:

Читай весь файл в массив и обращайся по индексам ;)

Код: Выделить всё

var
  F: packed array[0..191, 0..319] of char;
begin
  with TFileStream.Create('filename.ext', fmOpenRead) do
  try
    Read(F[0, 0], SizeOf(F));
  finally
    Free
  end;
  {...}
end;
С уважением, Lost Angel...
Ответить