Как и в какой момент написать обработчик события если БД не доступна

[Arteom]

Такой вопрос: при запуске приложения в соответствии со строкой в ADOConnection осуществляется подключение к БД. Как и в какой момент написать обработчик события если БД не доступна. Ну чтобы выводилось сообщение, что невозможно подключится к БД.

[Pitbull]

Может так:
procedure TForm1.ADOConnection1ConnectComplet e(Connection: TADOConnection;
const Error: Error; var EventStatus: TEventStatus);
var f:integer;
begin
if EventStatus=esOk then ShowMessage('Подключение удачное....')
else
ShowMessage('подключение не удалось');
end;
можешь анализировать ошибки:
esErrorsOccured esCantDeny esCancel esUnwantedEvent

или можно просто исключения влепить ,например, при нажатии кнопки:
try
ADOConnection1.Connected:=true;
exept
ShowMessenge('подключение не удалось');

[Aristarh Dark]

Я делаю так:

try
  ADOConn.Connected:=true;
except
//Обработчик ошибки
end;

[Arteom]

что-то не получается у меня. Мне надо чтобы при загрузке программы или выводилось сообщение что невозможно подключится к базе, или выполнялся мой код. Сделал по вашему совету, в итоге после моего сообщение появляется дельфийское сообщение об ошибке. Как это обойти?

[Alex21]

Это скорее всего сообщение отладчика об исключении. (типа информирует вас, о том, что наступает такая ситуация).

Пробуйте запускать не из делфи, а через .exe. Там исключения сработают как надо.

[Arteom]

Мне надо все сделать именно в Делфи. Просто не работал еще с исключениями и ошибками. Подскажите как это сделать, на каком-нибудь примерчике

[Alex21]

В Делфи, по умолчанию, идет выдача исключений (даже в try).
Поэтому: либо отключаем это в опциях, либо, чтобы не терять информативности - компилируем и запускаем ваше приложение не через F9 (запуск в Делфи), а из Моего компьютера (любого файлового менеджера).

[Arteom]

Спасибо, теперь знаю

[Pitbull]

Люди, подскажите, а за что у него красная карточка ? и за что их могут давать?