Exer 03

Exercício 03
Construir um programa em Delphi com um menu, cadastrando informações de clientes de um banco, conforme tela abaixo.

Para tal, inserir, na paleta Standard clicar em menu.

Uma vez no form, dê um clique duplo sobre o objeto e insira a tela conforme abaixo. Não esqueça do & e das teclas de atalho.

Salvar o projeto com o nome menu_exe.dpr e o form principal princip.pas. Para criar um novo form clique em File/New Form (ou conforme a sua versão do Delphi). Em seguida salvar novamente o projeto. Aparecerá a tela para definir o nome do novo form , incluir.pas. Inclua os objetos conforme tela abaixo.

Objeto
Form
Label (qt 5)

Propriedade
Name
Caption
Caption

Edit (qt 2)

Name

MaskEdit (qt 2)

EditMask
Name

RadioGroup

Name items Valor
Cliente_incluir
Inclusão de Clientes
Nome
Endereço
CEP
Telefone
Renda Mensal
Ed_nome
Ed_endereco
00000\-999;1;_ para CEP
!\(999\)0000-0000;1;_ para Tel
!99990,00;1;0 para renda mensal
Mk_cep
Mk_telefone
Mk_renda
Rg_civil
Solteiro

Casado
Viúvo
Desquitado
Divorciado
GroupBox
CheckBox

Caption
Name
Caption

Button

Caption
Name

Serviços
Ck_especial
Ck_credito
Cheque Escpecial
Cartão de Crédito
Incluir
BB_incluir

Algumas observações sobre o MASKEDIT:
A propriedade EditMask do componente MaskEdit possui três partes, separadas por ;
(ponto-e-vírgula):
!\(9xx99\)000-0000;1;_
!\(9xx99\)000-0000 - é a máscara em si.
1 - indica que os caracteres serão salvos como parte do dado;
0 - indica que os caracteres NÃO serão salvos como parte do dado.
_ - caracter usado para representar o branco na máscara.
Na máscara o caracter 9 indica que é permitido números, mas não é obrigatório a entrada de dados; o caracter 0 indica que é obrigatório a entrada de números. Desta forma, queria que fosse obrigatório somente o telefone da pessoa, sem necessidade do DDD.
Para criar uma entrada de dados como você deseja, utilize a máscara: LLLL99999
O caracter L obriga que seja somente letras (A-Z, a-z) e o 9 (como já disse) somente números Caracteres