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

One comment on “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 um comentário