rchg.net
当前位置:首页 >> 怎么IDUDPCliEnt1.RECEivEString无论如何都是空 >>

怎么IDUDPCliEnt1.RECEivEString无论如何都是空

D7确实经典,但已经落伍了,用xe版本吧 udp发送这个东西不检测是否通不通,用TCP连接可以检测; 实在想用可以在server发送一个字符串,client接受到以后,反馈一个什么的字符串,表示正常通讯了 在Client端: procedure TUDPMainForm.SendButton...

1、服务器端为什么收不到? 要在IdUDPServer的OnUDPRead事件里写 procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream; ABinding: TIdSocketHandle); var aUDP:TUDP ; begin Adata.ReadBuffer(aUDP,Adata.Size);//这样收包 e...

虽然很久没用这控件了,不过原理还是懂的,给你点思路吧 解决你的问题,大概有几个方法: 一.控制发送速度,简单但是效率有点低 二.技术方加大数据缓冲,优先接收,读了就放内存里,接收完或是空闲时再处理,这在处理过程复杂时比较有效

在Client端: procedure TUDPMainForm.SendButtonClick(Sender: TObject); var MessageID: Integer; ThisMessage: String; ReceivedString: String; begin MessageID := Random(MAXINT); ThisMessage := 'Message: ' + IntToStr(MessageID); UDP...

D7确实经典,但已经落伍了,用xe版本吧 udp发送这个东西不检测是否通不通,用TCP连接可以检测; 实在想用可以在server发送一个字符串,client接受到以后,反馈一个什么的字符串,表示正常通讯了 在Client端: procedure TUDPMainForm.SendButton...

实在想用可以在server发送一个字符串,client接受到以后,反馈一个什么的字符串,表示正常通讯了 在Client端: procedure TUDPMainForm.SendButtonClick(Sender: TObject); var MessageID: Integer; ThisMessage: String; ReceivedString: Strin...

网站首页 | 网站地图
All rights reserved Powered by www.rchg.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com