![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
![]() como cambiar el gdb en red con tcp ip en tiempo de ejecucion, quisiera que el usuario pueda cambiar la base de datos? ...utilizo interbase 6 y componentes ibdataset, ibdatabase.
Se que la ruta seria algo como esto: 190.190.0.220:c:\proyecto\bd\datos.gdb pero como podria hacer esto sin necesidad que el usuario lo escriba. |
#2
|
||||
|
||||
Hola.
Pón un código de este estilo en el evento BeforeConnect del IBDataBase : Código:
procedure TForm1.IBDatabase1BeforeConnect(Sender: TObject); begin (Sender As TIBDatabase).DatabaseName := '190.190.0.220:c:\proyecto\bd\datos.gdb'; end; Código:
procedure TForm1.IBDatabase1BeforeConnect(Sender: TObject); var Config: TStringList; begin Config := TSTringList.Create; Config.LoadFromFile(ExtractFilePath(Application.ExeName) + 'Config.ini'); (Sender As TIBDatabase).DatabaseName := Config.Values['BaseDeDatos']; Config.Free; end;
__________________
Marc Guillot (Hi ha 10 tipus de persones, els que saben binari i els que no). |
![]() |
|
|
![]() |
|