Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

нечитаемая кодировка строк [D6, WinXP]


DSKalugin ©   (2005-01-19 18:22:00) 

программно читаю данные из XML-файла и получаю строки с непонятной кодировкой типа
РчРєС' С_С┼РчРїР>РчР_РёС_ 59
хотя в блокноте все прекрасно читается.
Если смотреть Far' ом - таже ересь.

Это явно не дос, а скорей Юникод. Не уверен.
Как перевести программно


palva   (2005-01-20 19:37:00) [1]

DSKalugin ©   (20.01.05 17:20) [4]
> Блин, 2 дня убил :-((
Типа я же и виноват...

Ну и спросили бы еще раз. Не я бы ответил, так кто-нибудь другой. Это ведь не поле чудес, здесь правильных ответов может быть много. Незачем два дня искать второй ответ, если первый ответ уже есть.


DSKalugin   (2005-01-20 17:20:00) [2]

а вот и не помогло мне MultiByteToWideChar
правильный ответ: использовать Utf8ToAnsi()
Блин, 2 дня убил :-((


palva   (2005-01-19 19:19:00) [3]


uses Windows, Dialogs;
var
 s: WideString;
 s8: String;
begin
 s8 := #$D0#$9C#$D0#$BE#$D1#$81#$D0#$BA#$D0#$B2#$D0#$B0;
 SetLength(s, 6);
 MultiByteToWideChar(CP_UTF8, 0, PChar(s8), 12, PWideChar(s), 12);
 ShowMessage(s);
end.


DSKalugin   (2005-01-19 18:38:00) [4]

2 palva

а пример использования можно?
Спасибо за наводку :-)


palva   (2005-01-19 18:34:00) [5]

UTF-8. Использовать MultiByteToWideChar с первым параметром CP_UTF8


Наверх

Титульная страница Поиск, карта сайта Написать письмо