| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Програмное переключение раскладки [D5, Win95/98, Win2k]
snl73 © (2004-09-20 02:08:00)Hi, All!
подскаже, как програмно переключить раскладку, т.е. при запуске проги на русскую, а при выходе назад. Недавно в рассылке проскакивала тема, не могу найти.
Koala (2004-09-20 11:18:00) [1]
{**********************************************************
* Module: Global.GetLangvKeyboard
* Date Created: 04/10/2004
* Last Modified:
* Input: LangvKeyb = [1,2,3] (рус, англ, укр)
* Output:
* Return:
* Description: Процедура переключения раскладки клавиатуры
**********************************************************}
procedure GetLangvKeyboard ( LangvKeyb : Integer);
begin
case LangvKeyb of
1 : LoadKeyboardLayout('00000419',KLF_ACTIVATE); //русский
2 : LoadKeyboardLayout('00000409',KLF_ACTIVATE); //английский
3 : LoadKeyboardLayout('00000422',KLF_ACTIVATE); //украинский
end;
end;
snl73 (2004-09-20 02:31:00) [2]а какой модуль надо подключить, чтобы это стаботало?(z-oleg.com/delphi/hardwkl.htm#hkl1)
TechnoDreamer (2004-09-20 02:12:00) [3]Язык и раскладка клавиатуры:
http://z-oleg.com/delphi/hardwkl.htm
| |
