RES: [delphi-br] Somente Número

2005-07-13 Por tôpico Daniel Luiz De Mello Costa
Eu não tenho o Delphi aqui na empresa mas existe uma rotina que no evento Key 
down que caso a tecla pressionada não esteja entre #0 e #9 o sistema não valida 
a digitação
 
Em casa eu tenho um código fonte de um componente que só aceita 
inteiro.
 
E agora de cabeça eu não lembro o código direito, ele está em livro 
de Delphi a bíblia.
 
 
Daniel Costa
 
  \!/
  ( õ õ )
oOOO--(_)-
   El loco

--oOOO
|__| |__|
  ||   ||
 ooO   Ooo
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de F D
Enviada em: quarta-feira, 13 de julho de 2005 08:31
Para: Delphi Grupo; Grupo Delphi
Assunto: [delphi-br] Somente Número
 
Como faço para que um edit só aceite número inteiro?

Grato

Francisco

__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

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



-- 
<<<<< 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] ou [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] <mailto:[EMAIL PROTECTED]> 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
Serviço do Yahoo! <http://br.yahoo.com/info/utos.html> . 


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





-- 
<<<<< 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] ou [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

 




Re: [delphi-br] Somente Número

2005-07-13 Por tôpico Evolution
É só fazer assim:

procedure Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not( key in['0'..'9',#8] ) then  key:=#0;
end;
Fausto
- Original Message - 
From: "F D" <[EMAIL PROTECTED]>
To: "Delphi Grupo" ; "Grupo Delphi" 
<[EMAIL PROTECTED]>
Sent: Wednesday, July 13, 2005 8:30 AM
Subject: [delphi-br] Somente Número


Como faço para que um edit só aceite número inteiro?

Grato

Francisco

__
Converse com seus amigos em tempo real com o Yahoo! Messenger
http://br.download.yahoo.com/messenger/

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



-- 
<<<<< 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] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos









-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.323 / Virus Database: 267.8.13/47 - Release Date: 12/07/2005 



-- 
<<<<< 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] ou [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

 




[delphi-br] Somente Número

2005-07-13 Por tôpico F D
Como faço para que um edit só aceite número inteiro?
 
Grato
 
Francisco

__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

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



-- 
< 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] ou [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