Das Break verlässt nur die innere Schleife.
Danach kommt ein Disconnect, welches vermutlich einen Fehler verursachen wird.
Prüfe vor dem Disconnect, ob IsConnected True ist.
Das Disconnect wird nicht erreicht, wie im Stacktrace zu erkennen ist wird als letzte Zeile der
Unit das Break bzw. das IsConnected := True ausgeführt. Dann geht es nur noch ins madExcept bzw. die
RTL System Units.