Encoding: CodePage;
Свойство Encoding определяет кодировку текста для записи в файл.
Sub UserProc;
Var
f: IFileStream;
TxtWriter: ITextWriter;
Begin
f := New FileStream.Create("c:\File.txt", FileOpenMode.Create, FileShare.Exclusive);
TxtWriter := New TextWriter.Create(f);
TxtWriter.Encoding := CodePage.UTF8;
TxtWriter.WriteLnString("Welcome!");
TxtWriter.Flush;
Dispose f;
End Sub UserProc;
При выполнении примера будет создан новый текстовый файл «File.txt». В файл будет записана символьная строка в кодировке Unicode UTF8.
См.также: