|
Registriert seit: 28. Jul 2003
1.528 Beiträge
Delphi 2005 Personal
|
Re: Tasen sperren mit key /Wie gebe ich entf/del frei?
19. Jul 2006, 08:32
das geht auch schöner:
Delphi-Quellcode:
//allgemeine Sperrung von allen Zeichen ausser
//backspace, {(-) , (,)} und Zahlen
if not (key in[#8,{#44,#45,}#48..#57]) then key:=#0;
Erwarte das Beste und bereite dich auf das Schlimmste vor.
|
|
|
Zitat
|