delphi - Indy 10 中的双向 TCP 通信？

Question

我正在使用 TIdCmdTCPClient 和 TIdCmdTCPServer。突然发现我可能喜欢双向通信。

什么最好？我应该使用其他一些组件吗？如果是这样，哪个？或者我应该拼凑并让“客户端”轮询“服务器”以询问它是否希望传达任何信息？

这是一个非常小的系统。两个客户端和十个服务器，每 30 到 60 秒突发一个 tarnscation，每天一次持续几分钟，因此轮询的开销是无关紧要的。

我只是想知道是否有“正确”的方法。

---

更新:这确实是一个非常简单的系统。流量很少，一切都很简单。所有传输都指示偶数类型和可选的单个参数。

<event type> [ <parameter>]例如"HERE_IS_SOME_DATA 42"

这可以双向发送，悬停在这里不是“回复”。只是发出一条消息(并希望它到达那里)？收到没有数据的确认？没有捕获到异常说明消息发送成功？)

使用两个 TIdCmdTCPServer 是否可能(会不会太过分了)？

Answer 1

TIdCmdTCPClient 和 TIdCmdTCPServer 在连接的生命周期内持续轮询它们的套接字端点以获取入站数据。您不必为此做任何额外的事情。因此，一旦 TIdCmdTCPClient 连接到 TIdCmdTCPServer，两个组件最初都将处于读取状态，直到其中一个组件向另一个组件发送命令。

现在，这样做有一个问题 - 只要任一组件发送第一个命令，接收组件就会将其解释为命令并发回回复，另一个组件将其解释为命令并发回回复，这将被解释为命令并发回回复，依此类推，导致来回无休止的回复循环。因此，一起使用 TIdCmdTCPClient 和 TIdCmdTCPServer 是不明智的。您应该将 TIdTCPClient 与 TIdCmdTCPServer 一起使用，或者将 TIdCmdTCPClient 与 TIdTCPServer 一起使用。根据您的协议(protocol)到底是什么样子，您可能不得不放弃使用 TIdCmdTCPClient 和 TIdCmdTCPServer 一起使用 TIdTCPClient 和 TIdTCPServer 这样你就可以更好地控制两端的读写。在不知道通信协议(protocol)应该是什么样子的情况下，很难用实际代码来回答。