udp的字符传输

最新推荐文章于 2022-07-02 21:34:42 发布

xusb2008

最新推荐文章于 2022-07-02 21:34:42 发布

阅读量456

点赞数

分类专栏： indy10 文章标签： string 服务器

本文链接：https://blog.csdn.net/xusb2008/article/details/2525602

版权

indy10 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

客户端发送 procedure TMainForm.BitBtn2Click(Sender: TObject);
begin
idudpclient1.Host:='127.0.0.1';
idudpclient1.Port:=9002;
idudpclient1.Send('aaaaa');
idudpclient1.Disconnect;
end; procedure 服务器端的监听与接受 TMainForm.BitBtn3Click(Sender: TObject); begin idudpserver1.DefaultPort:=9002; idudpserver1.Active:=true; end; procedure TMainForm.IdUDPServer1UDPRead(Sender: TObject; AData: TBytes; ABinding: TIdSocketHandle); var str:string absolute AData; begin try Mem_content.Lines.Add(str); except end; end;