|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
В ОС Vista не перехватываются сообщения
Помогите, пожалуйста, разобраться. В ОС Vista не перехватываются сообщения смены раскладки клавиатуры. Под ОС XP все работает.
Код:
oldOnMessage: TMessageEvent; … oldOnMessage := Application.OnMessage; Application.OnMessage := LangChange; … procedure TLanguage.LangChange(var m: TMsg; var Handled: Boolean); begin if (m.message = WM_INPUTLANGCHANGEREQUEST) or (m.message = WM_INPUTLANGCHANGE) then … if Assigned(oldOnMessage) then oldOnMessage(m, Handled); end; Последний раз редактировалось Admin, 10.10.2008 в 11:20. |