Edit Eingabe nur auf Zahlen beschränken, Probleme mit ^

[Angel4585]

Also man soll nur Zahlen eingeben können?
Ich mach das immer so:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ['0'..'9'])then Key:=#0;
end;

Also in die KeyPress un nich KeyDown