超郁闷，简单关闭SocketConnection需要3，4分钟(100)

pos端的上传下载传输数据是由伪三层来实现，服务端程序是有连接池的，每个POS端都会创建一个连接。现在POS端有一个连接函数，每点一上传数据/下载数据就会调用此连接函数。function TfrmDataConnect.ConnectSKTServer(const sAPPServer,sPort :string): Boolean;begin try conSKTServer.close; conSKTServer.host := sAPPServer; //服务器 conSKTServer.port := StrToInt(sPort); //端口号 conSKTServer.Connected := True; Result :=True; except Result :=False; Exit; end;end;第一次点击上传数据/下载数据 速度很快就完成了数据的传输，接着不退出界面的情况下继续点击上传数据/下载数据就会卡在那3，4分钟了。。。。。跟踪发现conSKTServer.close;导致很慢，不知道是什么原因，望知道的朋友解答下或建议下解决方案，谢谢