PHP DM Gate v0.9 » А буфер обмена кракозябры <span class="vd">[Delphi, Windows]</span>

CBR919RR © (15.02.12 17:08) [0]

Вот столкнулся еще с такой проблемой.
Из программы на Kol написанной, копирую в буфер обмена текст, вставляю в блокнот кракозябры.
Если перед копирование переключаю раскладку на русскую.
То вставляется нормальный текст, без кракозябров.
Между прочем такая же ситуация с дельфи 7.

Есть ли какое нибудь решение этого вопроса или надо менять раскладку на русскую перед копированием и восстанавливать после копирования.

<Цитата>
Vladimir Kladov © (15.02.12 17:32) [1]

http://www.procoding.ru/delphi-abrakadabra-v-bufere-obmena-abrakadabra-clipboard/

<Цитата>
CBR919RR © (16.02.12 09:44) [2]

Спасибо Владимир!
В Kol уже есть почти такая же функция на которую Вы дали ссылку.
Вот как все решилось.
С переключением раскладок, тоже все получается, только медленно работает.
Век живи и век учись.

procedure ButtonMyClick(Dummy : Pointer; Sender : PControl);
var
tmpW : KOLWideString;
begin
tmpW := KOLWideString(sHint[Sender.Tag]);
WText2Clipboard(tmpW);
end;

<Цитата>
CBR919RR © (16.02.12 11:01) [3]

procedure ButtonMyClick(Dummy : Pointer; Sender : PControl);
begin
WText2Clipboard(KOLWideString(sHint[Sender.Tag]));
end;

<Цитата>