Delphi实现内网到内网的直接连接

【文件属性】：
文件名称：Delphi实现内网到内网的直接连接
文件大小：1.22MB
文件格式：RAR
更新时间：2015-10-08 09:27:34
内网到内网 本程序为一个真正点对点通讯示范程序：） 实现内网到内网的直接连接（QQ用的技术） 使用Delphi实现。在网上未看到类似的程序，特此发布提供喜欢的朋友参考。 通过UDP来实现穿透NAT的点对点通讯。 >>原定 程序设置一个共享目录里边所有文件都可供别人多点下载（类似BT） 独立服务端 负责消息中转、用户登陆 客户端从服务端获取用户列表 然后直连各个用户 以实现 聊天 语音 视屏 文件传输等可能的一切服务 >>>结果 由于工作太忙<一个小借口^O^>，文件传输、语音 视频等服务一直没去实现。 希望有朋友在此基础上完善后能发布了给大家学习：）

【文件预览】：
mmzmagic_PeerToPeer.gif
请先看我.url
天下网吧论坛.url
请先看我.txt
PeerToPeer
----Doc()
--------PLoveCon.exe(1.07MB)
--------DB.mmz(2KB)
----Client()
--------bin()
--------dcu()
--------Share()
--------sources()
----Public()
--------UntTBaseSocketServer.pas(2KB)
--------UntClient.pas(3KB)
--------UntSendThread.pas(8KB)
--------PMyBaseDebug.pas(14KB)
--------untFunctions.pas(36KB)
--------UntUser.pas(1KB)
--------UntProctol.pas(5KB)
--------UntTIO.pas(5KB)
--------UntCFGer.pas(2KB)
--------UntTBaseSocketClient.pas(3KB)
--------NMUDP.pas(23KB)
--------untFunction.inc(143B)
--------Public_Var.pas(1KB)
----Server()
--------Sources()
--------bin()
--------dcu()
readme.txt
帮助文档.htm