Работа с файлами и WideString

[Alt]

Сообщение от vovk

Неее извините был не прав проблема есть сейчас попробую решить

буду благодарен! только уже завтра. сейчас мне пора уходить.

[vovk]

наткнулся на тему на нашем форуме тут применить правда не удалось пока, мож мне тоже поспать надо)) В общем если решу отпишусь

[Alt]

Не выход. В принципе, описанный там метод работает, но если использовать там те же стрелочки, то происходит ошибка работы с потоком.

[GunSmoker]

Как несложно сообразить, writeln в Delphi 2007 и ниже - ансёвый.

http://www.gunsmoker.ru/2010/04/delphi-2009.html

но если использовать там те же стрелочки, то происходит ошибка работы с потоком

Потому что стрелочки (как снова несложно догадаться) в том методе надо кодировать в UTF-8, раз уж вы в него пишете.

[vovk]

var
str: WideString ;
file1: textfile;
begin
str:='а просто так' ;
AssignFile(file1,'d:\123.txt');
rewrite(file1);
writeln(file1,UTF8Encode('■→→→'));
CloseFile(file1);
end;

[GunSmoker]

Ну и зачем там WideString?