Hay muchas forma de hacerlo, yp por ej. guardo el path de base de datos en un archivo .ini que lo nombro igual que la aplicacion.
dentro del ini pongo
[database]
name = 192.168.0.1:d:\ib\mibase.gdb
y en el oncreate de datamodule donde entá el TIBDatabase hago:
var
IniFile: TIniFile;
IniFileName: String;
j: integer;
begin
INIFileName := ChangeFileExt(ParamStr(0), '.INI');
IniFile := TIniFile.Create(IniFileName);
With IBDatabase1 do begin
Close;
DatabaseName := IniFile.ReadString('DATABASE', 'NAME', '');
Open;
end;
IniFile.Free;
end;
__________________
Saludos
Javier
|