[Problem]Nur Zahlen in einem Edit Feld

[STS301]

ich habe es zwar anderes genutzt, aber so geht es auch

Delphi-Quellcode:

case key of
    '0'..'9':;  
    #8:;
    #43:;  //löschen aktiviert
    #13:;
  else
    key:=#0  //mach nichts
end;

hier die Tastencodes