Re: [delphi-br] Impedir Caracteres Indesejados

2006-02-01 Por tôpico Julio Abdala
tenho uma função que uso para validar numeros Procedure ValidaKey (Const Sender :TObject; var Key :Char; Tipo :Integer); // Valida Key em Edits Begin if not (Key in ['0'..'9', '.', ',', '+', '-', #8, #13]) then Key := #0; if Key in [',','.'] then If (Tipo = 1) OR (Tipo = 3)

Re: [delphi-br] Impedir Caracteres Indesejados

2006-02-01 Por tôpico Cleiton
-br] Impedir Caracteres Indesejados OnKeyPress if not (Key in ['0'..'9', #8]) then Key := #0; Cleiton escreveu: Olá pessoal... Como fazer para impedir que usuário digite números em um campo que deveria aceitar apenas letras e como impedir que o usuário digite letras em um campo que deveria

[delphi-br] Impedir Caracteres Indesejados

2006-01-30 Por tôpico Cleiton
Olá pessoal... Como fazer para impedir que usuário digite números em um campo que deveria aceitar apenas letras e como impedir que o usuário digite letras em um campo que deveria aceitar apenas números? abraços Cleiton -- Esta mensagem foi verificada pelo sistema de antivírus e acredita-se

Re: [delphi-br] Impedir Caracteres Indesejados

2006-01-30 Por tôpico Marcio Cruz
OnKeyPress if not (Key in ['0'..'9', #8]) then Key := #0; Cleiton escreveu: Olá pessoal... Como fazer para impedir que usuário digite números em um campo que deveria aceitar apenas letras e como impedir que o usuário digite letras em um campo que deveria aceitar apenas números? abraços