| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Язык
Klim Samgin © (2003-07-04 13:12:00)
Доброго времени суток.
Не подскажите ли как определить, какой язык задействован при запуске программы и как переключить его на нужный (программно естественно)
Shluz (2003-07-04 20:40:00) [1]
установка раскладки
LoadKeyboardLayout("00000409", KLF_ACTIVATE); - английский
LoadKeyboardLayout("00000419", KLF_ACTIVATE); - русский
получение :
function GetActiveKbdLayout : Word; stdcall;
var
hWindow,idProcess : THandle;
begin
// получить handle активного окна чужой программы
hWindow := GetForegroundWindow;
// Получить идентификатор чужого процесса
idProcess := GetWindowThreadProcessId(hWindow,nil);
// Получить текущую раскладку в чужой программе
Result:=(GetKeyboardLayout(idProcess) shr $10);
end;
MBo (2003-07-04 13:17:00) [2]
FAQ
| |
