断包后组包 ( 积分: 200 )

发现网络有丢包时采取下面的方式组包
按道理send一次，只需ReceiveBuf一次便可
wError := 0;
while wSize < MyHead^.RecordNum * 7 do
begin
RecordCount := Socket.ReceiveLength;

if RecordCount > 0 then
begin
RecordCount := socket.ReceiveBuf(ReciveBuf, RecordCount);
//Recv(Socket.SocketHandle, ReciveBuf, 65235, 0);
Move(ReciveBuf[0], BufInfo[wSize], RecordCount);
wSize := wSize + RecordCount;
end;

if wSize >= MyHead^.RecordNum * 7 then
Break;

Inc(wError);
if wError > 3 then
exit;
Sleep(100);
end;
现能组包，但是又出现了，端口没有断开，但是一段时间后会收不道数据，为何？

发现网络有丢包时采取下面的方式组包
按道理send一次，只需ReceiveBuf一次便可
wError := 0;
while wSize < MyHead^.RecordNum * 7 do
begin
RecordCount := Socket.ReceiveLength;

if RecordCount > 0 then
begin
RecordCount := socket.ReceiveBuf(ReciveBuf, RecordCount);
//Recv(Socket.SocketHandle, ReciveBuf, 65235, 0);
Move(ReciveBuf[0], BufInfo[wSize], RecordCount);
wSize := wSize + RecordCount;
end;

if wSize >= MyHead^.RecordNum * 7 then
Break;

Inc(wError);
if wError > 3 then
exit;
Sleep(100);
end;
现能组包，但是又出现了，端口没有断开，但是一段时间后会收不道数据，为何？

有没有回答的，我再加３００分

bobo我帮你顶一下哈哈！

按道理send一次，只需ReceiveBuf一次便可
这个是没有道理的,发一次,有可能要分很多次才能收完

如果服务端发送8196个字节的包,但客户端的ReceiveBuf每次只接收1024个字节,那就要接收8次吧,这样对吗/