1

Delphi アプリケーションで appcommand_media_play、appcommand_media_stop、appcommand_media_nexttrack などをキャプチャしようとしています。

現在、私はコードを使用しています:

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 かもしれないと思います。しかし、これらの特別なキーをキャプチャする方法がわかりません。さらに、グローバルフックを作成するために必要なライブラリを作成したことはありません。

誰もこれを達成する方法を知っていますか?

返信をお待ちしております

そして私の英語を許してください

4

0 に答える 0