[boobonick]

Здравствуйте! Столкнулся с такой ситуацией - не могу передать параметр keep-alive: 300 через request, т.е. Http.Request.Connect:=Keep-alive -такой метод есть, а вот как отослать "Keep-Alive: 300"

[NumLock]

Код:

  IdHTTP1.Request.CustomHeaders.Clear;
  IdHTTP1.Request.CustomHeaders.Add('bla bla bla');

[boobonick]

Вот тоже не понимаю:

Idhttp1.Request.ContentType := 'application/x-www-form-urlencoded';
IdHttp1.Request.Host:='www.123.com';
...........

Компонент же не сразу отправляет запросы? Какой командой реализуется отправка этих сформированных заголовков?

[bulldog]

Код:

with HTTP1 do
  begin
    ReadTimeout := 30000;
    ConnectTimeout := 30000;
    HandleRedirects := True;
    RedirectMaximum := 5;
    AllowCookies := True;
    with Request do
    begin
      UserAgent := 'Opera/9.64 (Windows NT 5.1; U; en) Presto/2.1.1';
      referer := '';
      Accept :=
        'text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1';
      AcceptLanguage := 'ru-RU,ru;q=0.9,en;q=0.8';
      AcceptEncoding := 'deflate, gzip, x-gzip, identity, *;q=0';
      AcceptCharset := 'iso-8859-1, utf-8, utf-16, *;q=0.1';
      Connection := 'keep-alive';
      with CustomHeaders do
      begin
        Add('Keep-Alive: 300');
      end;
    end;
  end;
  

Лучше делать в потоке

Компонент же не сразу отправляет запросы?

Сразу

Какой командой реализуется отправка этих сформированных заголовков?

Отправкой idhttp1

[NumLock]

отправка запроса:
IdHTTP1.Get...
или
IdHTTP1.Post...
если IdHTTP1.Request.ContentType := 'application/x-www-form-urlencoded' то значит Post и должно быть указано IdHTTP1.Request.ContentLength

[boobonick]

Большое спасибо! Сейчас буду фтыкать