Cara, dê uma olhada na “propriedade” Drivername e não no
parâmetro Drivername.

            Faça o seguinte:

 

            - Crie um novo projeto. 

            - Copie um banco firebird pra pasta “c:\Firebird\”

            - Coloque um TSQLConnection no Formulário, coloque a propriedade
“LoginPrompt” como FALSE e dê um duplo clique em cima dele.                 

- Configure os parâmetros manualmente.

- Teste a Conexão.

 

            - Coloque um TEdit e um TButton no Formulário.

            - No Edit, você vai digitar o caminho do banco, no botão vai
conectar ao banco.

                        - Código do botão: 

 

“

SQLConnection.Params.Values[ ‘Database’ ] := Edit1.Text;

Try                                                        

Try

SQLConnection.Connected := TRUE;    

            Except

                        Raise Exception.Create( ‘Não foi possível conectar
ao banco em: ‘ + Edit1.Text );

            End

Finally

            ShowMessage( ‘A Conexão foi completada com sucesso. Banco de
Dados em: ‘ Edit1.Text );

End;

“

            

            Provavelmente é tudo o que você precisa informar ao
SQLConnection. Agora, grave as informações como quiser, em TRegistry, em
TIniFile , tanto faz. Para modificar outros parâmetros, modifique da mesma
forma que foi feito com o caminho do banco de dados:

 

SQLConnection.Params.Values[ ‘User_name’ ] := Edit2.Text;

SQLConnection.Params.Values[ ‘Password’ ] := Edit3.Text;

SQLConnection.Params.Values[ ‘SQLDialect’ ] := Edit4.Text;

 

            Vitor Redes.

 

 

 

            

                        



[As partes desta mensagem que não continham texto foram removidas]

Responder a