Como evitar que o usuário insirá um caracter
24/12/2005
0
Chip_set
Posts
24/12/2005
Leandroaoa
o evento e o onkeypress
If NOT (Key in[´0´..´9´,#8,13]) Then
Key:=0;
isso quer dizer que so vai aceitar o pressionamento das teclas numericas o ENTER e o TAB
24/12/2005
Martins
Somente uma pequena correção tá.
If NOT (Key in[´0´..´9´,8,13]) Then Key:=0;
Somente teclas númericas, ENTER e BackSpace e não TAB, pois o código Ascii do TAB é 9.
Boas Festas!!!
24/12/2005
Chip_set
Somente uma pequena correção tá.
If NOT (Key in[´0´..´9´,8,13]) Then Key:=0;
Somente teclas númericas, ENTER e BackSpace e não TAB, pois o código Ascii do TAB é 9.
Boas Festas!!![/quote:aae8e2cd9a]
Faltou algo, tipo o compo é de quantidade e se eu tiver casas decimais? tipo 10,230 (metros pro exemplo).
24/12/2005
Edilcimar
24/12/2005
Chip_set
Concordo com você no quisito, ensinar a pescar, agora, eu não conheço os códigos, estou tentando aprender por isso a solicitação. e muito obrigado.
Tenho a certeza que um dia estarei aqui ajudando a outros.
25/12/2005
Edilcimar
25/12/2005
Paulo
25/12/2005
Martins
Chip_Set, o Colega [b:c80919aaac]Paulo[/b:c80919aaac] postou a resposta, e quanto ao comentário do [b:c80919aaac]Edilcimar[/b:c80919aaac] ele tem razão, ensinamos a pescar, pegar o peixe é com vc, vc tem sempre q arriscar, tentativa erro/acerto, só q o código estava mole, pq a idéia é: o edit só aceitara os valores se a tecla digitada estiver na array.
Use mais o Help do Delphi e pesquisas no Fórum, vai te ajudar bastante, um dia eu tb perguntei bastante aqui, e o pessoal só me mostrava a direção, caminhar era comigo.
Valew!!
Clique aqui para fazer login e interagir na Comunidade :)