FB no Delphi 2005

Veremos neste artigo, como acessar o Firebird no Delphi 2005. A partir do Delphi 8 temos uma nova tecnologia de acesso a dados chamada ADO.NET, baseada na qual a Borland criou o BDP (Borland Data Provider). Mas como a arquitetura do BDP pode ser estendida, foi criado um Provider para acesso ao Firebird, que pode ser baixado em: unc.dl.sourceforge.net/sourceforge/firebird/FirebirdNETProvider-1.7-Beta3-NET1.1.exe.

O Delphi 8 também introduziu o Data Explorer para a criação rápida de conexões a banco de dados. Iremos também criar uma conexão para o Firebird, para que a mesma fique disponibilizada no Data Explorer do Delphi 2005.

Para isso, baixe o arquivo no endereço: internap.dl.sourceforge.net/sourceforge/firebird/FirebirdBDP1.0-Alpha4.exe.

Nota: As versões anteriores do BDP para Firebird (Alpha3), não são compatíveis com o Delphi 2005.

A instalação dos dois aplicativos é bastante simples, portanto, basta executar o instalador até o fim para instalar corretamente os arquivos.

Criando a conexão no Data Explorer

Para mostrar a opção para o Firebird no Data Explorer, temos que editar dois arquivos XML, que estão no diretório Bin da instalação do Delphi 2005. Faça uma cópia dos arquivos BdpDataSources.xml e bdpConnections.xml, por questão de segurança, caso haja algum problema.

Abra o arquivo BdpDataSources.xml, utilize o Bloco de Notas, ou algum outro aplicativo que edite arquivos XML e adicione o seguinte código, antes da 13-07lin01.JPG:

13-07cod01.JPG

Salve as alterações e feche o arquivo.

Abra o arquivo bdpConnections.xml e adicione o seguinte código, antes da 13-07lin02.JPG

13-07cod02.JPG

Caso você utilize uma porta diferente da 3050 para a conexão ao Firebird, edite a tag Database. Com isso, criamos a nossa conexão do Firebird no Data Explorer do Delphi 2005. Abra o Delphi 2005 e visualize no Data Explorer a conexão do Firebird (Figura 1).

13-07pic01.JPG
Figura 1. Acesso ao Firebird adicionado no Data Explorer

Acessando os dados no Delphi 2005

Para testar, vamos criar uma conexão simples no Delphi 2005. Crie uma aplicação Windows Forms e adicione um DataGrid. No Data Explorer, clique com o botão direito no nó Firebird e escolha Add New Connection. Dê o nome de “Employee” à conexão. Clique de direita sobre a conexão criada anteriormente e escolha a opção Modify Connection. Altere os dados conforme a Figura 2. Clique em OK para confirmar as modificações na conexão.

13-07pic02.JPG
Figura 2. Alterando uma conexão ao Firebird para acessar o banco Employee.fdb

Expanda o nó Tables e arraste para o formulário a tabela Employee. Será criado um BdpConnection  e um BdpDataAdapter. Clique de direita no BdpDataAdapter e escolha a opção Configure Data Adapter, escolha New DataSet na aba DataSet e clique em OK.

No DataGrid em DataSource escolha Dataset1 e DataMember escolha Employee. Altere para True a propriedade Active do BdpDataAdpater. Você já deve ter visualizado os dados em tempo de execução. Veja a aplicação em execução na Figura 3.

13-07pic03.JPG
Figura 3.
Aplicação acessando os dados do Firebird com o BDP do Delphi 2005

Note que acessamos os dados do banco através dos componentes do BDP do InterBase (BdpConnection e BdpDataAdapter). No próximo artigo, acessaremos os dados do Firebird, com os componentes BDP do banco open source.

Clique aqui para fazer o download da aplicação completa.