Зависание при пост запросе

[Фенрир]

Добрый вечер. Просьба подсказать, если кто сталкивался.
У меня проблема.
ПРи пост запросе (https ) именно через прокси программа зависает. Если ловить исключение, то в сообщение - 200 OK.

       m_domain := doms [ random(6) + 1 ];
                  multi.AddFormField('login', m_login);
                  multi.AddFormField('domain', m_domain );
                  multi.AddFormField('fullname', name);
                 multi.AddFormField('RecoverPassword', '');
                  multi.AddFormField('newpass', 'abcdefghij');
                 multi.AddFormField('newpass2', 'abcdefghij');
                  multi.AddFormField('genpass', 'abcdefghij');
                  multi.AddFormField('recaptcha_challenge_field', s_post);
                 multi.AddFormField('recaptcha_response_field', capcha);
                 multi.AddFormField('create', convertencoding ('Зарегестрировать', cmAnsiToKoi8R));

                 idhttp1.Request.Referer := 'https://stat.zenon.net/c/cgpaccount';
     try  // если без блока try - except то прога зависает
                 idhttp1.ProtocolVersion := pv1_1;
                 idhttp1.ReadTimeout := 100000;
                 idhttp1.Port := 443;

                 idhttp1.Post ('https://stat.zenon.net/c/cgpaccount', multi, ss);
                     except
                     on e : exception do   begin
                    _trace (e.message); // 200 OK
                       _trace (inttostr (idhttp1.ResponseCode) );
                       //showmessage (idhttp1.Response.RawHeaders.Text);
                       if idhttp1.ResponseCode = 302 then  idhttp1.Post ('https:// stat.zenon.net/c/cgpaccount', multi, ss);
                        end;
                     end;

Инициализирую так:

   idhttp1 := TidHttp.Create(nil);
    cook := tidcookiemanager.Create(idhttp1);
     idhttp1.CookieManager := cook;
     idhttp1.AllowCookies := true;
     idhttp1.CookieManager.CookieCollection.Clear;
     idhttp1.HandleRedirects := True;

    idhttp1.Request.Host:='zmail.ru';
    idhttp1.Request. UserAgent :='Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.0.10) Gecko/2009042316 Firefox/3.0.10';
    idhttp1.Request.Accept:='text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8';
    idhttp1.Request.AcceptLanguage:='ru,en-us;q=0.7,en;q=0.3';
    idhttp1.Request.AcceptCharSet:='windows-1251,utf-8;q=0.7,*;q=0.7';
    idhttp1.Request.Connection:='keep - alive';
    idhttp1.Request.ContentType := 'text/html; charset=koi8-r';
    idhttp1.ProtocolVersion:=pv1_0;
    idhttp1.Port := 443;
    SSLIO := TidSSLIOHandlerSocket.Create(idhttp1); // https
     SSLIO.SSLOptions.Method := sslvSSLv2; // sslvSSLv3;
     sslio.SSLOptions.Mode := sslmUnassigned;
     idhttp1.IOHandler := SSLIO;

Без использования прокси НИКАКИХ проблем нет. С прокси страница регистрации, капча, все нормально принимается. но при пост запросе виснет.

Прокси так устанавливаю
предварительно заполнив структуру proxy

    procedure TRegThread.init_http;
          function is_proxyvalid (var p : tproxy) : Boolean;
             Begin
                Result := True;
                try
             idhttp1.Get('http://www.google.com/index.html');
             idHTTP1.Disconnect;
           except
           on E: EIdException do begin    // ïðîêñè íå âàëèäåí
           _trace ( 'Ïðîêñè :  ' +format ('%s:%d',[p.ip, p.port]) + ' íå ðàáî÷èé');
            result:=false;
             end;  // except1
            On E:exception do begin
            _trace ( 'ProxyError :  ' + E.Message);
           Result :=false;
           end;  // except2
           end;  // except
         end;  //func
       begin
        if  buseproxy then begin; //  èñïîëüçóåì ïðîêñè
              repeat
              _trace ('Âûáèðàåò ïðîêñè');
              entercriticalsection (cs);
              form1.GetProxy(proxy);
              leavecriticalsection (cs);
               _trace ( 'Ïðîâåðêà Ïðîêñè :  ' +format ('%s:%d',[proxy.ip, proxy.port]));
            //   try
              idhttp1.ProxyParams.ProxyServer:=proxy.ip;
              idhttp1.ProxyParams.ProxyPort:=proxy.port;
              idhttp1.ProxyParams.ProxyUsername:=proxy.log;
              idhttp1.ProxyParams.ProxyPassword:=proxy.pass;
              idhttp1.ProxyParams.BasicAuthentication:= proxy.basic   ;
             // except
              //end;
              if is_proxyvalid (proxy) then break;
              until  false;
              _trace ('Ðàáîòàåò ÷åðåç ïðîêñè: ' + format ('%s:%d',[proxy.ip, proxy.port]));
          end;
          idhttp1.CookieManager.CookieCollection.Clear;
       end;

[zoso]

Чувак, если мы тебя поймаем, то за свою спамерскую тулзу - который ты хочешь спамить через наш хостинг - дадим по ушам! )))