ReadInteger: Integer;
Метод ReadInteger осуществляет считывание целочисленного значения из текстового файла.
Sub Main;
Var
File1: IFileInfo;
TextR: ITextReader;
i: Integer;
Begin
File1:=New FileInfo.Attach("c:\New_folder\1.txt");
If File1.Exists Then
TextR:=File1.OpenTextReader;
i:=TextR.ReadInteger;
End If;
Dispose File1;
End Sub Main;
После выполнения примера в переменной «i» будет содержаться целочисленное значение, считанное из текстового файла «1.txt».
См.также: