Einzelnen Beitrag anzeigen

Peeters

Registriert seit: 3. Dez 2002
Ort: Meerbusch
86 Beiträge
 
Delphi 2007 Enterprise
 
#2

Re: bestimmte Tasten Sperren.

  Alt 9. Mai 2006, 16:23
Beispiel mit KeyPress:

Delphi-Quellcode:
procedure TFormHaupt.EditVKKeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then Key := #0;
  if not (Key in ['0'..'9', #8, #13]) then Key := #0;
end;
Peeters
  Mit Zitat antworten Zitat