!!Conexión por dialogo a base de datos Access!!

[arturom]

Hola,
no explicas como tienes establecido el acceso a los datos, pero una opción es, a la hora de crear el formulario principal, leer un fichero tipo INI donde previamente hayas guardado la ruta de la base de datos.

Abres un fichero INI, lees la ruta de la base de datos y compruebas si Ruta es una cadena vacía. Si no está vacia se la asignas a tu conector y listo. Si está vacía le pides al usuario la ruta mediante un componente OpenFile y luego la guardas en el fichero INI para la próxima vez y cierras el fichero.

Código Delphi [-]
var
  Ruta: String;
  FicheroINI: TIniFiles;
begin
  // Creas un anlace al fichero "fichero.ini" que esta en el mismo directorio que el ejecutable de tu aplicación
  FicheroINI := TIniFile.Create( ExtractFilePath( ParamStr( 0 ) ) + 'fichero.ini' );
  Ruta := FicheroINI.ReadString('Conexion', 'Ruta', '');  // Lees la ruta
  if Ruta <> '' then
    Conexion.DatabaseName := Ruta  // Asignas la ruta al conector
  else
    if Abrirfichero.Execute then  // Pides la ruta del la base de datos con el Openfile
      FicheroINI.WriteString('Conexion', 'Ruta', Ruta);  // Guardas la ruta

  ficheroINI.Free;  // Liberas la memoria
end;

Saludos