Lazarus 0007 – Agenda com base de dados Firebird

Lazarus é um ambiente de desenvolvimento integrado desenvolvido para o
compilador Free Pascal. O software é compatível com o Delphi e, ao mesmo
tempo, suporta diversas arquiteturas e sistemas operacionais como
Windows, Linux e MAC OS X.

Nesta vídeo-aula vamos aprender a criar uma Agenda utilizando base de Firebird e componentes nativos do Lazarus (SQLTransaction, SQLConnection, SQLQuery e DataSource).

Para instalar o Firebird no Ubuntu, assista a vídeo aula, CLIQUE AQUI.

Script para criação da tabela, procedimento e gatilho logo abaixo do vídeo:


Script para Criar tabela:

p { margin-bottom: 0.25cm; line-height: 120%; }

CREATE TABLE
CLIENTES
(
CODIGO integer NOT
NULL,
NOME varchar(50),
ENDERECO
varchar(50),
BAIRRO
varchar(30),
CIDADE
varchar(50),
UF varchar(2),
CEP varchar(10),
TELEFONE
varchar(15),
CONSTRAINT
PK_CLIENTE PRIMARY KEY (CODIGO),
CONSTRAINT UK_NOME
UNIQUE (NOME)
USING INDEX
IX_NOME
);
Script para Criar Generator:
p { margin-bottom: 0.25cm; line-height: 120%; }

CREATE GENERATOR
CODCLI_GEN;

Script para Criar Trigger (Gatilho):
p { margin-bottom: 0.25cm; line-height: 120%; }

SET TERM ^ ;
CREATE TRIGGER
CODCLI FOR CLIENTES ACTIVE
BEFORE INSERT
POSITION 3
AS
BEGIN
new.CODIGO =
gen_id( CODCLI_GEN, 1 );
END^
SET TERM ; ^

Aṕos o término da vídeo aula, percebi um erro quando editamos o registro.
Fiz outro vídeo para resolver o seguinte erro: “No update query specified and failed to generate one”


Se este vídeo foi útil a você, curta nossa página

Publicado por

Daniel Morais

Comecei na área de TI há um bom tempo (1991) com aqueles cursos de MS-DOS 6.22, WordStar, Lotus123, Dbase III Plus, etc. Adorei programar em Dbase III Plus utilizando Dbf; achei fantástico quando aprendi a programar em Clipper Summer 87 e posteriormente Clipper 5.x, que era muito estável em rede utilizando Novell NetWare. Desde então sou um fanático por TI. Hoje desenvolvo aplicações para Windows, Android, OS X e Linux utilizando Lazarus (free Pascal) . Blogueiro (www.infocotidiano.com.br, www.aprendalazarus.com.br, www.startdb.info). Além dos meus Blogs tenho um canal no YouTube o www.youtube.com.br/infocotidiano onde tenho mais de 1 Milhão de visualizações com vídeos de dicas diversificadas que vão desde solucionar um erro de impressão, curso sobre banco de dados, até criar software multi-plataforma utilizando o Lazarus.

Um comentário em “Lazarus 0007 – Agenda com base de dados Firebird”

  1. Estou seguindo seus tutoriais, são muito bons, porém estou tentando implementar um DBDateEdit, porém não sei qual tipo de variável eu coloco para ele dentro da tabela do banco, como faço?

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *