¿valiar letras en los edits?

[samantha jones]

en el evento OnkeyPress del Edit

Código Delphi [-]
begin
      if not(Key in ['A'..'Z', 'a'..'z', #9, #8]) then
         Key:=#0;
end;

[vtdeleon]

Saludos

Empezado por samantha jones

en el evento OnkeyPress del Edit

Código Delphi [-]
begin       if not(Key in ['A'..'Z', 'a'..'z', #9, #8]) then          Key:=#0; end;

Ten encuenta que debes agregar la ñ,Ñ y vocales con acento.

[kiringui]

para solo numeros:

if (Key in [#33..#47, #64..#255])then
Key:=#0;

para solo letras:

if not (Key in [#33..#47, #64..#255])then
Key:=#0;

[[Lepe]]

Ojo, con el portapapeles de windows si permitirá introducir lo que sea, se puede interceptar el mensaje del portapapeles (algo más lioso) o en el evento OnChange llamar a esa rutina para que limpie los caracteres.

Saludos

[kiringui]

No e especificado bene seria en el evento en key pres ..y tienes toda la razon tambien hjay que controlar el portapapeles!!!!buena observacion.

Tambene me e fijado que el caracter "<" no queda controlado ...

da gusto aprender todos juntos