@bme1979

Как мне перехватить то что посылает WebBrowser
Я делаю так

Меняю прокси и порт следующим образом (прочитал этот пример на форуме, не помню только на каком )

New(PIInfo);
PIInfo^.dwAccessType:= INTERNET_OPEN_TYPE_PROXY;
PIInfo^.lpszProxy:=PChar('127.0.0.1:8081');
PIInfo^.lpszProxyBypass:=PChar('');
UrlMkSetSessionOption(INTERNET_OPTION_PROXY, piinfo, SizeOf(Internet_Proxy_Info),0);
Dispose(PIInfo);

Потом делаю запрос

WebBrowser1.Navigate( URL );

С помощью ServerSocket1 я слушаю порт 8081

procedure TfrMain.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
var
ss:String;
begin
ss:=ServerSocket1.Socket.Connections[0].ReceiveText;
memo1.Lines.Add(ss);
end;

Данный которые должны уйти я получаю слушая порт 8081, например для www.rambler.ru

GET http://www.rambler.ru/ HTTP/1.0
Accept: */*
Accept-Language: en-gb
Cookie: ruid=AQAAAGhbbtAAAMAAA=
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
Host: www.rambler.ru
Proxy-Connection: Keep-Alive

Но у меня дальше 127.0.0.1 этот запрос не уходит.
Я хотел, что бы полностью запрос уходил и я мог отслеживать, что приходит на порт и что уходит т.е таким способом прослушивать мой WebBrowser

Помогите разобраться.
Спасибо.

0