Einzelnen Beitrag anzeigen

Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#2

Re: Rechtsklick im webbrowser unterbinden

  Alt 11. Nov 2008, 03:58
Hallo

Beim TEmbeddedWB kannst du im OI
DisabledPopupMenus := [rcmAll] setzen. Somit werden sämtliche PopupMenus nicht angezeigt.


TWebbrowser: TApplicationEvents Komponente auf die Form setzen und im OnMessage folgenden Code schreiben:

Delphi-Quellcode:
procedure TfrmMyBrowser.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  if (Msg.Message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONDBLCLK) then
  begin
    Handled := IsChild(Webbrowser1.Handle, Msg.hwnd);
  end;
end;
Thomas
  Mit Zitat antworten Zitat