anchor.diff:  function THttpConnectionWinInet.GetVerifyCert: boolean;
   begin
     result := FCertificateCheckDate and FCertificateCheckAuthority and
  -    FCertificateCheckHostName;
  +    FCertificateCheckHostName and FCertificateIgnoreRevocation;
   end;
   
   function THttpConnectionWinInet.GetResponseHeader(const Header: string): string;
  
positive.code:   FCertificateCheckDate := Value;
    FCertificateCheckAuthority := Value;
    FCertificateCheckHostName := Value;
  end;
  
  procedure THttpConnectionWinInet.DoRequest(sMethod, AUrl: string; AContent,
  
negative.code:                           raise EHTTPVerifyCertError.Create('SSL certificate common name (host name field) is incorrect.');
                          ERROR_INTERNET_SEC_CERT_DATE_INVALID:
                            raise EHTTPVerifyCertError.Create('SSL certificate date that was received from the server is bad. The certificate is expired.');
                          ERROR_INTERNET_SEC_CERT_REV_FAILED:
                            raise EHTTPVerifyCertError.Create('Unable to validate the revocation of the SSL certificate because the revocation server is unavailable');
                          ERROR_INTERNET_CANNOT_CONNECT,
                          ERROR_INTERNET_CONNECTION_ABORTED,
                          ERROR_INTERNET_CONNECTION_RESET:
  