Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.08;
Скачать: CL | DM;

Вниз

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

 
Юрий Ж.   (2004-07-26 00:46) [0]

Вопрос вот в чем:
Есть у меня один компонент, конорый выводит текст и когда я нажимаю Ctrl+C я из него этот текст копирую методом:
ClipBoard.Clear;
ClipBoard.SetTextBuf(PChar(GetSelText))

Когда я далее вставляю этот текст (при помощи Ctrl+V) в Memo (например), то выдается, что-то типа:
&#196;&#238;&#225;&#240;&#238; &#239;&#238;&#230;&#224;&#235;&#238;&#226;&#224;&#242;&#252; (<-это строка "Добро пожаловать" :))

Если же я делаю Memo.Text:=GetSelText, то все ОК.
Что делать?
Спасибо!


 
GanibalLector ©   (2004-07-26 01:17) [1]

ActivateKeyboardLayout(LoadKeyboardLayout("00000419",0),0);


 
Anatoly Podgoretsky ©   (2004-07-26 09:21) [2]

Включи предварительно перед вставкой русский язык.


 
Юрий Ж.   (2004-07-26 14:41) [3]

ActivateKeyboardLayout(LoadKeyboardLayout("00000419",0),0); - РАБОТАЕТ!
А как перед изменением раскладки узнать какая активирована в данный момент, чтобы после ее восстановить ?


 
Юрий Ж.   (2004-07-26 14:43) [4]

ActivateKeyboardLayout(LoadKeyboardLayout("00000419",0),0); - РАБОТАЕТ!
А как перед изменением раскладки узнать какая активирована в данный момент, чтобы после ее восстановить ?


 
IceBeerg ©   (2004-07-26 18:18) [5]

GetKeyboardLayout(...


 
Юрий Ж.   (2004-07-27 02:41) [6]

Спасибо.
Я насамом деле и сам разобрался и для того, чтобы определить предидущую раскладку лучше сделать вот, что (может кому пригодится):

var
 Layout: HKL;
begin
 Layout:=ActivateKeyboardLayout(LoadKeyboardLayout("00000419",0),0);
 {ля-ля-ля}
 ActivateKeyboardLayout(Layout,0);
end;



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

Текущий архив: 2004.08.08;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
1-1090854565
Sergey Kaminski
2004-07-26 19:09
2004.08.08
Drag&amp;Drop наоборот


1-1090993782
Андрей Л.
2004-07-28 09:49
2004.08.08
Многострочный InputBox или InputQuery.


1-1090577903
VHS
2004-07-23 14:18
2004.08.08
Проблема вызова функции при событии FormActivate


14-1090569849
Skier
2004-07-23 12:04
2004.08.08
Москва-Питер


6-1086682066
anton.
2004-06-08 12:07
2004.08.08
TCPServer