.35pt; TEXT-INDENT: -18pt; TEXT-ALIGN: left; tab-stops: list 64.35pt; mso-list: l4 level1 lfo3" align=left>· Validação de Campo Nulo;
· Validação de Intervalos de Valores;
· Validação de Valores entre diferentes Campos.
Para criar esses cenários, crie um banco de dados, no Firebird ou InterBase, chamado “Empresa” e execute o script da Listagem 1.
Listagem 1. Script para criação das tabelas do banco
CREATE TABLE DEPARTAMENTOS
(
CODDEPARTAMENTO INTEGER,
DESCRICAO VARCHAR(60),
SALARIO_MINIMO NUMERIC(5,2),
SALARIO_MAXIMO NUMERIC(5,2)
);
CREATE TABLE EMPREGADOS
(
CODEMPREGADO INTEGER,
CODDEPARTAMENTO INTEGER,
NOMECOMPLETO VARCHAR(100),
CPF VARCHAR(11),
TELEFONE VARCHAR(20)
);
Note que no script não temos campos Not Null, nem Primary Key e Foreign Key. Agora vamos começar nossa aplicação que, depois de pronta apresentará os dois cenários. Crie uma nova aplicação no Delphi e também um Data Module com o nome de “DMDados”, que será o repositório dos componentes de conexão ao banco.
Os componentes de acesso e suas respectivas configurações são:
· SQLConnection
o Name: “sqlConexao”
o ConnectionName: IBConnection
o LoginPrompt: False