ITextReader.Eof

Синтаксис

Eof: Boolean;

Описание

Свойство Eof возвращает признак окончания текста в файле.

Пример

Sub Main;

Var

File1: IFileInfo;

TextR: ITextReader;

Word: IStringList;

Begin

File1:=New FileInfo.Attach("c:\New_folder\1.txt");

Word:=New StringList.Create;

If File1.Exists Then

TextR:=File1.OpenTextReader;

While Not TextR.Eof Do

Word.Add(TextR.ReadWord);

End While;

End If;

Dispose File1;

End Sub Main;

После выполнения примера в переменной «Word» будет содержаться массив слов, считанный из файла «1.txt». В качестве разделителя между словами используется пробел.

См.также:

ITextReader