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