windows Сохранение кириллицы в юникоде

[Вадим Смоленский]

Записываю русский текст в файл:

procedure WriteToFile;
var F: TextFile;
    S: string;
begin
 S:='Русский текст';
 AssignFile(F,MyFile.txt');
 ReWrite(F);
 WriteLn(F,S);
 CloseFile(F);
end;

Тип данных string - по идее, то же, что WideString. То бишь, в строку S записан юникод. Тем не менее, открывая потом файл, вижу, что русский текст сохранен в ANSI. Как добиться его сохранения в юникоде?

[krapotkin]

все просто. используем способы работы с файлами из этого века и все ок

у всех потомков TStream есть конструкторы с параметром Encoding. Используем их и пишем в любой требуемой кодировке.

[x11]

Используйте TStringList

[x11]

11 час назад, Вадим Смоленский сказал:

открывая потом файл

 

Может, проблема в том, чем именно открываете?

Может текст всё-таки хранится правильно, но отображается неправильно?

[Вадим Смоленский]

2 минуты назад, x11 сказал:

Может текст всё-таки хранится правильно, но отображается неправильно?

Под русской или английской локалью отображается тоже правильно. А вот под японской вся кириллица превращается в чорт знает что. Из чего следует, что хранится она все-таки не в юникоде.

Изучаю способы работы с файлами из этого века, надеюсь победить.

[Вадим Смоленский]

Оказалось проще некуда:

Q:=TStringList.Create;
Q.Add('Русский текст');
Q.SaveToFile('FileName',TEncoding.UTF8);

Низкий поклон людям из нового века!

[Andrey Efimov]

Обратите внимание на модуль http://docwiki.embarcadero.com/Libraries/Tokyo//en/System.IOUtils.TFile