TClientSocket和TServerSocket的问题

lght lght 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
服务端一直运行不关闭,客户端运行后连接服务端,然后关闭程序。第一次客户端能连接上服务端,第二次客户端连接不上,第三次客户端又可以连接了
只要我重新运行服务端,连续两次打开客户端,如果两次间隔时间比较近,第二次肯定连接不上,这是什么原因啊

客户端和服务端用TWinSocketStream配合读写数据流


客户端:
FClientSocket := TClientSocket.Create(nil);
FClientSocket.ClientType := ctBlocking;

FClientSocket.Host := AServerIP;
FClientSocket.Port := STREAM_PORT;
FClientSocket.Open;

服务端:
FServerSocket := TServerSocket.Create(nil);
FServerSocket.ServerType := stThreadBlocking;
FServerSocket.Port := STREAM_PORT;
FServerSocket.OnGetThread := ServerSocketGetThread;
FServerSocket.OnThreadStart := ServerSocketThreadStart;
FServerSocket.OnThreadEnd := ServerSocketThreadEnd;
FServerSocket.OnListen := ServerSocketListen;
...全文
评论 6
收藏 已收藏
分享
返回顶部