Aussehen des TWebbrowsers verändern

[toms]

Zitat von Angel4585:

und zum andern soll bei einem rechtsklick auch nicht dieses StandardPopup kommen, weis jemand wie ich das hinkriege?

Kannst das auch ohne Hooks machen. Einfach eine TApplicationEvents Komponente platzieren und dann 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 
      if IsChild(WebBrowser.Handle, Msg.HWND) then 
      begin 
        Handled := True;
      end; 
end;