Restrict key Input

[gforrest]

Hi Gang,

Anyone know how I change this code to allow the use of the backspace key?

Thanks.

if not (Key in [Ɔ'..' 9']) then //Allow numeric characters only
Key := #0;

 

[Otto]

if not (Key in ['0'..'9', #8]) then Key:= #0;