8K es el tamaño por default:
Código Delphi
[-]
var
dwBuffer: DWORD;
iSize: Integer;
begin
with TClientSocket.Create(nil) do
try
Host := 'microsoft.com';
Port := 80;
Active := True;
if Socket.SocketHandle <> INVALID_SOCKET then
begin
iSize := SizeOf(dwBuffer);
getsockopt(Socket.SocketHandle, SOL_SOCKET, SO_RCVBUF, PChar(@dwBuffer), iSize);
ShowMessageFmt('Tamaño del Buffer de Recepción: %d bytes', [dwBuffer]);
end
finally
Free;
end;
Podes cambiarlo utilizando la función setsockopt, aunque me parece que tienes un problema de diseño, no del tamaño del buffer.
Saludos!