[Delphi] Модификация IdHTTP

[DaemoniZ]

Мне нужно повторить действия программа, которая делает запрос вида:

POST http://www.host.com/character_sync HTTP/1.1

написав программу с использованием IdHTTP (indy), оказалось что клиент отправляет запросы вида:

POST http://www.host.com:80/character_sync HTTP/1.0

Проблему с версией протокола я устранил
idHTTP.pas

427// if not (hoKeepOrigProtocol in FOptions) then
428 FProtocolVersion := pv1_1;
но с портом никак не получается.
Есть идеи?

[Nightmarе]

Порт же выставляется в опциях самого IDhttp клиента

[DaemoniZ]

Если его не выставить, то выдает ошибку и требует ввести значение.
Если ввести 0, то порт автоматом изменится на 80.

Пытался отловить этот момент - не смог.

Очень похоже, что то что мне нужно изменить находится начиная с 774 строчки idHTTP.pas

if FURI.Port <> IntToStr(IdPORT_HTTP) then
ARequest.Host := FURI.Host + ':' + FURI.Port
else
ARequest.Host := FURI.Host;
Но изменение этого кода ни к чему хорошему не привело.

[W!z@rD]

DaemoniZ
ты вообще уверен что он не по 80-му идет?
Мб стоит посмотреть в netstat?

[DaemoniZ]

По 80 на самом деле)

[Neogan]

По 80 на самом деле)

=)