请教：如何关闭WebBrowser控件的右键菜单？

Question

加个ApplicationEvents1然后写代码：
procedure TfrmMain.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
 if IsChild(WebBrowser1.Handle, Msg.Hwnd) and
     ((Msg.Message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONUP)) then
  begin
     // dxBarPopupMenu.PopupFromCursorPos ;//弹出自己的菜单
    Handled:=True;
  end;end;

Answer 1

to:lfpsoft
還是會出現右鍵菜單!

Answer 2

看看我做的DEMO吧
http://bbs.soft163.com/uploadImages/20027814494249082.zip