Клавиатура

← →
Лана Розанова (2002-08-13 08:21) [0]

Всем привет!
Не могу отловить изменение при выборе языка клавиатуры.
Помогите. СПАСИБО.

← →
Ученик (2002-08-13 08:47) [1]

Находясь в конкретном элементе формы или в любом ?

← →
MBo (2002-08-13 09:00) [2]

WM_INPUTLANGCHANGEREQUEST ловить в application.onmessage

← →
Лана Розанова (2002-08-13 13:36) [3]

>MBo
А как это сделать?

← →
MBo (2002-08-13 13:40) [4]

пример есть в хелпе по TApplication.OnMessage
только Msg.Message=WM_INPUTLANGCHANGEREQUEST проверять и lparam смотреть (уточни в описании WM_INPUTLANGCHANGEREQUEST)

← →
Лана Розанова (2002-08-13 13:55) [5]

>MBo
Все получилось, но как определить установленный язык после запуска программы?

← →
MBo (2002-08-13 14:40) [6]

if Msg.message =WM_INPUTLANGCHANGEREQUEST then
caption:=inttohex(msg.lparam and $FFF,3);
$409 - Англ.
$419 - Русский

Клавиатура Найти похожие ветки