Проблема с кодировкой

← →
scolopax © (2005-06-01 10:00) [0]

утро бодрое. проблема в следующем: из TStringList"a загруженного из простого текстового файла берется строка.
к примеру "русскоязычный текст" и записываю её в edit1 после этого я делаю следующее

Edit1.SelectAll;
Edit1.CopyToClipboard;

однако когда пытаюсь вставить в MS Word (xp) эту строку получается набор символов а-ля : ïîçâîëÿåò çàìåíèòü

вопрос: как добиться корректной работы с кодировками? т.е. как сделать так чтобы при извлечении из буфера в вордовский документ
текст корректно отображался

← →
evvcom © (2005-06-01 10:19) [1]

OemToChar + F1

← →
scolopax © (2005-06-01 10:48) [2]

oemtochar(pchar(tmp),pchar(tmp1));
такая строчка выдает ошибку в user32.

← →
evvcom © (2005-06-01 11:21) [3]

А под tmp1 кто память выделять будет? Наверное, Пушкина надо позвать. И вообще нафиг тебе tmp1? Чем не устраивает

pTmp: PChar;

pTmp := PChar(myString);
oemtochar(pTmp, pTmp);

← →
scolopax © (2005-06-01 11:57) [4]

все равно белиберда получается
çàäàíû åãî èìÿ, èìåíà è çíà÷åíèÿ àòðèáóòîâ - если просто из edit"a в ворд скопировать

ÿ¨õôõû õüvù ¤ûõüõýª Ö ¨õðûø÷ð¡ø ø÷ - если oemtochar использовать.

← →
evvcom © (2005-06-01 11:59) [5]

"Простой текстовый файл" в какой кодировке?

честно говоря не знаю. создавался блокнотом. потом текст из ворда туда записали.

ANSI кодировка

Проблема с кодировкой Найти похожие ветки