Delphi：如何禁用TWebBrowser安全证书警报？

我正在编写一个Delphi应用程序，它使用TWebBrowser在表单上显示Google地图。但是，当它开始导航到HTML文件时，会多次（大约10次）显示一个警报：“

此站点安全证书的吊销信息不可用…”

”

---

我怎样才能防止TWebBrowser这样做？我是说禁用安全警告？我必须为Google和我的文件添加一个例外吗？如果是，如何进行？一些代码对我会有很大帮助。

取消选中控制面板-->Internet设置-->高级选项卡上的“检查服务器证书吊销”和“检查发布者证书吊销”设置

取消选中控制面板-->Internet设置-->Advanced tab

显示TWebBrowser组件有一个名为“Silent”的属性，当设置为“true”时，它会阻止此类对话框。

显示TWebBrowser组件有一个名为“Silent”的属性，当设置为“true”时，它会阻止此类对话框。

下面是一个快速的帮助片段。将“静默”设置为true，这将停止浏览器窗口显示任何对话框。这将执行您想要的操作，但如果出现任何问题，将不会显示这些问题，因为禁用了任何窗口显示

procedure TForm1.FormShow(Sender: TObject);
var
  WebAddress : string;
begin
  WebAddress := 'https://www.google.com/maps/place/Orlando,+FL/@28.4810971,-81.5088354';
  WebBrowser1.Silent := true;
  WebBrowser1.navigate(webaddress);
end;

---

如果您不介意尝试访问哪个地址，请参阅安全警告？

这里是一个快速的帮助片段。将“静默”设置为true，这将停止浏览器窗口显示任何对话框。这将执行您想要的操作，但如果出现任何问题，将不会显示这些问题，因为禁用了任何窗口显示

procedure TForm1.FormShow(Sender: TObject);
var
  WebAddress : string;
begin
  WebAddress := 'https://www.google.com/maps/place/Orlando,+FL/@28.4810971,-81.5088354';
  WebBrowser1.Silent := true;
  WebBrowser1.navigate(webaddress);
end;

---

如果您不介意尝试访问哪个地址，那么请查看安全警告？

修复证书不是比关闭警告更好吗？修复证书更好，但问题是…要禁用安全警告…@Hendra the

delphi

标记，建议问题是如何通过编程实现。这个答案涉及到用户禁用整个系统的安全检查。如果那真的是唯一的方法，那就这样吧，但你应该明确地说那是唯一的方法。否则，更精细的方法会更好，比如检测和消除某个特定程序的错误。不过，修复证书似乎是消除错误的另一种方法。或者可能是警报是真的，而解决方案仅仅在于（以某种方式）提供撤销信息？这个答案似乎是最后的解决办法。不，我的答案不是唯一的办法。我先前的回答只是对这个问题的快速回答。问题可能是由于客户端计算机无法访问证书颁发机构服务器，即防火墙/代理设置，或者CA服务器只是关闭（希望是间歇性的），或者Google maps服务器出现问题。从应用程序的角度来看，最好捕获错误，显示说明问题的自定义错误消息，并为用户提供处理该问题的选项。修复证书不是比关闭警告更好吗？修复证书更好，但是，由于问题是…要禁用安全警告…@Hendra，

delphi

标记建议问题是如何以编程方式执行此操作。这个答案涉及到用户禁用整个系统的安全检查。如果那真的是唯一的方法，那就这样吧，但你应该明确地说那是唯一的方法。否则，更精细的方法会更好，比如检测和消除某个特定程序的错误。不过，修复证书似乎是消除错误的另一种方法。或者可能是警报是真的，而解决方案仅仅在于（以某种方式）提供撤销信息？这个答案似乎是最后的解决办法。不，我的答案不是唯一的办法。我先前的回答只是对这个问题的快速回答。问题可能是由于客户端计算机无法访问证书颁发机构服务器，即防火墙/代理设置，或者CA服务器只是关闭（希望是间歇性的），或者Google maps服务器出现问题。从应用程序的角度来看，最好捕获错误，显示说明问题的自定义错误消息，并为用户提供处理该问题的选项。