Справочник функций и процедур Delphi: Eof

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

Eof
Функция
Возвращает true, если позиция курсора находится в конце файла открытого с помощью Reset System unit
  function Eof ( var FileHandle : TextFile ) ;

Delphi Sources

Описание
Функция 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
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте