Einzelnen Beitrag anzeigen

Benutzerbild von Nalincah
Nalincah

Registriert seit: 18. Jul 2003
898 Beiträge
 
Delphi 6 Professional
 
#1

Backspace in KeyPress entfernt

  Alt 4. Nov 2005, 16:01
Ich lass über KeyPress nur bestimmte Zeichen zu:

Delphi-Quellcode:
//------------------------------------------------------------------------------
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (Key in ['0'..'9','a'..'z','A'..'Z','+','-','/','\']) then Key := #0;
end;
Leider kann ich keine Backspace mehr drücken um Zeichen zu löschen? Wie kann ich da ne ausnahme machen?? Backspace liefert mir kein anständiges Char zurück
Sebastian
Ehemals bekannt als General2004
  Mit Zitat antworten Zitat