Страница 1 из 1

Добавлено: 11 ноя 2006, 12:42
oif
Спасибо всем за помощь.
А есть ли функция которая позволяет читать из файла не построчно,а по столбцам.
Или надо писать цикл?

Добавлено: 11 ноя 2006, 15:18
Nikoshka
oif,
А в файле есть столбцы?

Добавлено: 11 ноя 2006, 22:18
oif
Допустим есть файл 320х192(320 столбцов 192 строчки)
Как считать символ 1 столбца по всем строчкам? Есть ли функция в delphi?

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

Небольшая подсказка :-)

Добавлено: 13 ноя 2006, 11:33
LAngel
Читай весь файл в массив и обращайся по индексам ;)

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

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;