Clique para saber mais...
  Home     Download     Produtos / Cursos     Revista     Vídeo Aulas     Fórum     Contato   Clique aqui para logar | 07 de Agosto de 2026
  Login

Codinome
Senha
Salvar informações

 Esqueci minha senha
 Novo Cadastro

  Usuários
72 Usuários Online

  Revista ActiveDelphi
 Assine Já!
 Edições
 Sobre a Revista

  Conteúdo
 Apostilas
 Artigos
 Componentes
 Dicas
 News
 Programas / Exemplos
 Vídeo Aulas

  Serviços
 Active News
 Fórum
 Produtos / Cursos

  Outros
 Colunistas
 Contato
 Top 10

  Publicidade

  [Artigos]  Construindo uma aplicação simples com Delphi e Firebird (parte 1)
Publicado por ggiovanii : Sexta, Abril 15, 2011 - 11:25 GMT-3 (3985 leituras)
Comentários 10 Comentários   Enviar esta notícia a um amigo Enviar para um amigo   Versão para Impressão Versão para impressão
Bruno Caltran Olá amigos, nessa seqüência de artigos pretendo exemplificar a construção de um aplicativo para cadastro/pesquisa de clientes utilizando o banco de dados FireBird e os componentes nativos do Delphi: DBExpress e Data Access.

Primeiro vamos pensar na estrutura do banco de dados:

Tabela CLIENTE

SEQ - (integer)
(Será nossa chave primária e código auto-numeração)
 
TIPO - (Char2)
(Gravará se o cliente é Físico ou Jurídico “PF ou PJ”)
 
NOME - (Varchar 250)
 
TELEFONE - (Varchar15)
 
EMAIL - (Varchar150)

Ok, agora que definimos os campos da nossa tabela, vamos criar o banco de dados. Para isso eu utilizarei o software IBExpert. Existem outros softwares, alguns gratuitos para manipulação de banco de dados Firebird.

Com o IBExpert aberto, vamos acessar o menu DataBase > Creat Database (conforme imagem abaixo).


Figura 1 - Criando um banco de dados novo no IBExpert

Na próxima tela será necessário escolher o local onde o banco de dados será criado, no meu caso, escolhi o endereço c:\ExemploArtigo\BancoDados.fdb


Figura 2 - Parametrizando a criação do banco

Por padrão, o username é SYSDBA e a senha masterkey (Caso você tenha alterado essas configurações, informe as corretas). Clique em OK para Criar o banco de dados.

Agora vamos registrar o banco de dados (Conforme imagem abaixo)


Figura 3 - Registrando o banco de dados criado.

Selecione a versão do Firebird ( eu estou utilizando a versão 2.0 nesse exemplo), clique em ok e pronto! O banco de dados foi criado e registrado no IBExpert.

Na barra lateral esquerda clique duas vezes para conectar ao banco de dados, conforme a figura 4:


Figura 4 - Conectando no banco registrado

Agora o banco de dados está pronto para criarmos nossa primeira tabela. Sobre o item Tables, clique com o botão direito do mouse e após, clique em New Table:


Figura 5- Criando uma nova tabela

Defina o nome da tabela, que vamos chamar de “CLIENTES”


Figura 6 - Definindo o nome da tabela

Agora onde está escrito New_FIELD, vamos iniciar o lançamento dos nossos campos. A vantagem de utilizar o IBExpert é que ele é visual você poderá utilizar o mouse para alimentar os parâmetros (tipos de dados, etc).


Figura 7 - Definindo os campos e clicando no botão para executar.

Lembre se de marcar o campo SEQ como Not Null ( Ele será nossa chave primária ). Clique em Compile ou tecle CTRL +F9

Agora clique em Commit, Perceba que o IBExpert já montou o código SQL para nós.


Figura 8 - Visualizando o comando gerado pelo IBExpert e confirmando-o para execução (commit).

Pronto a tabela foi criada!

Ainda editando a tabela, mude para a aba Constraints, na Sub-aba 1.Primary key clique com o botão direito do mouse selecione a opção New primary key (ou pressione a tecla Insert). Na opção On Field, clique duas vezes para enviar o campo SEQ para o lado direito (conforme figura 9). Tecle CTRL +F9 para compilar e pronto, a chave primária está criada.


Figura 9 - Criando a chave primária

Agora vamos fazer o Firebird trabalhar para nós! Vamos Criar um Autoincrement para não nos preocuparmos com o código de auto-numeração no campo SEQ.

De um duplo clique sobre o campo SEQ e selecione a aba AUTOINCREMENT (vide figura 10).


Figura 10 - Criando o campo auto-incremento.

Marque a opção Create Generator, mude para a aba Trigger e marque a opção Create Trigger. Clique em OK e depois em Commit.

Pronto! Nosso banco de dados está criado e nossa tabela possui o recurso de auto-numeração para chave primária! No Próximo artigo faremos a conexão com o banco de dados no Delphi e iniciaremos a construção da interface do software.

Caso deseje fazer o download do banco de dados clique aqui.

Um grade abraço e até o próximo artigo!

Por: Bruno Giovani Caltran (ggiovanii)
Contato: bruno@pirabyte.com.br
Twitter: http://twitter.com/bgcaltran
Blog: http://bgcaltran.blogspot.com



Comentários Comentários
   Ordem:  
Comentários pertencem aos seus respectivos autores. Não somos responsáveis pelo seus conteúdos.


por: Ghost_Rider (osmar.bento@ig.com.br) : Abr 15, 2011 - 10:59
(Informações sobre o membro | Enviar uma mensagem) http://http://
Só um comentário...ao criar o campo que será a chave primária, no caso o campo SEQ, ao ir com a seta para a esquerda, na coluna PK, se voce utilizar a barra de espaço, o mesmo já marca o campo como chave primaria ao criar a tabela...apenas uma observação que poupa tempo...abraço e otimo artigo...


por: ogrex (uf.oliveira@gmail.com) : Abr 18, 2011 - 08:20
(Informações sobre o membro | Enviar uma mensagem) http://
muito bom


por: lucas2011 (lucasemanuelbarbosa@hotmail.com) : Abr 26, 2011 - 04:18
(Informações sobre o membro | Enviar uma mensagem)
gostei, bastante simples, já estou ancioso pela parte 2 desse assunto.

Abraços...


por: hadhiago (hadhiago@yahoo.com.br) : Mai 01, 2011 - 12:30
(Informações sobre o membro | Enviar uma mensagem)
Gostaria de saber quando sairá a parte 2 deste artigo.

Atenciosamente,

Hiago Dantas


por: naiarapattini (naiara_pattini@hotmail.com) : Mai 10, 2011 - 10:55
(Informações sobre o membro | Enviar uma mensagem) http://
Gostei!! Quero a segunda parte :D


por: lcmm_itapolis (siul_mm@terra.com.br) : Mai 27, 2011 - 10:24
(Informações sobre o membro | Enviar uma mensagem) http://http://
Olá amigos estou fazendo um formulário de cadastro de clientes com PageControl - 1 Formulário (DBEdits) e 2 - Tabela (DBGrid) estaou cadastrando CPF e CNPJ no mesmo DBEDit, usndo um RadioGroup para definir PJ - Pessoa Juridica e PF - Pessoa Fisica, como faço para fazer o RadioGroup ficar selelcionado na mesma pessoa que foi cadastrada quando eu clicar nos botoes de consulta ou quando eu clicar no registro do DBGRid ele pula para paina de edição dos DBEdits más não seleciona o RadioGroup especifico PF ou PJ. Alguem pode me ajudar !!!!


por: cleon_developer (cleon.ti@hotmail.com) : Jun 11, 2011 - 11:42
(Informações sobre o membro | Enviar uma mensagem) http://
Onde está a segunda parte?
A primeira foi apenas a construção da base e da tabela. A "aplicação" mesmo deve estar na segunda parte, mas nao to encontrando. rsrsrs


por: waljose (jwspereirafilho@bol.com.br) : Jun 18, 2011 - 11:16
(Informações sobre o membro | Enviar uma mensagem)
quando estou clicando no autoincremento e tigeer está dando erro.


por: waljose (jwspereirafilho@bol.com.br) : Jun 18, 2011 - 11:25
(Informações sobre o membro | Enviar uma mensagem)
O autoincremento e o tigeer estão dando erro

Operação result
Creating Generator GEN_CLIENTE_ID erro

Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 1, char 8.
SEQUENCE.


por: waljose (jwspereirafilho@bol.com.br) : Jun 18, 2011 - 11:29
(Informações sobre o membro | Enviar uma mensagem)
O autoincremento e o tigeer estão dando erro Operação result Creating Generator GEN_CLIENTE_ID erro Invalid token. Dynamic SQL Error. SQL error code = -104. Token unknown - line 1, char 8. SEQUENCE.
  Edição 112

Revista ActiveDelphi

  50 Programas Fontes


  Produtos

Conheça Nossos Produtos

Copyright© 2001-2016 – Active Delphi – Todos os direitos reservados