Расположение файла MDB

[fineleave]

Добрый день. Делаю программу для подключения к БД. Использую ADOConnection. В параметрах подключения указываю расположение файла. Mdb. Но если перенести БД и приложения в другую папку то логично что программа ничего не откроет. Можно ли сделать так, чтобы например, при запуске программы открывалось окно OpenDialog и в нем выбирать файл с БД, и тогда эти параметры передавались в ConnectionString и открывалась моя БД? Заранее благодарю

[Stilet]

Можно. OpenDialog.Execute - пример в Хелпе.

[Serge_Bliznykov]

и ещё, поищите по форуму по ключевому слову:
ConnectionString-на форуме неоднократно приводились примеры кода, как сделать так, чтобы путь к MDB брался при запуске программы...

[_SERGEYX_]

Обычно mdb-файл хранят в каталоге программы и в строке подключения указывают имя файла без указания пути. Будет работать везде.

[fineleave]

Спасибо. Уже сделал. Сделал подмену ConnectionString перед самым подключением к БД. Будет актуально для тех, кому нужно открыть БД, которая находится не в текущем каталоге с программой.

procedure TForm1.ADOConnection1BeforeConnect(Sender: TObject);
begin
  if OpenDialog1.Execute then
    ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+OpenDialog1.FileName+';Persist Security Info=False';
end;