flash - Flash を使用しているときに WebBrowser で右クリックを無効にする方法 (デルファイ)

Question

WebBrowser でフラッシュ ファイルを操作しているときに、フラッシュ プレーヤーのメニューを無効にするにはどうすればよいですか?

Answer 1

WebBrowserに送信されるすべてのメッセージは、Delphiアプリケーションも通過するため、TApplicationEventsコンポーネントを使用し、WebBrowserのハンドルまたはその子ハンドル（IsChildを使用）のOnMessageイベントで右クリックイベントを確認します。）そしてHandledを設定すると、それをブロックできるはずです。

コードは次のようになります

procedure TMyForm.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  if (Msg.message=WM_RBUTTONDOWN) and IsChild(WebBrowser1.Handle,Msg.hwnd) then
   begin
    PopupMenu1.Popup(Msg.pt.X,Msg.pt.Y);
    Handled:=true;
   end;
end;