Самый простой вариант, когда подключаетесь к базе Access средствами ADO, оформить ConnectionString вашего ADOConnection, но я делаю это с помощью строковой переменной, которую при каком-то событии присваиваю ConnectionString
procedure TFormAuth.BtnOKClick(Sender: TObject);
var constring,
basepath:string; //это путь базы Access
begin
//---------------------------закрываем коннект---------------------
datamodule1.ADOConnection1.Close;
//--------------------------формируем коннект для базы
try
constring:='Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+basepath+';Mode=Share Deny None;Extended Properties="";Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password=1234567;';
datamodule1.ADOConnection1.ConnectionString:=constring;
//-----------------------------------------------------------------
datamodule1.ADOConnection1.Connected:=true;
except showmessage ('Не могу соединиться с базой.');
end;
end
//--------------------------------------------------------------------
end;