При помощи данной процедуры, Написанной на языке Delphi, можно установить Proxy, через которую будет осуществляться работа в Internet, Proxy адрес указывается в формате адрес : порт, например 195.43.67.33:8080.
uses WinInet, UrlMon;
...
procedure ChangeProxy(aProxy: String);
var
PIInfo: PInternetProxyInfo;
begin
New(PIInfo);
PIInfo^.dwAccessType := INTERNET_OPEN_TYPE_PROXY;
PIInfo^.lpszProxy := PChar(aProxy);
// Список адресов, доступ к которым осуществляется не через прокси
PIInfo^.lpszProxyBypass := PChar('');
UrlMkSetSessionOption(INTERNET_OPTION_PROXY, piinfo,
SizeOf(Internet_Proxy_Info), 0);
Dispose(PIInfo);
end;
В Интернете есть все! Может это утверждение немного и преувеличено, но в огромном количестве информации несложно затеряться. И чтобы найти что-то действительно интересное в сети придется немало постараться, отсеивая мегабайты данных.