if (ADOConnection->Connected)
// выполнилось
Проверка произошло ли подключение к БД
Через ADOConnect
обрабатывать исключения.
Код:
ADOCon->Connected = true;
if(ADOCon->Connected){
ShowMessage("подключились");
RestoreBut->Enabled = True;
}
else
ShowMessage("не подкл");
try
{
ADOCon->Connected = true;
}
catch (...)
{
Application->MessageBox("Ошибка", MB_OK);
Application->Terminate();
}
Закрыто