DE xe 10.4 Connection Closed gracefully

procedure Thread.CreateHTTP;
const
  HTTPS = 0;
  SOCKS4 = 1;
  SOCKS5 = 2;
var
  ptype: Integer;
begin
  with Soft do
  begin
    HTTP := TIdHTTP.Create(nil);
    SSL := TIdSSLIOHandlerSocketOpenSSL.Create(HTTP);
    HTTP.Request.useragent := useragent;
    HTTP.HandleRedirects := True;
    HTTP.AllowCookies := True;
    SSL.ConnectTimeout := Timeout;
    SSL.ReadTimeout := Timeout;
    HTTP.ConnectTimeout := Timeout;
    HTTP.ReadTimeout := Timeout;
    HTTP.IOHandler := SSL;
    HTTP.Request.Connection:='keep-alive';
    SSL.SSLOptions.SSLVersions := [sslvSSLv23, sslvTLSv1_2, sslvTLSv1_1, sslvTLSv1, sslvSSLv2, sslvSSLv3];
    ptype := 0;
 
 
      if (UseProxy) then
      begin
 
        if Proxies[IDProx].proxy_type = 'HTTPS' then
          ptype := HTTPS;
        if Proxies[IDProx].proxy_type = 'SOCKS4' then
          ptype := SOCKS4;
        if Proxies[IDProx].proxy_type = 'SOCKS5' then
          ptype := SOCKS5;
 
        case ptype of
          HTTPS:
            begin
              HTTP.ProxyParams.ProxyServer := Proxies[IDProx].proxy_server;
              HTTP.ProxyParams.ProxyPort := Proxies[IDProx].proxy_port;
              if Proxies[IDProx].proxy_auth then
              begin
                HTTP.ProxyParams.ProxyUsername := Proxies[IDProx].proxy_login;
                HTTP.ProxyParams.ProxyPassword := Proxies[IDProx].proxy_password;
              end;
            end;
 
          SOCKS4..SOCKS5:
            begin
              Socks := TIdSocksInfo.Create(SSL);
              HTTP.Socket.ConnectTimeout := Timeout;
              HTTP.Socket.ReadTimeout := Timeout;
              case ptype of
                SOCKS4:
                  Socks.Version := svSocks4;
                SOCKS5:
                  Socks.Version := svSocks5;
              end;
 
              SSL.TransparentProxy := Socks;
              Socks.Host := Proxies[IDProx].proxy_server;
              Socks.Port := Proxies[IDProx].proxy_port;
              if Proxies[IDProx].proxy_auth then
              begin
                Socks.Username := Proxies[IDProx].proxy_login;
                Socks.password := Proxies[IDProx].proxy_password;
                Socks.Authentication := saUsernamePassword;
              end
              else
                Socks.Authentication := sanoauthentication;
 
            end;
        end;
      end;
  end;
end;