Buscar

Cadastro do usuário CHAVE ESTRANGEIRA INFO III

Prévia do material em texto

Cadastro do usuário – CHAVE ESTRANGEIRA DO CAMPO VENDEDOR
ATIVIDADE INDIVIDUAL
1-) Salve All. Unit será: U_Cad_Usuario enquanto o projeto será Project1 mesmo dentro (não se esqueça de colocar dentro da pasta).
2-) Defina para esse Form a propriedadeo name para Form_Cadastro_Usuario, Width = 480, Height = 400, Position = poDesktopCenter;
3-) Lembremos da estrutura da tabela TB_USUARIO no SQL SERVER
4-) Faça um ADOQueryUsuario contendo a propriedade Connection = ADOConnection1, o sql select * from tb_usuario, não se esqueça de deixar active igual à true e já adicione todos os fields
5-) Arraste os Fields na tela conforme imagem abaixo:
6-) Observe que um DataSource1 	já foi fornecido (ligado ao ADOQuery correspondente). Altere sua propriedade name para DataSourceUsuario
7-) Exclua o campo (Label e o Edit), referente à VENDEDOR
8.a-) No lugar desses 2 componentes colocaremos um Button, e dois Label´s (conforme a figura abaixo). Observação: Os label´s possivelmente fiquem com o name contendo a numeração 4 e 5 respectivamente.
8.b-) Arraste um ADOQuery (próximo ao Label5), e coloque o nome para ADOQueryVendedor, defina também:
a propriedade Connection para ADOConnection1
sql = 	select *
from tb_vendedor
where nome like :nome
Active = True
Vá na propriedade parameters do ADOQuery e defina o parâmetro nome lançando 0 para o value;
Adicione todos os fields, dando um duplo clique sobre o ADOQueryVendedor
9-) Faremos o botão Funcionário:
	
10-) Vamos adicionar dois DB´s Navigator´s com o objetivo de ter um botão em cada componente. No DBNavigator1 será Insert (+) enquanto no segundo DBNavigator Post ().!
11-) Faça os DB´S Navigator´s ligarem ao DataSourceUsuario. O DBNavigator1 ficará com o sinal de + enquanto o segundo DBNavigator ficará com o sinal de Post apagado.
12-) Dê um duplo clique sobre o DBNavigator1 e faça: 
13-) Dê um duplo clique sobre o DBNavigator2 e faça com que o botão de + apareça novamente: 
14-) Selecione o ADOQueryUsuario e crie o evento onBeforePost contend a seguinte linha: 
	
15-) Teste no Delphi. Lembre-se de MARCAR ou DESMARCAR o componente DBCheckBox1, pois o campo super usuário foi criado no banco como não nulo, ou seja, não pode ficar assim antes de clicar no botão Post,
16-) Teste no SQL Server.

Continue navegando