怎么屏蔽小键盘的按键输入呢?(例如方向键、Delete键等。可用分太多了,散分!)在线等答!

knightkun 2002-08-05 09:56:49
RT!

BTW:CSDN太过分了!我本来准备给大家放250分呢!可是它竟然警告我:“您不能放这么多分!”。sigh!将就着点,给大家100分了!
...全文
64 13 打赏 收藏 转发到动态 举报
写回复
用AI写文章
13 条回复
切换为时间正序
请发表友善的回复…
发表回复
cqbonny 2002-08-05
  • 打赏
  • 举报
回复
在KeyDown里面就可以实现
if key=vk_numpad0 then (如果为小键盘的0键就干你想干的事情)
下面是小键盘的值
VK_NUMPAD0 0 key (numeric keypad)
VK_NUMPAD1 1 key (numeric keypad)
VK_NUMPAD2 2 key (numeric keypad)
VK_NUMPAD3 3 key (numeric keypad)
VK_NUMPAD4 4 key (numeric keypad)
VK_NUMPAD5 5 key (numeric keypad)
VK_NUMPAD6 6 key (numeric keypad)
VK_NUMPAD7 7 key (numeric keypad)
VK_NUMPAD8 8 key (numeric keypad)
VK_NUMPAD9 9 key (numeric keypad)

VK_MULTIPLY Multiply key (numeric keypad)
VK_ADD Add key (numeric keypad)
VK_SEPARATOR Separator key (numeric keypad)
VK_SUBTRACT Subtract key (numeric keypad)
VK_DECIMAL Decimal key (numeric keypad)
VK_DIVIDE Divide key (numeric keypad)
shsunb 2002-08-05
  • 打赏
  • 举报
回复
关于KEY的值可以转换成ASCII码后SHOW出来,然后来个NOT IN ...就OK了
aft_st_sd 2002-08-05
  • 打赏
  • 举报
回复
那就分一点分给俺吧?
knightkun 2002-08-05
  • 打赏
  • 举报
回复
查到了 VK_Delete=46;
knightkun 2002-08-05
  • 打赏
  • 举报
回复
关键我就是不知道小键盘各个键对应的键值阿
naughtyboy 2002-08-05
  • 打赏
  • 举报
回复
OnKeyPress OnKeyDown里面都能够完成
OnKeyDown
先获得小键盘键值
然后用case语句
Case Key of
1://这里用你得到的键值
2:
3:
.....
myronren 2002-08-05
  • 打赏
  • 举报
回复
对对对,楼上的的方法我用过,你还可一用钩子,不过有一定难度、
ddvboy 2002-08-05
  • 打赏
  • 举报
回复
用API涵数将小键盘都设为KEY=#0
Dhammacakkhu 2002-08-05
  • 打赏
  • 举报
回复
试试zyj320621(小朱) 的方法
secondlf 2002-08-05
  • 打赏
  • 举报
回复
guanzhu
xybzc 2002-08-05
  • 打赏
  • 举报
回复
帮你UP 个先:)关注楼下兄弟
xybzc 2002-08-05
  • 打赏
  • 举报
回复
帮你UP 个先:)关注楼下兄弟
  • 打赏
  • 举报
回复
OnKeyPress中测key值 如果Key值是你要屏蔽的小键盘 则Key:=0

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧