Geschlossene TCP IP Verbindung wiederherstellen

[matashen]

Hallo zusammen,

ich bin gerade dabei von einem Maschineninterface mittels TCP/IP Daten abzurufen.

Dabei ist der Service des TCP/IP Servers (Maschine) leider so gestrickt das er immer nur einen Client verbindet. Sobald ein zweiter Client eine Anfrage schickt beendet der Server die aktuelle Verbindung. Ich bekomme dann eine Exception Connectiondisconnectgracefully ... oder so. Wenn ich connect erneut aufrufe kommt aber keine neue Verbindung zustande. Warum? Muss ich den Client zurücksetzen?

Steh hier irgendwie auf den Schlauch.
Hab die Indys verwendet und Delphi 10.3

Kurzer Codesnipper, try except und das andere Gedöns vorher nachher hab ich weggelassen.

Delphi-Quellcode:

...
        if not maschinen_daten[ID].TCPIPClient.Connected then maschinen_Daten[ID].TCPIPClient.Connect;
        if maschinen_daten[ID].TCPIPClient.Connected then
          begin;
            //Anfrage an des Serversystem
            maschinen_daten[ID].TCPIPClient.socket.WriteLn(maschinen_daten[ID].sendtext.text);
...

              ab:=utf8tostring(maschinen_daten[ID].TCPIPClient.socket.readln());
...