[-sanya-]

Нужно было отловить пакет отправляемый WebBrowser.
Я использовал функцию

Код:

procedure proxy_go(proxy: string);
var proxy_info : PInternetProxyInfo;
begin
New (proxy_info);
proxy_info^.dwAccessType := INTERNET_OPEN_TYPE_PROXY;
proxy_info^.lpszProxy := PChar(proxy);
proxy_info^.lpszProxyBypass := PChar('');
UrlMkSetSessionOption(INTERNET_OPTION_PROXY, proxy_info, SizeOf(Internet_Proxy_Info), 0);
Dispose(proxy_info);
end;

proxy_go('127.0.0.1:5001');

При этом создал в программе SocketServer и перехватил пакет.

Но как вернутся обратно незнаю, пробовал выгружать браузер WebBrowser1.destroy
и загружать заново динамически, но браузер продолжает отправять пакеты на мой socketserver.

Как отключить прокси в WebBrowser?
функция обратная Proxy_GO

Помогите пожалуйсто.

[-sanya-]

Все сам разобрался.

Нужно было выгрузить браузер WebBrowser1.destroy;
Выполнить эту команду proxy_go(':0');
И снова создать браузер динамически.