可以在Close前先shutdown(ClientSocket.Socket.SocketHandle, How);

How的定义记不住了，自己查帮助吧。