Текущий архив: 2004.10.03;
Скачать: CL | DM;
Вниз
Програмное переключение раскладки Найти похожие ветки
← →
snl73 © (2004-09-20 02:08) [0]Hi, All!
подскаже, как програмно переключить раскладку, т.е. при запуске проги на русскую, а при выходе назад. Недавно в рассылке проскакивала тема, не могу найти.
← →
TechnoDreamer (2004-09-20 02:12) [1]Язык и раскладка клавиатуры:
http://z-oleg.com/delphi/hardwkl.htm
← →
snl73 © (2004-09-20 02:31) [2]а какой модуль надо подключить, чтобы это стаботало?(z-oleg.com/delphi/hardwkl.htm#hkl1)
← →
Koala © (2004-09-20 11:18) [3]
{**********************************************************
* 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;
Страницы: 1 вся ветка
Текущий архив: 2004.10.03;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.03 c
