一个关于TWinSocketStream的问题

Question

不清楚,你这样试试.
var
  newCount, OldCount: Integer;
begin
  NewCount := 发送的字节数.  //得到send buffer size:
  getsockopt(ClientSocket1.Socket.Sockethandle, SOL_SOCKET, SO_SNDBUF,PChar(@OldCount),SizeOf(OldCount));  //设置新的send buffer
  setsockopt(ClientSocket1.Socket.Sockethandle, SOL_SOCKET, SO_SNDBUF,PChar(@Count),SizeOf(Count));  socketstream.write(...);
  //调置回来
  setsockopt(ClientSocket1.Socket.Sockethandle, SOL_SOCKET, SO_SNDBUF,PChar(@OldCount),SizeOf(OldCount));end;

Answer 1

一般Send Buffer Size = 8K,可能你的数量是大于它,我很少用TWinSocketStream.不知是否会发生这种错  //设置新的send buffer
  setsockopt(ClientSocket1.Socket.Sockethandle, SOL_SOCKET, SO_SNDBUF,PChar(@NewCount),SizeOf(NewCount));

Answer 2

setsockopt, getsockopt 是winsock单元的函数