OpenTextWriter(FileName: String; Truncate: Boolean): ITextWriter;
FileName — путь и наименование файла, который необходимо открыть.
Truncate — параметр, определяющий будет ли файл очищаться при открытии. True если будет.
Метод OpenTextWriter открывает файл для записи в текстовом виде и устанавливает курсор на начало файла.
Sub Main;
Var
TextW: ITextWriter;
Begin
If File.Exists("c:\New_folder\1.txt") Then
TextW:=File.OpenTextWriter("c:\New_folder\1.txt", True);
TextW.WriteDateTime(DateTime.Now);
End If;
End Sub Main;
После выполнения примера в файл «1.txt» будет записана текущая дата и время, преобразованная к текстовому виду. Файл будет перезаписан.
См.также: