Скачать: CL | DM;

TStringList или StringReplace меняет кодировку   Найти похожие ветки 

← →
Вопрошающий   (2008-11-25 15:59) [0]

var
vr:TStringList;
...
 vr.LoadFromFile(Application.GetNamePath+"a.xml");
 vr.Text:=StringReplace(vr.Text,"LastWorkBegDate","яяяя",[]);
 vr.SaveToFile(Application.GetNamePath+"a.xml");


После выполнения этого кода в файле текст
работает в должности:
поменялся на
работает в должности:

Что делать?

---

← →
Palladin ©   (2008-11-25 16:02) [1]

>  TStringList или StringReplace

ни тот и не другой...

---

← →
Andy BitOff (PPC)   (2008-11-25 16:05) [2]

Перейти на более свежую дельфи или сохранить a.xml в кодировке винды, а не в юникоде.

---

← →
Поросенок Винни-Пух ©   (2008-11-25 16:15) [3]

или сохранить a.xml в кодировке винды, а не в юникоде.

стринглист в нем и не умеет сохранять.
кракозябры у него в ие, а не в файле. и только потому что кодировка 1251 не указана в a.xml

---

← →
clickmaker ©   (2008-11-25 16:22) [4]

это на utf-8 смахивает.
Utf8ToAnsi() в помощь

---

← →
Andy BitOff (PPC)   (2008-11-25 16:26) [5]

Поросенок Винни-Пух © (25.11.08 16:15) [3]
Я и имел в виду, что перед использованием в этом коде, надо пересохранить файл в другой кодировке.

---

← →
Поросенок Винни-Пух ©   (2008-11-25 16:29) [6]

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

лучше не носить воду вилами, а работать с xml его нативными методами

---

← →
Вопрошающий   (2008-11-26 12:17) [7]

> это на utf-8 смахивает.
> Utf8ToAnsi() в помощь

Точно... исходный файл был в utf-8.
После открытия преобразовал в ANSI, сделал StringReplace и преобразовал обратно в UTF-8
Все заработало.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c