in textbox nur zahlen, enter, esc und tab zulassen

[Taladan]

habs lösen können

Delphi-Quellcode:

procedure TNavigation.TextBox1_KeyPress(sender: System.Object; e: System.Windows.Forms.KeyPressEventArgs);
begin
  if not( e.KeyChar in ['0'..'9']) then begin
    if e.KeyChar = #13 then begin
//       mach was
    end;
    e.Handled := true;
  end;
end;