TEdgeBrowser 弹出菜单 / 上下文菜单

Question

TEdgeBrowser 弹出菜单 / 上下文菜单

delphi

4

如何覆盖TEdgebrowser组件中的上下文菜单？属性检查器没有提供此事件。

- USauter

很可能你做不到 - 如何禁用TWebBrowser上下文菜单？也没有答案。 - AmigoJack

@AmigoJack，针对这篇文章如何禁用TWebBrowser上下文菜单？，我发布了解决方案。 - USauter

欢迎来到 Stack Overflow（堆栈溢出）：它通过问题和答案工作。与评论相比，答案有更多的空间，可以发布实际代码和解释。我很确定一旦链接的资源不存在，你的评论很容易被忽略，更不用说毫无价值了。 - AmigoJack

1个回答

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- USauter · Accepted Answer

可以使用Javascript来取消上下文菜单。这个解决方案并不涵盖所有的使用情况，但对于我的问题足够了。

<!DOCTYPE html>
<html lang="de">
  <head>
  <title>Test</title>
  <script type='text/javascript'>
    let ContextMenuDefault = false;  
    document.addEventListener('contextmenu', function(event)
    {
      if (false == ContextMenuDefault)
       event.preventDefault();
    }, true);
  </script> 
  </head>   
  <body>
   Hello World
  </body>
</html>