onKeyPress
Boa Noite galera...
vê se alguem me ajuda...
no OnKeyPress de um DBEdit coloquei:
if not(Key in [´a´..´z´,´A´..´Z´,´ ´,´0´..´9´,#8])) then
showmessage(´Caracter Inválido: ´ + Key + ´ ´ + sLineBreak + ´Digite apenas números e letras!´);
No caso é para aceitar somente letras e numeros, quando coloco um @ ou por exemplo, ele dispara a mensagem de caracter inválido, porém, o caracter aparece no DBEdit. Gostaria de saber como fazer para deletar o caracter indesejado ou bloquear de maneira q ele não apareça no DBEdit.
No meu banco de dados o campo associado ao DBEdit eh do tipo ´char´.
Grato desde já,
Nicollas 8)
vê se alguem me ajuda...
no OnKeyPress de um DBEdit coloquei:
if not(Key in [´a´..´z´,´A´..´Z´,´ ´,´0´..´9´,#8])) then
showmessage(´Caracter Inválido: ´ + Key + ´ ´ + sLineBreak + ´Digite apenas números e letras!´);
No caso é para aceitar somente letras e numeros, quando coloco um @ ou por exemplo, ele dispara a mensagem de caracter inválido, porém, o caracter aparece no DBEdit. Gostaria de saber como fazer para deletar o caracter indesejado ou bloquear de maneira q ele não apareça no DBEdit.
No meu banco de dados o campo associado ao DBEdit eh do tipo ´char´.
Grato desde já,
Nicollas 8)
Nick
Curtidas 0
Respostas
Firekiller
01/11/2005
Faltou apenas você restringir o caracter:
Basta deixar assim:
if not(Key in [´a´..´z´,´A´..´Z´,´ ´,´0´..´9´,#8])) then begin
showmessage(´Caracter Inválido: ´ + Key + ´ ´ + sLineBreak + ´Digite apenas números e letras!´);
[b:2afc6f731e]key := 0;[/b:2afc6f731e]
end;
Basta deixar assim:
if not(Key in [´a´..´z´,´A´..´Z´,´ ´,´0´..´9´,#8])) then begin
showmessage(´Caracter Inválido: ´ + Key + ´ ´ + sLineBreak + ´Digite apenas números e letras!´);
[b:2afc6f731e]key := 0;[/b:2afc6f731e]
end;
GOSTEI 0
Nick
01/11/2005
:shock:
Simplão!
Valeu pela luz velhinho! Tentei de tudo menos o óbvio :D
Simplão!
Valeu pela luz velhinho! Tentei de tudo menos o óbvio :D
GOSTEI 0