Primero, me acabo de fijar que estaba en el foro de C++ Builder y no en el de delphi
, pero supongo que con los cambios apropiados .... Segundo la segunda comparación debería de ser:
Código Delphi
[-]
if Key in ['1'..'5'] then
El "copiar y pegar" es lo que tiene. Y tercero si que es necesaria para diferenciar entre un numero y la tecla de borrar, de lo contrario esta ultima no funcionaria. Por que no se puede borrar nada si el edit esta vacío