Delphi:System.Net.HttpClient忽略SSL证书验证（获取服务器证书时出错）

我想发出一个GET请求，而不验证SSL证书

我已尝试实现ValidateServerCertificateCallback，但HTTP客户端仍引发异常：

异常类ENetHTTPCertificateException，消息为“获取服务器证书时出错”

我的代码：

procedure OnValidateServerCertificateCallback(const Sender: TObject; const ARequest: TURLRequest; const Certificate: TCertificate; var Accepted: Boolean);
begin
  Accepted := True;
end;

var
  aHTTP: THTTPClient;
begin
  aHTTP:= THTTPClient.Create();
  try
    aHttp.ValidateServerCertificateCallback := OnValidateServerCertificateCallback;
    aHTTP.Get('https://...');
  finally
    aHTTP.Free;
  end;
end;

---

在连接尝试使用服务器不再支持的协议时看到此错误。确保操作系统已更新并支持TLS 1.1和1.2。一个参考：