Programación General > Delphi

 Re: restringir edit

(1/2) > >>

elchay:
:question:hola quisiera que me ayudaran con esto porfavor como hago para que un edit solo pueda permitir la entrada de letras del avecedario solo las letras nada mas como hago eso

madriles:
por ejemplo podrias poner algo como esto

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key <> #8 Then //si no es la tecla de retroceso
if (Key < 'A') or (Key > 'z') Then Abort;
end;

es un ejemplo y como veras no te recoge la Ñ, pero no creo que tengas problemas
un saludo

Leonel Antonio Feliz:
el chay mi pana, eso es un disparate con el siguiente codigo puedes hacer eso y te coje todo lo que sea string y no te permite escribir ningun numero:
nota: este codigo debes ponerlo en el evento onkeypress del edit, ademas debes utilizar la libreria  idglobal.

if Not IsNumeric(Key) and (Key <> #8)then
begin
   Key:=#1;
end;

madriles:
tienes razon Leonel, pero SI le puedes introducir signos especiales, y el solo necesita las letras del abecedario, no que le metan interrogaciones y demas. tu codigo solo quita los numeros pero ? y el resto de caracteres  ?
un saludo

elchay:
hola gracias a los dos por aydarme bueno mandriles como ves pude entrar la manera de obtener la ñ y ¨Ñ y es :
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if( Key <> #8 )and( Key <>'ñ')and( Key <> 'Ñ') Then //si no es la tecla de retroceso
if (Key < 'A') or (Key > 'z') Then Abort;
end;

Navegación

[0] Índice de Mensajes

[#] Página Siguiente