Uma pequena correção...

if Key in ['a'..'z'] then
Key:=#0;

Não há necessidade de ter o NOT na frente! e como eh um valor CHAR, tem q 
ter o # antes!

Testei e funcionou!

Att,

Eduardo Buffara

----- Original Message ----- 
From: "Gabriel Filho" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Tuesday, December 27, 2005 11:41 AM
Subject: Re: [delphi-br] Edit soh aceitar numeros


segue um exemplo:
on OnKeyPress do edit coloque isso

if not  Key in ['a'..'z'] then Key:=0; ai ele vai aceitar somente caracteres
alfabético.



Em 27/12/05, Alfredo Brandes <[EMAIL PROTECTED]> escreveu:
>
> ola listra
>
> eu gostaria de saber como eu posso fazer com que um Edit soh aceite
> numeros
> e ignore outros caracteres que sejam digitados no seu interior...
>
> tem como fazer isso?
> agradeço
>
> Alfredo
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>


[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos









-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a