网络及通讯开发
求救，TIdUDPServer问题，急！
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区相关推荐
QQ(P2P)聊天系统的原理与实现
本文旨在用Delphi面向对象的方法实现P2P(Peer To Peer)(类QQ)会话系统。本文可作为学习P2P通信与面向对象程序设计的用例。 一、 通信组件：采用TIdUDPServer(属于Indy Servers组件板)。 二、 通信原理:：利用P2P之UDP穿透Cone(锥型)NAPT原理。 三、 系统特点： 1、所有会话命令均封装成对象。 2、每个命令对象都有Send(发送)与Exec(执行)方法。Send方法用于把对象(自己)发到对方，Exec方法完成对象的功能。 3、主要命令：Login(用户登录(C->S))、CloseSession(关闭会话(S->C)) 、 Binding(回复用户绑定信息(客户端经NAT后的IP&Port;)(S->C))、OnlineList(回复当前在线用户列表(S->C))、Upline(用户上线(C->C))、Logout(用户登出(C->S))、 Leaveline(用户离线(C->C))、 Chat(会话(交谈、闲聊)(C->C))、Upload(上载(数据)文件(C->C))
UDP十六进制数据传输
if chkHexReceive.Checked then begin strLength := length(ss); for i := 1 to strlength do begin byteTemp := byte((ss[i])); hexOffset := (inttohex(byteTemp, 2)); //肮奻珨曆硒俴眈肮腔髡夔˙ strTemp := strTemp + hexOffset + ' '; end; intcount := length(strtemp); hexint := 0; while intcount 0 do begin strFirst := leftstr(strtemp, 48); strtemp := rightstr(strtemp, intcount - 48); intcount := length(strtemp); hexOffset := inttohex(hexint, 4); mmRcv.Lines.Add('0x' + hexOffset + ': ' + trim(strFirst)); hexint := hexint + 16; end; end
Indy UDP/TCP 通信与文件传输
Indy UDP/TCP 通信与文件传输 使用UDP进行基本通信, TCP进行文件转输,支持大文件传输
delphi UDP通讯
delphi实现UDP通讯，使用Indy组件，包含客户端和服务端。
indy10 UDP摄像头视频传输（delphi2010）
indy10 ,使用DSPACK抓取摄像头图像，delphi2010环境。客户端发出视频请求，服务器端自动应答，开多线程，在线程中抓取图片后，采用JPEG压缩图片流，对图片流分包后，用Idudp发送出去。客户端组装流，合成jpg文件用Image显示。
