khaled salem
asked on
Delphi Ascii code
Hi All:
i've an edit box this edit box for numeric values. i'd like to make this edit box accept just numeric values i wrote on key press the following
IF NOT((Key IN ['0' .. '9']) OR (Key = #8) OR (Key = #17)OR (Key = #67)OR (Key = #86) OR (Key = #118)OR (Key = #88)OR (Key = #13)) THEN
Key := #0;
but this code stop the ctrl+v, ctrl+c and ctrl+x
can you please help me to fix this issue and lets the edit box accept (ctrl+v).
i've an edit box this edit box for numeric values. i'd like to make this edit box accept just numeric values i wrote on key press the following
IF NOT((Key IN ['0' .. '9']) OR (Key = #8) OR (Key = #17)OR (Key = #67)OR (Key = #86) OR (Key = #118)OR (Key = #88)OR (Key = #13)) THEN
Key := #0;
but this code stop the ctrl+v, ctrl+c and ctrl+x
can you please help me to fix this issue and lets the edit box accept (ctrl+v).
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER