Ver Mensaje Individual
  #9  
Antiguo 20-12-2012
ginesgomezlopez ginesgomezlopez is offline
No confirmado
NULL
 
Registrado: jun 2012
Posts: 45
Reputación: 0
ginesgomezlopez Va por buen camino
En Bdatos.ini

Cita:
[BD]
path="192.168.1.34:C:\Maestros1\MAESTRO.IB"

En Delphi:

Código Delphi [-]
procedure TDataModule1.DataModuleCreate(Sender: TObject);
Var
     BaseDeDatos: String;
     ElIniFile: TIniFile;
begin
   // Obtiene la ruta y el nombre de la base de datos
   ElIniFile := TIniFile.Create(ExtractFilePath(Application.exename)+'BDatos.ini');
   BasedeDatos := ElIniFile.ReadString('BD','Path','');
   If BasedeDatos = '' then
    ShowMessage('Error al cargar Base de Datos') else
//    ibdatabase1.Close;
    ibdatabase1.DatabaseName:=BasedeDatos;   // BaseGeneral es el TIbDatabase y le asigno la ruta de la base de datos segun .ini
    ibtablaclientes.Active:=true;
end;
end.


En propiedades del Database1

en Dabatabasename=C:\Maestros1\Maestro.ib
Responder Con Cita