Buscar

Campo so aceitar numeros( uma linha de comando)

Código

Coloque este procedimento no OnKeypress do componente
 
  if not ( Key in ['0'..'9',#13,#8] ) then
   Key := #0;
não tem erro...super fácil

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Forms
Adicionada dia: 31/10/07
Por: Fabricio Silva Da Rocha
Visualizada: 7103 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009