7 de novembro de 2015

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:


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:

CREATE GENERATOR CODCLI_GEN;
Script para Criar Trigger (Gatilho):

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

Um comentário:

x disse...

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?

Programando: Java vs Delphi / Lazarus - Parte 01

Todo mundo sabe que alguns quarentões do Delphi ou Lazarus defende com unhas e dentes a produtividade desta maravilhosa ferramenta. Eu ta...