Buscar por:

Controlando caracteres em um campo telefone

Código

Todo programador que trabalha com delphi um dia necessita de pequenos códigos como este que são bem úteis...

Aqui vai uma dica para formatar campos que devem conter números telefone, ja que se voce colocar o campo do tipo inteiro o cliênte fica na mão pois não vai poder separar os dígitos Ex: 56-9999-8888

E se voce colocar o campo do tipo String pode acontecer coisas indesejadas como por exêmplo o cliênte salvar por engano uma letra no meio do número.

Aqui vai o código ponha o código abaixo no evento OnKeypress do Edit

If not(key in['0'..'9',#8,'-','(',')']) then key:=#0; 

Será inutil para quem ainda não trabalha com banco de dados ou ja trabalha a muito tempo (quem ja sabe nem vai ler lógico), Porém tenho certeza que ira ajudar a muitos.