[Problem]Nur Zahlen in einem Edit Feld

[BigManda]

Delphi-Quellcode:

procedure TForm1.TF_RadiusChange(Sender: TObject, var Key: Char);
begin
  if Not(Key in ['0'..'9']) then
  abort;
end;