GARANTIR DESCONTO

Fórum bloquear letras em um edit #336935

30/01/2007

0

Delphi

Ola pessoal!

Alguém pode me dizer como eu faço pra que em um Edit eu só possa digitar números, mas de uma forma que eu possa ativar o BackSpace.

desde já agradeço.


Fabiosys

Fabiosys

Responder

Post mais votado

30/01/2007

Coloque esse código no evento OnKeyPress do seu Edit.

if (not (Key in [´0´..´9´])) and (Key <> 8) then
  Key := 0;



Rjun

Rjun
Responder

Gostei + 2

Mais Posts

30/01/2007

Sergiomurilope

Ola pessoal! Alguém pode me dizer como eu faço pra que em um Edit eu só possa digitar números, mas de uma forma que eu possa ativar o BackSpace. desde já agradeço.


Boa tarde, bem eu sou iniciante e aprendi assim, usando o case

case Key of
´0´ .. ´9´, #8:;
else
Key := 0;
end;

espero que tenha ajudado


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar