delphi的webbrowser控件中如何使用SOCKS5代理？

Delphi做的桌面软件，采集一个网站的数据，由于网站js太难，所以采用了嵌入浏览器的做法。现在有以下难点。

1、delphi里面嵌入webbrowser浏览器，怎样使用多线程？

2、我有带验证的socks5代理，怎样让webbrowser通过socks5代理ip来采集网站的数据？

3、如果以上两个问题都解决了，怎样在多线程里给每个webbrowser分配单独的socks5代理？

var
  PIInfo: PInternetProxyInfo;
begin
  New(PIInfo);
  PIInfo^.dwAccessType := INTERNET_OPEN_TYPE_PROXY;
  //PIInfo^.lpszProxy := PChar('socks=111.210.140.11:1080');
  PIInfo^.lpszProxy := PChar(Concat('http=', Edit1.Text));
  PIInfo^.lpszProxyBypass := PChar('');
  UrlMkSetSessionOption(INTERNET_OPTION_PROXY, piinfo, SizeOf(Internet_Proxy_Info), 0);
  Dispose(PIInfo);
  WebBrowser1.Navigate('http://www.123cha.com');
end;

以上代码测试通过的。webbrowser使用SOCKS5代理。

当然，还有更好的办法，如HOOK API，LSP劫持，还有更底层的驱动拦截小蜜蜂论坛顶帖机转发SOCKS5等。这些可以实现每个进程不同IP。