avec TApplicationEvents: 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;
|