TDiocpTcpServer内存池使用

TDiocpTcpServer内存池使用

DIOCP内存池中的一块内存大小为4K，服务端一次接收客户端传输的数据最大也是4K。

uses utils_BufferPool

var FRecvBuffLink:PBufferPool;


FWSARecvBufferSize := 1024 * 4;// post wsaRecv block size
FRecvBuffLink := NewBufferPool(self.FWSARecvBufferSize, 0);

FreeBufferPool(FRecvBuffLink);
FRecvBuffLink := nil;

Result.FInnerBuffer.buf := PAnsiChar(GetBuffer(self.FRecvBuffLink));