Tried to change UniMainModule.BrowserOptions at runtime:
if chkBrowserOptions.Checked=True then UniMainModule.BrowserOptions:=[]
else UniMainModule.BrowserOptions:=[boDisableMouseRightClick];
but this has no effect.
So I have a question - Is it possible to change UniMainModule.BrowserOptions in runtime?
Hi!
If question still relevant , try:
procedure TMainForm.UniButton1Click(Sender: TObject);
begin
if MainModule.UniMainModule.BrowserOptions = [] then begin
MainModule.UniMainModule.BrowserOptions := [boDisableMouseRightClick];
UniSession.AddJS('document.oncontextmenu = document.body.oncontextmenu = function () { return false; }');
end
else begin
MainModule.UniMainModule.BrowserOptions := [];
UniSession.AddJS('document.oncontextmenu = document.body.oncontextmenu = fu