Функции и процедуры Delphi. Справочник.

 

Не знаешь, где искать?
Читай Delphi FAQ!

 


III. ФУНКЦИИ И ПРОЦЕДУРЫ ДЛЯ РАБОТЫ С ФАЙЛАМИ

1. Основные функции и процедуры для работы с файлами


Функция Eof( var Vf ): Boolean;


Модуль: 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;


[Вернуться к содержанию]

 


Рейтинг@Mail.ru