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

Comentários

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?

Postagens mais visitadas deste blog

Provedores de acesso gratuito banda larga

Instalando Windows em Partições GPT

Compartilhando pastas no Windows 10