mascara para edit texto e numeros

Delphi

28/01/2004

galera estou com o seguinte problema

estou fazendo uma pequisa com um edit

mas eu quero que quando o usuario digitar letras mostre uma mensagem
por ex:

por letra

if edit1.text = ´A´..´Z´ then // onde da o erro
showmessage(´hhhhhhhhhhhhh´);

por numero

if edit1.text = ´0´..´9´ then // onde da o erro
showmessage(´hhhhhhhhhhhhh´);

se alguem souber e puder me ajudar valeu


Denis200

Denis200

Curtidas 0

Respostas

Osocram

Osocram

28/01/2004

naum sei se entendi...

mas coloca esses codigos no onchange do edit


GOSTEI 0
Denis200

Denis200

28/01/2004

valeu velho mas da o mesmo erro de antes

[Error] U_vendas.pas(485): Illegal character in input file: ´´´ ($60)


GOSTEI 0
Osocram

Osocram

28/01/2004

cara a sintaxe q vc esta usando esta errada...

vou ver se descubro a sintaxe...


GOSTEI 0
Osocram

Osocram

28/01/2004

a sintaxe naum descobri.. mas dah p usar c o case... olha soh.

case key of
´0´..´9´:showmessage(´hhhhhhhhhhhhh´);
end;


GOSTEI 0
POSTAR