用Delphi实现P2P会话系统(包括完整的源码及必要的注释)
本文旨在用Delphi(ObjectPascal)面向对象(组件)的方法实现P2P(PeerToPeer)会话系统。本文可作为学习P2P通信与面向对象程序设计的用例。
一、通信组件:采用TIdUDPServer(属于IndyServers组件板)。
二、通信原理:利用P2P之UDP穿透Cone(锥型)NAPT原理。
三、系统特点:
1、所有会话命令均封装成对象。
2、每个命令对象都有Send(发送)与Exec(执行)方法。Send方法用于把对象(自己)发到对方,Exec方法完成对象的功能。
3、主要命令:Login(用户登录(C->S))、CloseSession(关
下载地址
用户评论
正在研究,测试中,希望有用
exe可以运行,但在xe2下无法编译,有些失望:(
没有正常使用的例子,自带的程序不能正常使用。编译在d7也不成功,indy用的是哪个版本?
一般资源,没有什么实质内容。另外,经测试失败。
本地信息发送及文件传输都可以,远程信息正常,文件传输失败