Código
Vamos aos fatos.
Vamos precisar dos seguintes arquivos:
1.
http://www.firebirdsql.org/index.php?op=files&id=engine_201
//Este é o nosso ator principal "O FIREBIRD" em pessoa, ou melhor em SGDB!!! (EU BAIXEI A VERSÃO: Firebird-2.0.1.12855-1-Win32
2.
http://sourceforge.net/project/downloading.php?groupname=firebird&filename=Firebird_ODBC_1.2.0.69-Win32.exe&use_mirror=ufpr
//Este camarada é o que vai auxiliar nossa conexão com o Firebird
Depois de instalar o firebird seguindo todas as instruções DEFAULT do instalador, ou seja, NÃO MEXA EM NADA QUE VC NÃO SABE! Instale o nosso querido drive ODBC (Firebird_ODBC_1.2.0.69-Win32.exe)
... Só lembrando! Vamos agradecer ao nossos camaradas da IBPhoenix que nos diponibilizaram este programinha na faixa.
Depois do ator principal e o nosso coadjunvante instalados vamos as configurações para que o seu componente TADOConnection visualize o nosso drive ODBC, para isso, abra o painel de controle e logo depois ferramentas administrativas, neste ponto localize a ferramenta Fontes de dados (ODBC) dê dois clique sobre ela e vai abrir a janela (administrador de fonte de dados ODBC) e na aba
(fonte de dados do usuário) clique em "adiconar" aparecerá uma nova janela (criar nova fonte de dados), procure por Firbird/Intebase(r) drive selecione-o e clique em concluir, abrirá uma nova janela (Firebird ODBC setup) e é nesta que estão os macetinhos, em "Data Source Name" coloque qualquer coisa, eu procuro colocar o nome do meu programa, mas para exemplo vou colocar "control", no campo "Database" clique em "brownse" e localize o seu banco de dados "FIREBIRD (*.fdb)" ou simplesmente coloque o caminho se vc souber de có.
(Obs> ""có" se escreve assim?")
No campo Database account coloque "SYSDBA" e no campo Password coloque "masterkey", isto mesmo usuário e senha do FIREBIRD, depois clique em "OK" e aparecerá na janela inicial abaixo de provavelmente "Banco de dados ACCESS" a palavra "Control". Nesta janela clique em "Aplicar" e depois "OK".
Parte final:
>Crie uma nova aplicação no delphi (utilizei delphi 7);
>Coloque um componente ADOConnection da paleta ADO no Form juntamente com uma ADOQuery;
>Dê dois cliques no primeiro componente abrirá uma nova janela (Form1.ADOConnection1 ConnectionString) selecione "Use connection String" e clique em "Build...";
>Abrirá a janela (Propriedades de vinculação de dados) nesta janela selecione Microsoft ODBC Provider for ODBC Drivers e clique em "Avançar";
>Selecione "Usar o nome da fonte de dados" e clique em atualizar;
>No ComboBox procure por "Control" que é o nome que nós especificamos para o nosso (Data Source Name - DSN) lá atrás na configuração da ferramenta "Fontes de dados (ODBC)" lembra????
Pronto!!! Se tudo deu certo tecle em "Testar conexão" tem que aparecer a mensagem "Teste de conexão concluído com êxito". Clique em "OK" e depois "OK" de novo,
Coloque na propriedade "Login prompt" do ADOConnection "False" e na propriedade "Connected" "True".
Na propriedade "Connection" da ADOQuery coloque "ADOConnection1".
O restante vcs sabem, hehehehehe!!!
Galera não sou "expert" no assunto, aliás descobri isto hoje, caso eu esteja errado, por favor me corrijam e um forte abraço a todos. Fui....
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009