Ошибка/исключение Socket Error # 10060 Connection timed out

void __fastcall TMyOptionsForm::TestProxy()
{
    std::auto_ptr<TIdHTTP>IndyVT(new TIdHTTP(NULL));
    std::auto_ptr<TIdSSLIOHandlerSocketOpenSSL> ssl (new TIdSSLIOHandlerSocketOpenSSL(NULL));
    std::auto_ptr<TIdSocksInfo> soketInfo (new TIdSocksInfo(NULL));
 
    IndyVT->HandleRedirects = 1;
    IndyVT->Request->UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 5.1;en-US; rv:1.8.1.1) Gecko/20061204 Firefox/2.0.0.1";
    IndyVT->Request->Accept= "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8";
    IndyVT->Request->Connection= "keep-alive";
    IndyVT->Request->CustomHeaders->Add("Cookie: lang=en");
 
    if(ProxyChecked)
    {
        switch(ComboBox1->ItemIndex)
        {
                        //узнаем тип прокси (0- HTTP/HTTPS, 1 Socks4, 2 Socks5 )
            case 0:
            {
               soketInfo->Version = svNoSocks; 
               break;
            }
 
            case 1:
            {
               soketInfo->Version = svSocks4;
               break;
            }
            case 2:
            {
               soketInfo->Version = svSocks5;
               break;
            }
        }
                //
        if(OptProxi->Text !=" " || Host->Text.Length() !=0)
            soketInfo->Host = Host->Text;
 
        if(Port->Text.ToInt() !=0)
            soketInfo->Port = Port->Text.ToInt();
 
        if(ProxiLogin->Text !=" " || ProxiLogin->Text.Length() != 0)
            soketInfo->Username = ProxiLogin->Text;
 
        if(ProxiPassword->Text !=" " || ProxiPassword->Text.Length() != 0)
        {
            soketInfo->Password = ProxiPassword->Text;
            soketInfo->Authentication = saUsernamePassword;
        }
        else
            soketInfo->Authentication = saNoAuthentication;
 
        ssl->SSLOptions->SSLVersions = TIdSSLVersions() << sslvSSLv23;
        ssl->SSLOptions->VerifyMode = TIdSSLVerifyModeSet();
        ssl->SSLOptions->Mode =  sslmClient;
        IndyVT->IOHandler = ssl.get();
        ssl->TransparentProxy = soketInfo.get();
 
        std::auto_ptr<TIdMultiPartFormDataStream>PostData(new TIdMultiPartFormDataStream);
 
        PostData->AddFormField("NUMBER","");
        PostData->AddFormField("NUMBER","NUMBER","");
        UnicodeString Url= "URL";
 
        try
        {
            IndyVT->Post(Url, PostData.get());
            IndyVT->ResponseCode;
            ShowMessage("Ok");
        }
        catch(EIdHTTPProtocolException &E)
        {
            ShowMessage("Error = "+IntToStr(E.ErrorCode));
        }
        catch(EIdException &E)// Другие исключения Indy
        {
            ShowMessage("Error In= " + E.Message);
        }
        catch(Exception &E)   // Другие НЕ Indy исключения
        {
            ShowMessage("Error nouIn = " + E.Message);
        }
    }
}