глобальный хук appcommand_media_play, appcommand_media_stop и т. д. - PullRequest
Новая
       34

глобальный хук appcommand_media_play, appcommand_media_stop и т. д.

2 голосов
/ 01 июня 2011

Я пытаюсь захватить appcommand_media_play, appcommand_media_stop, appcommand_media_nexttrack и т. Д. В моем приложении delphi.

В настоящее время я использую код: 

procedure WM(var Msg: TMessage); message WM_APPCOMMAND;

procedure tform1.WM;
begin
case (msg.LParamHi AND NOT FAPPCOMMAND_MASK) of
  APPCOMMAND_MEDIA_PLAY: play;
  APPCOMMAND_MEDIA_PAUSE: pause;
  APPCOMMAND_MEDIA_STOP: stop;
  APPCOMMAND_MEDIA_NEXTTRACK: next;
  APPCOMMAND_MEDIA_PREVIOUSTRACK: prev;
end;
inherited;
end;

, но это работает, только когда окно имеет фокус.

Я думаю, что хорошим способом сделать это может быть Windows Hook ex.но я не знаю, как захватить эти специальные ключи с ним.Более того, я никогда не писал библиотеку, которая необходима для создания глобального хука.

Кто-нибудь знает, как этого добиться?

Я с нетерпением жду ваших ответов

и прошу прощения за мой английский

...