[semaral]

Hola a todos:

Estoy haciendo un programa que crea una base de datos. Para ésto, he incorporado el componente IBDatabase al formulario y le he puesto el nombre de BDReembolsos. La Base de datos física, todavía no está creada. Añado el siguiente código:

Código Delphi [-]
 
      BDReembolsos.DatabaseName:='.\BDReembolsos\BDReembolsos.gdb';
      BDReembolsos.Params.Clear;
      BDReembolsos.Params.Append('USER ''SYSDBA''');
      BdReembolsos.Params.Append('PASSWORD ''masterkey''');
      BDReembolsos.Params.Append('PAGE_SIZE 4096');
      BDReembolsos.LoginPrompt:=FALSE;
      BDReembolsos.CreateDatabase;
      BDReembolsos.Connected:=true;

 
Hasta aquí todo perfecto. Ahora añado el siguiente código:
 
     BDReembolsos.Connected:=false;
     BDReembolsos.Connected:=true;
 
Y me da error "Your user name and password are not defined". Modifico el Código anterior:
 
      BDReembolsos.Connected:=false;
 
      BDReembolsos.DatabaseName:='.\BDReembolsos\BDReembolsos.gdb';
      BDReembolsos.Params.Clear;
      BDReembolsos.Params.Append('USER ''SYSDBA''');
      BdReembolsos.Params.Append('PASSWORD ''masterkey''');
      BDReembolsos.Params.Append('PAGE_SIZE 4096');
      BDReembolsos.LoginPrompt:=FALSE;
      BDReembolsos.CreateDatabase;
      BDReembolsos.Connected:=true;

Pero me sigue dando el mismo error. No sé por qué, si desconecto la Base de datos, después no puedo volver a conectarla.

Espero que podáis ayudarme. Muchas gracias por vuestra colaboración.