Обработка исключений при работе с БД

[VHomer]

Впервые решил использовать в приложении обработку исключений.
В программе предполагается выполнение запроса через ADOQuery. Прога универсальная для разных баз и серваков, поэтому есть меню с настройками подключения. Но при первом использовании программы подключение не настроено, поэтому запрос не будет выполнятся. Я решил обработать исключение, возникающее при попытки выполнить запрос, предварительно на настроив подключение к БД.
Сделал это так

procedure TForm2.Button1Click(Sender: TObject);
begin
try
ini:=TiniFile.Create(extractfilepath(paramstr(0))+'Export.ini');
form1.ADOConnection1.ConnectionString:=ini.ReadString('Connect','ConnectionSting','');
ini.Free;
form1.visible:=true;
form1.ADOQuery2.Active:=true;
except
on EOleException do
MessageDlg ('тут текст сообщения.',mtWarning,[mbOk],0);
end;
end;

Думал что когда обработчик уловит ошибку отсутствия подключения при выполнении form1.ADOQuery2.Active:=true; то выведет сообщение из MessageDlg и приложение не закроется, после чего можно будет вернутся в меню настроек и установить соединение. Но получается что выскакивает ошибка класса EOleException (не указан источник данных и драйвер) и работа с приложением прекращается.

Так как мне всё таки надо описать это исключение? Буду очень признателен если кто поможет.