winsocket10055错误的产生，该如何解决？？我试验了很多办法(200分)

请问当依次轮询多个带IP的设备服务器时,因有1个或多个设备不在网上,
winsock 10060(超时)错误与winsock 10061(连接被拒绝)错误;
在下面的处理后
procedure Tfrmmain.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
ErrorCode:=0;
end;
winsock 10060(超时)错误与winsock 10061(连接被拒绝)
自动报警窗口被屏蔽(因为这种一连串的自动报警窗口会导致
程序死机);但这种报警信息存储在一个缓冲buffer中,
当循环次数一多;缓冲buffer不足导致winsock 10055(缓冲buffer
不足);一连串的自动报警窗口把程序死机.
请问如何释放缓冲buffer?
winsock 10055(缓冲buffer不足)的delphi帮助说明:
WSAENOBUFS = (WSABASEERR+55);//=10055
Description
The text for this constant has been generated automatically.
This means that it is not documented.
winsock 10055(缓冲buffer不足)的VB帮助(msdn)说明中有关于
socket buff的说明;
请大虾们看一看！！！！！！！！