Delphi如何实现Http代理登陆的功能??请进!很急

喜欢编程朋友 2005-10-23 08:57:50

大家好,我遇到了一个难题,就是:
Delphi如何实现Http代理登陆的功能??就是说做一个程序可以用Http代理的方式登陆,就像QQ登陆的时候,可以选择Http代理登陆这种方式,用Delphi如何来实现登陆??现在非常急,请各位同仁帮忙!!多谢了!!
...全文
290 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
clasj 2005-11-15
  • 打赏
  • 举报
回复
个人认为简单应用时用该方法代理TCP连接非常爽,正规一点还是应该实现socket4、socket5:)
clasj 2005-11-15
  • 打赏
  • 举报
回复
ly_liuyang(Liu Yang)说的对,其他人都跑题了:)

详情请见:
http://www.codeguru.com/Cpp/I-N/internet/http/print.php/c6209/

个人经验:
用TIdTCPClient实现非常容易,直接用它的WriteLn函数发送字符串,接收就用ReadLn。
用TClientSocket实现,请先将它设置为阻塞模式,然后用SendText函数发送字符串时要自己在字符串结尾加上#13#10,接收就用ReceiveText。
k2222 2005-11-15
  • 打赏
  • 举报
回复
建议使用TIdHTTP。DEphi6下demo\indy\idhttp的实例带有代理服务器功能。
源码就不贴了。你自己看吧。
baiduan 2005-10-25
  • 打赏
  • 举报
回复
kan
var
isa:SOCKADDR_IN;
isa_len:integer;//接受客户端的套接字。
acceptsocket:Tsocket //主机
targethost:pchar//端口
begin
client:=socket(pf_inet,sock_stream,ipproto_ip);
if client+invalid_socket then
//showerror
end;
ca.sin_family:=pf_inet;//ip zu
ca.sin_port=htons(targetprot);//转换网络字节
hostadd:=inet_addr(targethost);
if (hostaddr=-1) then
//showerror
end;
太多了。。。。。看能不能帮你
ly_liuyang 2005-10-24
  • 打赏
  • 举报
回复
如果是HTTP的,就上面的方法
其他TCP的,例如FTP,POP的,就需要HTTP Tunnel代理
需要自己开发实现的

QQ用的是HTTP Tunnel

_____________________
http://lysoft.7u7.net
Dorice 2005-10-24
  • 打赏
  • 举报
回复
TIdHTTP有ProxyParams属性可以设置

1,594

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧