Also ich habe eine kleines tool, worin eine Art Mini-Player integriert ist. Die Ansteuerung über die Multimedia-Tasten klappt perfekt (Wenn auch leider nur im Focus). Jedoch gibt es ein kleines Problem: ich brauche nicht alle Multimediatasten. Ich brauche nur Stop, Play/pause, next/back-track und viellei eventuell später noch ein oder zwei andere. Der Rest wie Laut/leise und ton Aus brauche ich nicht in meinem Tool, dafür jedoch deren uhrsprünglichen Zweck. Nun also meine Frage, wie ich die nicht benötigten Messages wieder weitergeben kann.
So hab ichs im Moment gelöst (ohne Weitergabe):
Delphi-Quellcode:
type
TMain = class(TForm)
procedure MultiKey(var Msg: tagMsg); message WM_APPCOMMAND;
private
{ Private declarations }
public
{ Public declarations }
end;
procedure TMain.MultiKey(var Msg: tagMSG);
begin
case Msg.wParam of
720896: if radio <> 3 then Switch(radio + 1);
786432: if radio <> 0 then Switch(radio - 1);
851968: if btn_play.Caption = 'II' then btn_play.Click;
917504: btn_play.Click;
end;
end;
Nun möchte ich suche ich noch eine Möglichkeit bei der Case-Anweisung irgendwie die Ungenutzen Messages weiterzuschicken, statt abzufangen.
Schonmal Thx im Vorraus!
mfg. chri_ri