Si, si lo haces por código.
Prueba a generar una cadena de conexión con el Asistente de ADO. Obtendrás un texto similar a este:
Código:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Archivos de programa\Archivos comunes\Borland Shared\Data\dbdemos.mdb;Persist Security Info=False
Puedes asignar este texto al ADO Connectionpor código y modificarlo para cambiar lo que necesites:
Código Delphi
[-]
Conn := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
'c:\Archivos de programa\Archivos comunes\Borland Shared\Data\dbdemos.mdb;' +
'Persist Security Info=False';
ADoConnection.ConnectionString := conn;
Y también puedes cambiarlo, por ejemplo, con algo así:
Código Delphi
[-]
FileName := ExtractFilePath(Application.ExeName) + '\Data\MisDatos.mdb';
Conn := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
FileName + ';' +
'Persist Security Info=False';
ADoConnection.ConnectionString := conn;