TClientsocket 用线程不断的open 出100055错(200分)

程序运行几分钟后出10055错，由于系统缓冲区空间不足或队列已满,不能执行套接字上的操作 我在线程里的socket 的 onerror 事件有已将 ErrorCode:=0;
要是出错将socket close以后又会有100022错，烦恼,
用多线程不断的重连是为了局域网上的Terminal断线后能重连或上线。
求解决办法