Abfangen von Fehleingaben

[juergen]

Hallo,
ich würde direkt auch nur die EINGABE zulassen, welche schon die gültigen Werte enthält.
Suchwort wäre hier wohl -> OnKeyPress

Codebeispiel könnte für Zahlen wie folgt aussehen:

Delphi-Quellcode:

procedure TmyProg.Integer_Edit_Press(Sender: TObject;
  var Key: Char);

  //allgemeine Sperrung von allen Zeichen ausser
  //Backspace, Enter, Minus und alle Zahlen
  if not (key in [#8, #13, #45, #48..#57]) then
    key := #0;
  begin
    key := #0;
    Windows.Beep(2000, 250);
  end;

Das ganze ins OnKeyPress-Event hinterlgen und fertig.

//Edit-> ich war zu langsam