Synapse Delphi HTTPS SSL GET Запрос

Question

Работает только запрос GET к URL-адресу HTTP. Если я пытаюсь запросить URL HTTPS, он ничего не возвращает. Я почти все перепробовал. Ценю любую помощь.

Вот мой код:

 SynHttp.Sock.CreateWithSSL(TSSLOpenSSL);
 SynHttp.Sock.SSLDoConnect;
 SynHttp.HTTPMethod('GET', 'https://www.google.com/');
 Resp.LoadFromStream(SynHttp.Document);
 HtmlResponse := Resp.Text;

SynHTTP является объектом THTTPSend.

Answer 1

Удостовериться:

1. ваше приложение exe может получить доступ ssleay32.dll а также libeay32.dll - самый простой способ - скопировать их в каталог вашего exe.
2. ты добавил ssl_openssl.pas а также ssl_openssl_lib.pas к вашему проекту.

Тогда это должно работать мгновенно.

Answer 2

Используйте HTTPSend и заголовки, работает с SSL в HTTPMethod. Если вы используете в URL 'https:' вместо только 'http:', то ваш запрос выполняется через соединение SSL/TLS:

aURL:='https://api.metadefender.com/v4/file/bzIwMDYxNi1TSW42NDBPVlprTWw3YjRBMQ';

with THTTPSend.create() do begin
  Headers.Add('apikey: 6b337c92c792174a54acd715ab1aae64');
  writeln(botostr(HTTPMethod('GET',aURl)));
  writeln('synapse get: '+StreamtoString3(document)) 
  writeln(itoa(ResultCode)+' '+ResultString);
  Clear;
  Free;
end;