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

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

Русский язык в клипборде [D5]


Delph1 ©   (2004-07-26 11:34:00) 

Clipboard.AsText := 'Руский текст';
При вставке куда либо, например в эксель показывает абракадабру.
Как сделать по русски? Спасибо


Anatoly Podgoretsky   (2004-07-26 12:17:00) [1]

Суслик ©   (26.07.04 11:44) [3]
В Экселе это собираешься делать?


Delph1   (2004-07-26 11:48:00) [2]

Спасибо большое


Суслик   (2004-07-26 11:44:00) [3]

var
rus,
eng: HKL;
...
rus:=LoadKeyboardLayout('00000419', 0);
eng:=LoadKeyboardLayout('00000409', 0);
...
ActivateKeyboardLayout(rus, 0); //Включить русский.
ActivateKeyboardLayout(eng, 0); //Включить английский.


IceBeerg   (2004-07-26 11:43:00) [4]

Попробуй Clipboard.AsText := PChar('Ру сcкий текст');


Суслик   (2004-07-26 11:43:00) [5]

перед вставкой менять раскладку на русскую.
activatekeyborardlayout кажется это делает.


Наверх

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