| Описание |
Функция Eof возвращает истину, если курсор файла, указанного в FileHandle, находится в конце.
Файл, должен был, быть назначен, и открыт с помощью Reset.
|
|
| Примечания |
Предупреждение после чтения последней строки файла, Eof будет true, даже при том, что данные считались успешно.
Так, что используйте Eof перед чтением, чтобы видеть нужно ли чтение.
|
|
| Похожие команды |
BlockRead Читает блок записей данных из нетипизированного двоичного файла
Eoln Возвращает true, если позиция курсора находится в конце строки
Read Позволяет прочитать данные из двоичного или текстового файла
ReadLn Позволяет прочитать полную строку данных из текстового файла
SeekEof Пропускает символы, пока не встретится конец файла
SeekEoln Пропускает символы, пока не встретится конец текущей строки или файла
| |
|
| Пример кода : Чтение до конца текстового файла |
var
myFile : TextFile;
text : string;
begin
// Попытка открыть файл Test.txt
для записи
AssignFile(myFile, 'Test.txt');
ReWrite(myFile);
// Запиcь нескольких известных слов в
этот файл
WriteLn(myFile, 'Hello');
WriteLn(myFile, 'World');
// Закрытие файла
CloseFile(myFile);
// Повторное открытие файла в режиме
только для чтения
Reset(myFile);
// Отображение содежимого файла
while not Eof(myFile) do
begin
ReadLn(myFile, text);
ShowMessage(text);
end;
// Закрытие файла в последний раз
CloseFile(myFile);
end;
|
Hello
World
|
|
