TSocketConnection hängt, wenn man Netzwerkkabel entfernt...

[Koloss]

Das Programm läuft noch aber er hängt eben bei connection := False. Auch wenn ich connection.Free oder Clientdataset.close hängt es. Ich kann da nichts weiter debuggen, ich komme da nur in das CPU Fenster.

Kmischerweise bei einen anderen Programm mit der selben Verbindung dort schiebe ich aber weniger Daten hin und her.

Code:

    try
      if SocketConnection.Connected then
      begin
        SocketConnection.Connected := False;
        Clientdataset.open;
      end;
    except
      SocketConnection.Connected := False;
      Clientdataset.close;
    end;