Introdução ao Delphi e BD
Interbase, dbExpress e ClientDataSet
Este artigo é uma pequena introdução sobre o desenvolvimento de aplicações de bancos de dados no Delphi, usando Interbase (ou Firebird), ClientDataSet e dbExpress (mecanismo de acesso a dados que substitui o obsoleto BDE).
Criando o Banco de Dados
Abra o IBConsole (Iniciar|Programas|Interbase) e dê login no servidor (usuário sysdba senha masterkey). Dê um clique de direita em Database e escolha Create DataBase. Digite as opções como mostra a Figura 1.
Figura 1. Criando o banco de dados no Interbase
Clique no botão Interactive SQL e digite o seguinte comando SQL:
create table ALUNOS
(ID integer not null primary key,
NOME varchar(40));
Aperte CTRL+E para executar a instrução. Feche o editor.
Acessando o banco de dados com dbExpress
Comece uma nova aplicação no Delphi 6 ou 7. Coloque no formulário (ou DataModule) um componente SQLConnection, primeiro componente da paleta dbExpress (Figura 2).
Figura 2. Paleta dbExpress
Dê um duplo clique nele. No editor de conexões clique no sinal “+” para adicionar uma nova conexão. Em Driver Name escolha Interbase e em Connection Name digite “BANCO”. Preencha as demais configurações da conexão como mostra a Figura 3.
Figura 3. Configurando uma conexão dbExpress
Feche o editor, configure a propriedade LoginPrompt do SQLConnection para False e Connected para True. Coloque no formulário um componente SQLDataSet (paleta dbExpress), um DataSetProvider, um ClientDataSet e um DataSource, todos da paleta DataAccess (Figura 4). Configure as propriedades destes componentes como mostrado abaixo:
Figura 4. Paleta Data Access
Agora você precisa relacionar os componentes (tome por base o diagrama da Figura 5).
Figura 5. Configurando os componentes de acesso a dados
Configure a propriedade CommandText do SQLDataSet como:
select
ID, NOME
from
ALUNOS
order by
NOME
Dê um duplo clique no ClientDataSet e aperte Ctrl+F. Selecione os dois campos criados e arraste para o formulário. Coloque no formulário um componente DBNavigator da paleta Data Controls, configurando sua propriedade DataSource. Coloque um Button e no seu evento OnClick digite:
ClientDataSet1.ApplyUpdates(0); //grava a cache de dados no banco
Execute a aplicação. Cadastre alguns registros e aperte no botão para gravar os dados da cache no banco de dados. A Figura 6 mostra a aplicação em execução.
Figura 6. Formulário principal da aplicação
