Delphi 调用API做的完成端口出现 10055错误，请高手指点~~

小弟最近用delphi 2007做了一个完成端口的小服务器，在创建完成端口的时候，我设置线程为1，则程序正常执行，然而用2个以上线程的时候，比如调用：ComportHandle := CreateIoCompletionPort(INVALID_HANDLE_VALUE,0,0,ComportThreadNum);
其中 ComportThreadNum = 1时就可以正常执行，但是设置为2以上时就会不时出现 WSAENOBUFS (10055)错误，即：由于系统缓冲区空间不足或队列已满，不能执行套接字上的操作！我开始以为是读写速度太快了导致的，但是后来发现并不是速度问题，但又不知道还有什么原因导致这样的，请高手指点!若需要源代码请告知我邮箱地址~~