Модуль: System
Описание
Функция определяет, стоит ли указатель текущей позиции в конце файла Vf (Vf - файловая переменная). Если указатель стоит на последнем символе файла, или файл не содержит данных, то функция возвращает True, а иначе - False
.
Пример
var
Vf1,Vf2: TextFile;
FileName1, FileName2: string;
C: Char;
begin
FileName1:='read.txt'; //подразумевается, что файл существует
FileName2:='write.txt';
AssignFile(Vf1, FileName1);
Reset(Vf1);  //открывает файл 'read.txt'
AssignFile(Vf2, FileName2);
Rewrite(Vf2);    //создает файл 'write.txt'
while not Eof(Vf1) do //повтор, пока не достигнут конец файла
begin
Read(Vf1, C);  //читает символ из файла 'read.txt'
Write(Vf2, C);  //записывает символ в файл 'write.txt'
end;
CloseFile(Vf2);
CloseFile(Vf1);
end;