SetProcessProxy (127.0.0.1, 80);
-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -}
The function SetProcessProxy (const aProxyServer: string; Const aProxyPort: Integer) : Boolean;
Var
VProxyInfo: TInternetProxyInfo;
The begin
VProxyInfo. DwAccessType:=INTERNET_OPEN_TYPE_PROXY;
VProxyInfo. LpszProxy:=PChar (Format (' HTTP=% s: % d ', [aProxyServer aProxyPort]));
VProxyInfo. LpszProxyBypass:=PChar (");
Result:=UrlMkSetSessionOption (INTERNET_OPTION_PROXY @ vProxyInfo, SizeOf (vProxyInfo, 0)=S_OK;
end;
Here can't enter socket5 user name and password, consult how great god webbrowser agent have validation socket5