| 
| 
 | Вопрос # 6 443/ вопрос открыт / | 
 |  Здравствуйте, эксперты!Есть глобальный хук на клавиатуру, который устанавливается при FormCreate и снимается при FormDestroy. Обработка производится через функцию KeyboardProc. Вопрос в том, что я не могу понять как мне динамически передавать в хук какую клавишу нужно обработывать. В функции KeyboardProc переданное значение теряется.
 
|  |   Вопрос задал: blackhawk (статус: Посетитель)Вопрос отправлен: 6 июня 2013, 10:50
 Состояние вопроса: открыт, ответов: 0.
 |  
 Мини-форум вопросаВсего сообщений: 2; последнее сообщение — 6 июня 2013, 14:30; участников в обсуждении: 2. 
|   | min@y™ (статус: Доктор наук), 6 июня 2013, 13:50 [#1]: LRESULT CALLBACK KeyboardProc(
    int code,          // hook code
    WPARAM wParam,  // virtual-key code <---- ОНО, НЕТ?
    LPARAM lParam   // keystroke-message information
   );Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | blackhawk (статус: Посетитель), 6 июня 2013, 14:30 [#2]:min@y™: Не, WPARAM как раз возвращает, вертуальный код нажтой клавиши.
 Соответственно я могу написать что то вроде
 
 If wParam <> 84 then
begin
  Result := CallNextHookEx(HookHandle, code, WParam, LParam);
  Exit;
end;Но в этом случае я хардкодом определяю код клавиши в dll. А мне нужно, чтобы например можно было выбрать на форме клавишу. И при запуске хука код этой клавиши передавался в хук.
 Но, если я делаю так
 
 procedure SetHook (PressKey : wParam); stdcall;
begin
  HookHandle := SetWindowsHookEx (WH_KEYBOARD, KeyboardProc, HInstance, 0);
end;То значение PressKey теряется в функции KeyboardProc. При старте форма имеет статус Visible = True. При нажатии на кнопку T Visible меняется на False. При повторном нажатии обратно на True. Соответственно получается так, что при первом нажатии PressKey содержит присвоенноне значение. Как только форма стала Visible = False, PressKey = 0.
 |  Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте. |