En Delphi 7 tienes esta ruta
Cita:
Ruta del proyecto
C:\MiApp
Ruta de la BD
C:\MiApp\MiDB
Ruta del Ejecutable
C:\MiApp\MiExe
|
En Delphi XE al ejecutar tu aplicación por primera vez te genera la carpeta Win32/64 y la carpeta Debug o Release según la configuración de tu IDE
Cita:
Ruta del proyecto
C:\MiApp
Ruta de la BD
C:\MiApp\MiDB
Ruta del ejecutable (puede ser Debug o Release)
C:\MiApp\Win32\Debug\MiApp.exe
"YA EXISTEN PROBLEMAS
|
Una solucion
Cita:
Ruta del proyecto
C:\MiApp
Ruta del ejecutable (puede ser Debug o Release)
C:\MiApp\Win32\Debug\MiApp.exe
Ruta de la BD
C:\MiApp\Win32\Debug\MiBD
*FUNCIONA
|
Access usa una cadena de conexión. Esta deberá de apuntar a la nueva posicion de la BD. Realmente no he probado con access hace mucho tiempo.
Con Interbase hacia algo como esto en D7
Código Delphi
[-]IBDatabase.DatabaseName :=
IncludeTrailingPathDelimiter(ExtractFilePath(Paramstr(0))) + NombreBD;
Ahora en XE2
Código Delphi
[-]IBDatabase.DatabaseName := GetCurrentDir + '\Data\' + MiBD;
Espero te ayude a lograr lo que necesitas (pude haber dicho alguna burrada así que ojo!).
Saludos!!