OpenTextReader(FileName: String): ITextReader;
FileName — путь и наименование файла, который необходимо открыть.
Метод OpenTextReader открывает файл для чтения в текстовом виде.
Sub Main;
Var
TextR: ITextReader;
d: DateTime;
Begin
If File.Exists("c:\New_folder\1.txt") Then
TextR:=File.OpenTextReader("c:\New_folder\1.txt");
d:=TextR.ReadDateTime;
End If;
End Sub Main;
После выполнения примера в переменную «d» из файла «1.txt» будет получена дата и время.
См.также: