如何实现Delphi中的TIdTCPClient模块的重新连接功能？

本文共计404个文字，预计阅读时间需要2分钟。

我正在编写一个应用程序，它使用TIdTCPClient通过套接字与另一个应用程序通信。我希望应用程序能尝试连接到某个服务器，直到建立连接（即直接与服务器的线上）。