Функция Eof()

Возвращает состояние конца файла.

Объявление:

{Типизированные или нетипизированные файлы:}
Function Eof(Var F) : Boolean;

{Текстовые файлы:}
Function Eof(Var F : Text) : Boolean;

Режим:

Windows, Real, Protected

Замечание:

Параметр F (если определен) является переменной текстового файла. Если параметр F отсутствует, то подразумевается стандартная файловая переменная Input. Eof(F) возвращает значение True, если указатель текущей позиции файла находится вне последнего символа файла или если файл вообще не содержит компонентов, иначе, Eof(F) возвращает False. В режиме {$I-} функция IOResult вернет нуль, если операция была успешна, иначе она вернет отличный от нуля код ошибки.

Пример:

{Пример программы для функций Eof, Read и Write}
{текстовые файлы}

Uses Crt, Dos;

Var F : Text;
   Ch : Char;

Begin
 {Получаем имя файла из командной строки}
 Assign(F, ParamStr(1));
 Reset(F);
 While Not EOF(F) Do
 Begin
  Read(F, Ch);
  Write(Ch);  {Выводим содержимое файла на экран}
 End;
End.