| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как програмно изменить раскладку клавиатуры ? [D6, Win95/98]
Виталя © (2003-11-24 10:34:00)
Подсажите,пожалуйста, при помощи какой ф-ции можно переключиться с русской на английскую раскладку и обратно ?
Виталя (2003-11-24 11:38:00) [1]
Спасибо!
Vovchik_A (2003-11-24 11:29:00) [2]
00000422 - украинский
Vovchik_A (2003-11-24 11:11:00) [3]
LoadKeyboardLayout("00000409", KLF_ACTIVATE); // английский
LoadKeyboardLayout("00000419", KLF_ACTIVATE); // русский
Ferr (2003-11-24 10:59:00) [4]
Procedure ToEnglish;
var layout:PChar;
begin
getmem(layout, 100);
loadkeyboardlayout(strcopy(layout, "00000409"), klf_activate);
freemem(layout);
end;
Procedure ToRussian;
var layout:PChar;
begin
getmem(layout, 100);
loadkeyboardlayout(strcopy(layout, "00000419"), klf_activate);
freemem(layout);
end;
| |
