[Resolvido] bloquear campo dbedit

[Popin 0]

Como eu faço para que um campo DBEdit não aceite numeros e somente letras?

[fernando.fxsoft 0]

Veja a propriedade EditMask no Fields Editor do seu DataSet, lá você pode configurar para o campo receber apenas letras. Consulte a ajuda do Delphi para mais informações.

[itepi 0]

no evento OnKeyPress do DBEdit escreva o seguinte codigo :

 

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

Se quiser que o campos também aceite virgula, e sinal de negativo(caso seja um campo monetario por exemplo), utilize o seguinte codigo

 

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

Acredito que com esse código você resolva seu problema, isso se eu não errei nada nesse código =P

[Popin 0]

VLW, consegui resolver meu problema.

[Pantoja 5]

VLW, consegui resolver meu problema.

 

Resolveu com o método do itepi, do fernado ou ambos?

[itepi 0]

Arrumando, eu fiz pra só aceitar numero.

Para aceitar somente letra é só tirar o NOT da condição

[Popin 0]

Utilizando a maneira do itepi sem o not, porém agora o campo em que eu inseri a função não esta deixando apagar as letras caso eu erre um caracter ao digitar, a não se eu selecione as letras a pressione delete.

 

Alguém teve o mesmo problema?

[itepi 0]

Sorry man..erro meu...isso que da responder sem testar, me desculpe...

Além de tirar o NOT da minha função tem que tirar o '#8', pois ele é o caracter ASCII do Backspace....e nessa função que te passei caso fosse algum numero de 0 a 9 ou o backspace ele colocaria o caracter ASCII #0 que não faz nada....espero ter ajudado dessa vez

 

Abraço

[Popin 0]

Opa eu que agradeço, agora funcionou perfeitamente.Se puder me ajudar da uma olhada no outro tópico que criei a pouco sobre validação de campos.

 

OBRIGADO...