funcao para validar apenas letras

[Jessica07 0]

Boa noite,

 

Preciso criar uma função para o edit receber apenas letras e nao aceitar numeros..

Alguem poderia ajudar?

 

Desde já agradeço.

[Eisenheim 67]

Olá amiga!

function IsNumber(sValor: String): Boolean;
const
  cNumber = '0123456789';
begin
  Result := ( Pos( sValor, cNumber ) > 0 );
end;

[gellys 0]

Coloca no evento OnKeyPress:

if (not(Key in ['A' .. 'Z', 'a' .. 'z', ' ', '.', '-', #8])) then
  Key := #0;