Не могу перехватить исключение
Есть проблема: работаю с удаленной базой данных, связь не стабильна, пробую проверить наличие соединения при помощи конструкции типа:
try
ADOConnection.Connected := True;
except
on E : Exception do
ShowMessage(E.ClassName+' '+E.Message);
но except не срабатывает, выскакивает системная ошибка. Подскажите почему. Или кто-нибудь знает другой способ проверки связи?
|