各位,问一个关于TTcpClient的接受函数ReceiveBuf的问题.大小有限制么?

ari 2003-10-20 01:07:02

部分代码如下:
其中len是已知大小=79904, content已分配空间.
n = TcpClient->ReceiveBuf( (void*)content, len, 0 );
if ( n < 0 ) {
Application->MessageBoxA( "Failed sending data to remote host."
"WARN", MB_OK );
}
为什么读出的数据大小 n != len, 数据不完整? 后台server测试已经全部发送完成.
感觉是非阻塞读的,但是我设置为阻塞的.

后台的server在UNIX上.

...全文

93 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

sunnyboy6281 2003-10-22

打赏
举报

回复

你为什么部分多次发送呢？每次发送2048byte，接收也一样，然后再排序组合

delphi 2010版采用的TTCPServer 和TTCPClient控件编写的TCP通信实例，客户端和服务端可以相互发送信息并测量通信时间。TChart控件动态显示时间曲线。主要知识点：1.多线程的使用和线程安全之临界区保护 2.TCP通信机制 3.发送接收难点方法的使用 SendBuf和ReceiveBuf 4.CRC校验算法备注：为方便自己测试客户端和服务端程序写在了一起，可以进行拆分进而实现客户端和服务端的相互发送类似于聊天小程序

delphi 的视屏采集及远程传输 ClientSocket 和ServerSocket 几个重要的属性: 1.client和server都有port属性，需要一致才能互相通信 2.client有Address属性,使用时填写对方(server)的IP地址几个重要的事件: client: OnRead事件，当client受到冲击消息时在OnRead事件中可以获得server发送过来消息。 Server: OnClientRead事件，与上述client的作用相同发送信息： clien使用So

1、首先需要定义的对象： SOCKET ReceivingSocket //接收端的Socket SOCKADDR_IN ReceiverAddr //接收端的地址信息 char ReceiveBuf[1024] //接收数据缓冲区大小 int BufLength //缓冲区长度 SOCKADDR_IN SenderAddr //发送数据端地址信息 int SenderAddrSize = sizeof(SenderAddr) //发送端地址信息的长度 2、启动WSA动态库： WSAStartup(MAKEWORD(2,2),&wsd) 3、创建socket： ReceivingSocket=socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP) 4、初始化服务器地址及监听端口 ReceiverAddr.sin_family=AF_INET //家族 ReceiverAddr.sin_port=htons(9000) //设置端口号 ReceiverAddr.sin_addr.s_addr=htonl(INADDR_ANY) //地址 5、绑定端口 6、接收数据： ReceivingSocket,//接收端Socket ReceiveBuf,//接收端用来存储数据的缓冲区 BufLength,//缓冲区的大小 0,//接收的附加选项，设置为0即可 (SOCKADDR*)&SenderAddr,//发送端的Socket地址 &SenderAddrSize//发送端Socket地址的大小 ) 7、关闭socket，关闭WSA

C++ Builder编写的用UDP协议实现远程监视屏幕，UDP(User Datagram Protocol，意为用户报文协议)是Internet上广泛采用的通信协议之一。与TCP协议不同，它是一种非连接的传输协议，没有确认机制，可靠性不如TCP，但它的效率却比TCP高，用于远程屏幕监视还是比较适合的。同时，UDP控件不区分服务器端和客户端，只区分发送端和接收端，编程上较为简单，故选用UDP协议，使用C++ Builder 6.0提供的TNMUDP控件。

修改后的socketsvr源码 function TCustomWinSocket.ReceiveBuf(var Buf; Count: Integer): Integer; var ErrorCode, iCount: Integer; {##Add} begin Lock; try Result := 0; if (Count = -1) and FConnected then ioctlsocket(FSocket, FIONREAD, Longint(Result)) else begin if not FConnected then Exit; if ioctlsocket(FSocket, FIONREAD, iCount) = 0 then {##ADD} begin if iCount < Count then {##ADD} Count := icount; {##ADD} end; Result := recv(FSocket, Buf, Count, 0); if Result = SOCKET_ERROR then begin ErrorCode := WSAGetLastError; if ErrorCode <> WSAEWOULDBLOCK then begin Error(Self, eeReceive, ErrorCode); Disconnect(FSocket); if ErrorCode <> 0 then raise ESocketError.CreateResFmt(@sWindowsSocketError, [SysErrorMessage(ErrorCode), ErrorCode, 'recv']); end; end; end; finally Unlock; end; end;

网络及通讯开发

1,316

社区成员

8,873

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章