Fórum Edit somente aceitar numeros #485841
17/07/2014
0
Preciso de ajuda!
Estou tentando fazer com que o meu EdtId receba somente numeros mas não estou conseguindo, não quero fazer pelo evento onkeyprees quero fazer a ação de que quando eu clicar no BtnPesquisar ele reconheça se é numero ou letra. Se for numero tudo bem vai exibir a minha pesquisa, mas se for letra, ao clicar no BtnPesquisar ele me retorna uma mensagem dizendo que "neste campo só é aceitável numeros"
O que eu fiz até agora foi isso, mas não obtive sucesso:
if Trin(EdtId.Text) <> '0'..'9' then
begin
Mensagem('Neste campo só é aceitável numeros!','ERRO');
Exit;
end;
ALGUÉM PODE ME AJUDAR POR FAVOR!
OBRIGADO AMIGOS
Giuliano Frederice
Curtir tópico
+ 0Post mais votado
18/07/2014
Se você esta usando uma versão do delphi de 2010 em diante, é só alterar a propriedade NumbersOnly para True.
Jose Medeiros
Gostei + 1
Mais Posts
17/07/2014
Fabio Alves
if not (key in ['0'..'9', #8, #27, #32]) then
begin
beep;
key := #0;
end;
Aceita numeros e Enter, Tab
se nao for bloqueia
Gostei + 0
18/07/2014
Giuliano Frederice
Valeu
Gostei + 0
30/01/2015
Fabio Alves
begin
key := #0;
Mensagem('Neste campo só é aceitável numeros!','ERRO');
end;
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)