on E: EIdSocketError do MessageDlg(E.Message, mtWarning, [mbOK], 0);
こういう風に書くこともあるぞ。
Indyは英語だろうから使えんかもしれんが。