Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Ayuda con el manejo ADO en Delphi XE (https://www.clubdelphi.com/foros/showthread.php?t=86550)

lugabame 30-08-2014 16:45:10

Ayuda con el manejo ADO en Delphi XE
 
Hola Como están, primeramente agradecerles de antemano su ayuda.
Tengo una consulta. En Delphi7 cuando se trabaja con ADO para enlazar una base de datos access, se puede hacer que la base de datos y el ejecutable del programa esten en una carpeta y esta se pueda copiar a otra maquina y al ejecutar el programa en la otra maquina funciona normal, pues bien mi consulta va referida al mismo proceder pero en Delphi XE es posible hacer eso? y si es posible ¿cómo se hace? porque ya lo intente como se hace en Delphi 7 no me resulta.

Muchas gracias por la ayuda :)

Casimiro Notevi 30-08-2014 17:12:54

Debe ser igual.

FGarcia 30-08-2014 18:52:44

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!!

radenf 31-08-2014 00:00:21

Tienes toda la razón [FGarcia].

Basta con colocar el archivo .mbd (Base de datos de Access) en la misma carpeta donde se encuentra el ejecutable, es decir en TuApp\Win32\Debug\ o TuApp\Win32\Release\, de acuerdo a como se haya compilado.

y utilizar:

ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ ExtractFilePath(Application.ExeName) + 'TuBD.mdb;Persist Security Info=False';

Saludos

lugabame 09-09-2014 19:00:40

Probar recomendaciones
 
Muchas gracias por las aclaraciones voy a hacer la prueba y les comento como me fue.

lugabame 13-09-2014 20:41:34

Funcionó
 
Muchas Gracias por los concejos me fue de maravilla

FGarcia 15-09-2014 22:07:46

Ya's ta

Pasate por la taberna y deja pagada una ronda de beers!! :D:D:D:D


La franja horaria es GMT +2. Ahora son las 00:58:41.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi