关于delphi7 IdTCPClient接收数据的问题 50
首先我先往TCP端口发送数据,然后接收它返回的数据。我要对这个返回的数据进行破解。这个返回的数据该如何接。部分代码如下:varTCPClient:TIdTCPClient...
首先我先往TCP端口发送数据,然后接收它返回的数据。我要对这个返回的数据进行破解。这个返回的数据该如何接。
部分代码如下:
var
TCPClient: TIdTCPClient;
sSign,sSend: string;
BEGIN
TCPClient.Connect;
begin
TCPClient.Write(sSend); //发送数据,这个没问题
sSign:= TCPClient.ReadString(iSize_XML); // 请问如何接收所有的数据
//如果iSize_XML设为1000的话,并不能接收到全部的数据。但是如果为1500的话,会报
// connect closed gracefully 这个错误。
end;
END;
我的数据格式如图,前七位是数字位,2是标识位没啥用,1484表示后面数据的长度,请问这个代码该如何写,才能返回全部正确的字符串。 展开
部分代码如下:
var
TCPClient: TIdTCPClient;
sSign,sSend: string;
BEGIN
TCPClient.Connect;
begin
TCPClient.Write(sSend); //发送数据,这个没问题
sSign:= TCPClient.ReadString(iSize_XML); // 请问如何接收所有的数据
//如果iSize_XML设为1000的话,并不能接收到全部的数据。但是如果为1500的话,会报
// connect closed gracefully 这个错误。
end;
END;
我的数据格式如图,前七位是数字位,2是标识位没啥用,1484表示后面数据的长度,请问这个代码该如何写,才能返回全部正确的字符串。 展开
1个回答
展开全部
你的服务端返回数据时先发送数据包的长度,然后再发送数据包。这样你在接收时先调用ReadInteger得到将要接收的数据包的长度,然后再调用ReadString接收数据。我不确定ReadString的用法,如果不行的话,改为ReadStream方法,但服务端也要改为发送Stream。
更多追问追答
追问
你看我图片中,我可以截取到返回数据的长度,但是用ReadString(‘数据包长度’)这个函数,如果数据包长度太大的话,会报connect closed gracefully 这个错误。
有什么办法可以解决吗?
或者用readln这种呢?这个函数没用过啊
追答
你在服务端发送包的时候不要把包定义为:
标识符+数据长度+数据,你发三次,第一次发标记符,第二次发数据长度,注意发送整形,第三次再发数据本身内容。
你在客户端接收到数据时,先接收标记符,你发现是20,那么再接收数据长度,用ReadInteger,这样你就知道了数据长度,然后再接收数据本身。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
网易云信
2023-12-06 广告
2023-12-06 广告
UIkit是一套轻量级、模块化且易于使用的开源UI组件库,由YOOtheme团队开发。它提供了丰富的界面元素,包括按钮、表单、表格、对话框、滑块、下拉菜单、选项卡等等,适用于各种类型的网站和应用程序。UIkit还支持响应式设计,可以根据不同...
点击进入详情页
本回答由网易云信提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询