不让输入标点和特殊符号，急死了！！(100分)

floodsyn · 2002-06-17

日前在给StringGrid控件的Cells赋值的时候，控制只能输入16进制。现在已经控制到
输入00—FF正常，但是还可以输入标点符号和一些特殊符号，不知道怎么样才能禁止用户在
Cell里输入标点和特殊符号，请赐教！！

zhumoo · 2002-06-17

吃掉其键值啊.

张无忌 · 2002-06-17

在EditKeyPress的事件里加入：
if not (key in ['*','&']) then 比如你要删掉'*','&'
key:=#0;

wangfu · 2002-06-17

楼上就是
除掉那些标点符号

floodsyn · 2002-06-18

在EditKeyPress的事件里加入：
if not (key in ['*','&']) then 比如你要删掉'*','&'
key:=#0;

有很多符号呀，难道一个一个写在括号里？

floodsyn · 2002-06-19

没有好点的方法吗？难道一个一个符号加入。不方便吧

张无忌 · 2002-06-19

就这么做，没别的办法，或者你用MARKEDIT，不一定能达到你的要求

空空色色 · 2002-06-19

也不是很多呀
数数键盘上的键就知道了
这很多吗？

ftop1 · 2002-06-19

1 在KeyPress 中写
至于键的值你可以做个程序测试测试一下就知道
2 其他在所属窗体的 FormShortCut 事件中实现也很简单
判断焦点
判断键值不合符的挂起 Handled:=True

book523 · 2002-06-19

就是啊。

floodsyn · 2002-06-19

你说到键的值，回车换行是#13#10，我想知道其他的键的数值。不知道用什么方法，希望能够详细点告诉，感谢！！

张无忌 · 2002-06-19

你在EditKeyPress事件里
showmessage(inttostr(key));你敲一个键就可以知道了他的key,

HunterTeam · 2002-06-19

只需在keypress事中这么定义:
if not (key in ['0'..'9','A','B','C','D','E','F']) then key:=#0;
如是小写的abc等也可以的话，也加到in之后的集合里就成。

floodsyn · 2002-06-19

HunterTeam的办法是最好的了，多谢。不过大家都有分的哟！感谢！