Обработка исключений Indy

[ashkalov]

Всем привет).
Юзаю компонент IdIMAP4 и вроде бы все хорошо, но...
Если вдруг, во время авторизации на сервере возникает ошибка, возникает исключение.
Проблема в том, что класс этого исключения какой-то общий EIdReplyIMAP4Error.
А необходимо обрабатывать конкретные ситуации, например ошибку авторизации и показывать соответствующее сообщение.
Вот код.

try
   idimap4.host := {hostname};
   idimap4.Port := {port};
   idimap4.Username := {username};
   idimap4.Password := {pass};
   IdSSLIOHandlerSoket.SSLOptions.Method := sslvSSLv3;
   idimap4.IOHandler := IdSSLIOHandlerSoket;
   idimap4.UseTLS := utUseImplicitTLS;
   idimap4.connect;
except
   on error: exception { вот здесь бы конкретное указать} do
      showmessage(error.message); // а пока только так =(
end;

[ashkalov]

Забыл еще сказать что версия indy 10

[Shouldercannon]

Привлечь

if (Error.ClassName = 'класс ошибки') then Bla-bla

[ashkalov]

Сообщение от Shouldercannon

Привлечь

if (Error.ClassName = 'класс ошибки') then Bla-bla

И в итоге получаю EIdReplyIMAP4Error

Мне нужно точное определение ошибки, а это дает только поверхностное. Неужели парсинг текста ошибки единственный выход?

[Alex11223]

Может у IdIMAP4 есть свойство с кодом результата? Если у исключения его нет.

[ashkalov]

Может быть и есть, но я его не нашел... (((

[ashkalov]

Видимо это какой-то редкий компонент, что даже профессионалы и заслуженные модераторы не знают ответа...(((

[Alex11223]

Надпись "Профессионал" выдается автоматически за 1000 сообщений.
Модераторство тоже не имеет прямого отношения к опыту и умению программировать, а "заслуженные" тут все

Я например давно не писал ничего на Дельфи, ибо есть "более лучшие" языки/фреймворки для этих целей, за которые еще и не надо платить сотни долларов.
А Инди не использовал еще дольше (перешел на Synapse).

[ashkalov]

А Synaps лучше чем indy?

[Alex11223]

Ну мне он показался удобнее и проще, чем неповоротливый Инди.
+ при необходимости исходники относительно легко можно почитать и поизменять.