[Gareth]

Здравствуйте!

Хотел бы узнать как сделать горячую кнопку мыши, именно мыши!
Программа будет свернута, и по нажатию гор. клавиши она будет появляться.

Гор. клавишу делаю так:

Код:

procedure WMHotKey(var Message:TMessage); message WM_HOTKEY;





procedure TForm1.WMHotKey(var Message: TMessage);
begin
ShowMessage('Работает');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  RegisterHotKey(Handle, 1, VK_MBUTTON, MOD_CONTROL);

end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
UnRegisterHotKey(Handle,1);
end;

И по нажатию CTRL+скролл ничего не происходит.
А если поменять VK_MBUTTON к примеру на VK_DOWN - всё работает.
Почему так? Как сделать среднюю кнопку мыши горячей ?

[Gareth]

Up

Что, никто не знает что ли?

[NumLock]

Сообщение от Gareth

Что, никто не знает что ли?

я знаю. просто я вчера в 22.00 выключил компьютер, а сегодня в 18.00 включил.

RegisterHotKey не работает с мышкой потому что она из раздела Keyboard Input. используй SetWindowsHookEx к примеру с WH_MOUSE (WH_MOUSE_LL)