Continuando minha série de tutoriais a respeito do Delphi, agora chego a parte de conexão com Banco de Dados Firebird.

Tendo instalado estes três componentes vamos ao que interessa.

  1. Abra o IBExpert
  2. Crie uma Base de Dados com o nome teste.fdb, selecionando a versão do seu firebird, salve-a em c:\temp\, senha masterkey, usuário sysdba.
  3. Crie uma tabela, usuario com os campos codigo e nome, no campo código marque a opção autoinc, para criar um campo incremental, uma tela irá abrir, marque create generator, va até a palheta procedure, marque create procedure. Isto é o suficiente para criar uma tabela com o código incrementado através de uma stored procedure
  4. Abra o Delphi
  5. Localize a na palheta IBOdataset, e adicione os componentes: IBODATABASE, IBOQUERY, da palheta Data Access adicione um DataSource, da palheta DataControl adicione um DBNAVIGATOR.
  6. Clique duplo sobre o IBODATABASE, irá abrir uma tela para conectar ao banco de dados, selecione a base de dados C:\temp\teste.fdp que você criou, senha masterkey, usuário sysdba, e marque o campo remember. pode dar um Ok nesta tela, selecione o componente IBODATASET novamente, e deixe-o conected=true;
  7. selecione o componente IBOQuery, clique com o botão direito e vá em SQL Editor, ponha select * from teste na sql. Ok nesta tela, deixe o IBOQuery.Conection=IBODATABASE e ACTIVE=True;
  8. Agora ligue o DataSource ao IBOquery, e o DBNavigator ao DataSource;
  9. lique com o Direito novamente no IBOQuery e agora va em Fields Editor, clique com o direito na pequena tela que surge e selecione add all fields;
  10. Selecione os Fields que surgiram e arraste para o Formulário, sua aplicação já deve estar funcinando.

É isto acesso nativo ao firebird em 10 passos através do IBO+Delphi, basta a você perfumar um pouco, até mais.