...disable the Popupmenu in TWebbrowser?
Author: Thomas Stutz
// Put a TApplicationEvents component on your form and assign a OnMessage event handler:
procedure TfrmMyBrowser.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
if (Msg.Message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONDBLCLK) then
begin
if IsChild(Webbrowser1.Handle, Msg.hwnd) then
begin
// Show your own Popupor or whatever you want here
Handled := True;
end;
end;
end;
printed from
www.swissdelphicenter.ch
developers knowledge base