for i = 1 to length(edit1.text)
  if copy( edit1.text, i, 1 ) in '@#/-' then
... e por ai vai.

Evandro Siqueira
Programador
Recife/PE

----- Original Message ----- 
From: "Cristiano" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Tuesday, July 05, 2005 10:27 AM
Subject: [delphi-br] Detalhes



Sou iniciante em programação e gostaria de saber como eu faço para correr um
DBEdit a procura de caracteres especiais do tipo ( / , - , @ ) e tb como eu
faço para evitar a entrada de números em lugar de letras em um campo por
exemplo do DBEdit.

Fico muito grato a quem me ajudar.



Ass: Cristiano


__________________________________________________
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












-- 
<<<<< 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

 


Responder a