Wie soll ich mich in dieser Situation erholen?

Der Server stürzt ab, daher wurde die Verbindung abnormal geschlossen. Anrufe zu fast allem führen zu Ausnahmen beim Zurücksetzen der Verbindung durch Peer. Ich habe es anscheinend behoben, indem ich Disconnect für das TIdTCPClient-Objekt im except-Block aufgerufen habe, aber es führt zu einer letzten Ausnahme mit derselben Meldung (die ich im zweiten try-except-Block abgefangen habe).

Dies ist mit Indy10 und Delphi XE2.

<code>   try
      if not EcomSocket.Connected then EcomSocket.Connect();
    except
      on e: Exception do begin
        try
          EcomSocket.Disconnect();
        except
          MessageDlg('Connectivity to the server has been lost.', mtError, [mbOK], 0);
        end;
      end;
    end;
</code>