[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;