Файл как я понимаю текстовый? Есть еще логическая функция EOLN, которая возвращает true, если достигнут конец строки. То есть можно вложенным циклом перебрать все строки файла
Код:
while not EOF(f) do
begin
while not EOLN(f) do
begin
read(f,c);
{...}
end;
{...}
end;
Но в принципе от readln мало чем отличается.
Цитата:
надо много раз открыть файл на чтение
одновременно из одной проги чтоль? Или в разных участках кода? Закрываешь файл перед каждым новым открытием?