小编use*_*138的帖子

Delphi:限制TCP连接

我在我的Delphi应用程序中使用TServerSocket组件.我想限制客户端连接,让我们说一千个.不幸的是我不知道该怎么做.该组件不提供任何属性,如"MaxConnections"或任何其他类似此属性.

我使用OnGetThread事件创建新的服务器线程(TServerClientThread).为了获得活动连接的数量,我使用了'Socket.ActiveConnections'属性.

不幸的是我不知道该怎么做.当连接数超过限制时,我尝试不在OnGetThread过程中创建任何线程,但它什么都没改变 - 客户端,即使它无法发送或接收任何信息,它也可以连接到服务器并保持连接.什么不允许新客户端连接或只允许他们连接但是立即断开连接?

sockets delphi connection tcp limit

6
推荐指数
1
解决办法
2196
查看次数

标签 统计

connection ×1

delphi ×1

limit ×1

sockets ×1

tcp ×1