Ну например для полключения к базе mdb можно так написать:
Код:
ConnectionString := Format('Provider=Microsoft.Jet.OLEDB.4.0;User ID=%s;Data Source=%s',[edUserName.Text,OpenDialog.FileName]);
или так:
Код:
NameDB := ExtractFileName(dbName);
PathDB := ExtractFilePath(Application.ExeName);
AppDB.ConnectionString := Format('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s',[PathDB+NameDB]);