Código Delphi [-]if not (key in ['0'..'9',#13,#8]) then key:=#0
if not (key in ['0'..'9',#13,#8]) then key:=#0