[firebase-br] Erro dbExpress

[Pedro Leonardo]

Quando tento conectar em um banco FB usando dbExpress aparece o erro  unknown error code "65535" 
Delphi 7,   FB 1.5.2,   Win XP

Faço assim para carregar: 

Procedure CarregaBancodeDados;
Var  Diretorio : String; 
       Path : String; 
       Arq : TextFile; 
Begin
  Diretorio := ExtractFilePath(Application.ExeName)+'Banco.txt'; 
  AssignFile(Arq,Diretorio); 
  If(Not FileExists(Diretorio))Then
  Begin    
    Rewrite(Arq); 
    Write(Arq,ExtractFilePath(Application.ExeName)+'DataBase\Dados.FDB');
  End;
  Reset(Arq); 
  Readln(Arq, Path); // Lê a primeira linha do arquivo na variável Path
  CloseFile(Arq); 
  Try
    If(DtModConexao.SQLConexao.Connected)Then  
   TSqlConnection
     DtModConexao.SQLConexao.Connected := False;
    DtModConexao.SQLConexao.Params.Values['database'] := Path; 
    DtModConexao.SQLConexao.Connected := True; 
  Except                                       
    On EDatabaseError do                     
    Begin    
      ShowMessage('Erro ao conectar com o Banco de dados') ;                              
    End;
  End;

Obrigado...
Pedro Leonardo