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;