Показать сообщение отдельно
  #3  
Старый 29.10.2006, 23:23
LonelyWolf LonelyWolf вне форума
Прохожий
 
Регистрация: 24.10.2006
Сообщения: 3
Репутация: 20
По умолчанию

Нашёл решение сам
Вообщем оно как всегда элементарно...
Цитата:
....
uses...urlmon, wininet...
....
var
PIInfo: PInternetProxyInfo;
begin
New(PIInfo);
PIInfo^.dwAccessType := INTERNET_OPEN_TYPE_PROXY;
PIInfo^.lpszProxy := PChar('socks=222.222.222.222:1080');
PIInfo^.lpszProxyBypass := PChar('');
UrlMkSetSessionOption(INTERNET_OPTION_PROXY, piinfo,
SizeOf(Internet_Proxy_Info), 0);
TWebBrowser1.Navigate('http://www.cmyip.com');
Dispose(PIInfo);
....
вот сообственно и всё что требовалось, при это настройки ИЕ не меняються!!!
Ответить с цитированием