IdHTTP mit SSL

[Klaus01]

Delphi-Quellcode:

function TMyRestService.GetSSL(AURL: String): String;
var
  AHTTP : TIdHTTP;
begin
  AHTTP := TIdHTTP.Create(nil);
  AHTTP.IOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(AHTTP);
  aHttp.IoHandler.SSLOptions.Method := sslvSSLv23;
  aHttp.IoHandler.SSLOptions.Mode := sslmUnassigned;
  AHTTP.HandleRedirects := True;

  Result := AHTTP.Get('https://de.wikipedia.org/wiki/Wikipedia:Hauptseite');

  AHTTP.Free;
end;

versuche es mal mit den obigen Änderungen.

Grüße
Klaus