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)
-   -   BDE - variables de entorno? (https://www.clubdelphi.com/foros/showthread.php?t=63382)

decuteo 11-02-2009 18:12:31

BDE - variables de entorno?
 
Hola a todos

Existe alguna manera de saber el PATH de una DataBase?, es decir, donde se ubican las bases de datos.

La información de puede ver mediante el BDE Administrator y seleccionando la DataBase, pero, en tiempo de ejecución se puede consultar dicha información?.

Muchas gracias !!!

Un saludo
Juanjo

Al González 11-02-2009 19:05:13

¡Hola!

BDE es una tecnología en desuso, pero podrías hacerlo así:
Código Delphi [-]
implementation

{$R *.dfm}

Uses
  BDE;

procedure TForm1.Button1Click(Sender: TObject);
var
  Env : DBIEnv;
  Desc : DBDesc;
begin
  DbiInit (@Env);

  If DbiGetDatabaseDesc ('DBDemos', @Desc) = 0 Then
    ShowMessage (Desc.szPhyName);
end;
(basado en código de la unidad DBTables.pas de Delphi 7).

Coméntanos si te sirve.

Saludos.

Al González. :)

P.D. En DBTables.pas, el uso de las funciones DbiInit y DbiGetDatabaseDesc lleva establecimientos y validaciones adicionales. Sugiero las estudies.

decuteo 16-02-2009 12:58:09

Gracias Al González

perdona por contestar tan tarde, he estado enfermo por un resfriado y por tanto off-line estos días.

Sintiéndolo mucho no me sirvió, al final no fue necesaria saber la ubicación de la base de datos por resultar obvia.

Al iniciarse la aplicación ya se le indica a todos los componentes la situación de las BD, además, creo que en breve me pedirán una migración a otro entorno de Bases de Datos, seguramente, SQL donde entonces la historia es completamente diferente.

Repito, gracias por la contestación y perdona la tardanza.

Un saludo
Juanjo


La franja horaria es GMT +2. Ahora son las 13:43:47.

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