Ayuda En Delphi

[Susana Jimenez]

ayuda como validar una caja de texto para que solo entren letras y no numeros ya tengo un codigo

if (key < Char(65))or (key > char(90)) and (key < Char(97))or (key > char(122))and (key <> Char(8)) and (key <> Char(32))and (key <> Char(13)) then
begin
mensaje:=Application.MessageBox('Digíte Letras', 'Error de entrada');
key := char(0); //Limpia el EditBox

y si me acepta solo letrascuando pulso la tecla de retroceso no me la acepta ya intente quitandole el 8 pero aun asi no me la acepta

GRACIAS