Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: BCB или Delphi. Компоненты работы с HTTP и Keep-Alive.  (Прочитано 11834 раз)
0 Пользователей и 1 Гость смотрят эту тему.
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« : 06-01-2010 17:22 » 

Нужен компонент HTTP клиента, поддерживающий Keep-Alive (последовательные HTTP-запросы в рамках одного TCP-подключения к веб-серверу).

Вопрос: есть ли таковые компоненты?
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
zubr
Гость
« Ответ #1 : 06-01-2010 18:43 » 

TIdHTTP - индикомпонент входящий в стандартную поставку компонентов, начиная с Delphi7:
IdHTTP1.Response.KeepAlive := True;
Записан
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #2 : 06-01-2010 19:04 » 

zubr, какая у тебя версия Delphi?
У меня BCB6, что соответствует D7, но KeepAlive там нет - уже искал.

P.S.: нашу тему через поиск. Улыбаюсь
« Последнее редактирование: 06-01-2010 19:06 от RXL » Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
zubr
Гость
« Ответ #3 : 06-01-2010 19:24 » 

Пользуюсь 2-мя версиями - D7 и D2007
В D7 есть компонент TIdHTTP, находится в пакете Internet Direct (Indy), в D2007 этот компонент находится в пакете Indy 10 Protocols Design Time. Проверь, может у тебя не подключен нужный пакет (меню Component->Install Packages).
Записан
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #4 : 06-01-2010 19:36 » 

Проверь, пожалуйста, в D7 - есть ли там KeepAlive?
Вроде как с BCB6 у них одна VCL.


Уже не надо - сам проверил. Как ни странно, но там есть. Такое ощущение, что у них совершенно разные версии. Совсем дургой состав свойств.
« Последнее редактирование: 06-01-2010 19:40 от RXL » Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
zubr
Гость
« Ответ #5 : 06-01-2010 20:07 » new

Вот класс TIdHTTPResponse (тип свойства IdHTTP1.Response):
Код:
TIdHTTPResponse = class(TIdResponseHeaderInfo)
  protected
    FHTTP: TIdCustomHTTP;
    FResponseCode: Integer;
    FResponseText: string;
    FKeepAlive: Boolean;
    FContentStream: TStream;
    FResponseVersion: TIdHTTPProtocolVersion;
    //
    function GetKeepAlive: Boolean;
    function GetResponseCode: Integer;
  public
    constructor Create(AParent: TIdCustomHTTP); reintroduce; virtual;
    property KeepAlive: Boolean read GetKeepAlive write FKeepAlive;
    property ResponseText: string read FResponseText write FResponseText;
    property ResponseCode: Integer read GetResponseCode write FResponseCode;
    property ResponseVersion: TIdHTTPProtocolVersion read FResponseVersion write FResponseVersion;
    property ContentStream: TStream read FContentStream write FContentStream;
  end;
Записан
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #6 : 06-01-2010 20:20 » 

Вечно какие-то проблемы с BCB6. Перейти что ли на D7... Последний раз на паскале лет 17 назад писал.
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines