Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как узнать о изменении раскладки клавиатуры, Win 7 
:(
    Опции темы
AnalogXP
Дата 3.1.2010, 18:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 46
Регистрация: 23.9.2007

Репутация: нет
Всего: нет



Как узнать о изменении раскладки клавиатуры (даже когда моя программа не активна)? Пробовал все примеры что нашел, но в Win 7 ни один из примеров не работает.
Просветите, если можно как-то решить данную проблему. Спасибо!
PM MAIL   Вверх
CodeMonkey
Дата 3.1.2010, 18:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 16
Всего: 89



Так же, как и в предыдущих версиях Windows. При смене раскладки отправляется WM_INPUTLANGCHANGE. Если вам надо во всех приложениях - ставьте хук.


--------------------
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
AnalogXP
Дата 3.1.2010, 20:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 46
Регистрация: 23.9.2007

Репутация: нет
Всего: нет



Цитата(CodeMonkey @  3.1.2010,  16:50 Найти цитируемый пост)
Так же, как и в предыдущих версиях Windows. При смене раскладки отправляется WM_INPUTLANGCHANGE.

Ловить WM_INPUTLANGCHANGE не удалось. А вот CM_INPUTLANGCHANGE заработал.
Попробую паработить какой нибудь хук...

Это сообщение отредактировал(а) AnalogXP - 3.1.2010, 20:58
PM MAIL   Вверх
CodeMonkey
Дата 4.1.2010, 13:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 16
Всего: 89



Цитата(AnalogXP @  3.1.2010,  20:57 Найти цитируемый пост)
Ловить WM_INPUTLANGCHANGE не удалось

Телепатов нет. Как вы ловите сообщение, для меня - загадка.
Лично мне почему-то удалось ;)

Цитата(AnalogXP @  3.1.2010,  20:57 Найти цитируемый пост)
А вот CM_INPUTLANGCHANGE заработал

CM_INPUTLANGCHANGE - это Дельфёвое сообщение. В программе, писанной на другом языке, его нет в принципе.


--------------------
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
AnalogXP
Дата 4.1.2010, 14:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 46
Регистрация: 23.9.2007

Репутация: нет
Всего: нет



Цитата(CodeMonkey @  4.1.2010,  11:55 Найти цитируемый пост)
Телепатов нет. Как вы ловите сообщение, для меня - загадка.
Лично мне почему-то удалось ;)

Странно, решил еще раз попробовать, и заработало  smile 
Код

public
   procedure LangChange(var Mess: TMessage); message WM_INPUTLANGCHANGE;

...

procedure TForm1.LangChange(var Mess: TMessage); 
begin
    Showmessage('sss');
end;

PM MAIL   Вверх
AnalogXP
Дата 5.1.2010, 19:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 46
Регистрация: 23.9.2007

Репутация: нет
Всего: нет



Ан нет. Ошибся. Прошу прощения. Тут у меня таймерок заныкался, он-то меня и запутал, а я уже всех остальных.
Выше приведенный мною код, не работает. 
CodeMonkey, можете показать как Вам удалось поймать WM_INPUTLANGCHANGE в Windows 7 ?
PM MAIL   Вверх
AnalogXP
Дата 5.1.2010, 20:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 46
Регистрация: 23.9.2007

Репутация: нет
Всего: нет



Вот по теме: http://forum.vingrad.ru/topic-232937.html
Цитата

Но WM_INPUTLANGCHANGE и WM_INPUTLANGCHANGEREQUEST всё равно не ловятся под OS Vista.


Это сообщение отредактировал(а) AnalogXP - 5.1.2010, 20:19
PM MAIL   Вверх
CodeMonkey
Дата 6.1.2010, 14:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 16
Всего: 89



Windows 7, 64-х битная, D2010 (пробовал как с MainFormOnTaskBar, там и без него):

Код
type
  TForm4 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
    procedure WMInputLangChange(var Msg: TMessage); message WM_INPUTLANGCHANGE;
  end;

var
  Form4: TForm4;

implementation

{$R *.dfm}

procedure TForm4.WMInputLangChange(var Msg: TMessage);
begin
  Caption := DateTimeToStr(Now);
end;


Может вы просто не то ожидаете от сообщения? Сообщение приходит для вашей смены раскладки. Т.е. ваше окно активно, вы меняете раскладку - приходит сообщение. Потому что у вас изменили раскладку и вам это интересно. Если окно не активно и вы меняете раскладку - сообщение не приходит. Потому что ваша раскладка не изменяется. Изменяется раскладка другого приложения.

Добавлено через 1 минуту и 8 секунд
P.S. Если используете Delphi до 2009-й, то попробуйте ловить сообщение у Application, а не формы.


--------------------
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
AnalogXP
Дата 7.1.2010, 02:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 46
Регистрация: 23.9.2007

Репутация: нет
Всего: нет



У меня: Windows 7, 32-х битная, D2010
Про сообщение активному окну знаю. 

Результата нет. 
PM MAIL   Вверх
CodeMonkey
Дата 7.1.2010, 13:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 16
Всего: 89



Остаётся проверить установку апдейтов на Delphi/Windows и установку всяких хрюшек, которые могут блокировать сообщение.


--------------------
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




[ Время генерации скрипта: 0.0493 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.