各位大虾,帮忙看一下一个简单的delphi 问题,小妹谢过!

jia5420 2005-03-21 11:38:18
帮忙看一下这个语句意思是什么,实现什么功能?谢谢

if Not (Key in [Chr(VK_LBUTTON)..Chr(VK_HELP),'0'..'9']) then
Key := Chr(0);
...全文
90 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
jia5420 2005-03-21
  • 打赏
  • 举报
回复
谢谢好心人回复,不过小妹还是有点不明白
Chr(VK_LBUTTON)..Chr(VK_HELP),'0'..'9' 是键盘上所有的键吗,key=0是表示什么了?整个语句的功能是屏蔽掉所有的按键吗?
火猴 2005-03-21
  • 打赏
  • 举报
回复
一般在keydown事件里面, key是参数, key表示用户按下的键盘键值, in运算判断key在不在Key in [Chr(VK_LBUTTON)..Chr(VK_HELP),'0'..'9']范围内, 如果在就让key=0

目的:屏蔽用户按键
jia5420 2005-03-21
  • 打赏
  • 举报
回复
谢谢两位好心人!
pooplin 2005-03-21
  • 打赏
  • 举报
回复
不是键盘上所有的键,是0到9,
VK_LBUTTON
VK_RBUTTON
VK_CANCELVK_MBUTTON
VK_BACK
VK_TAB
VK_CLEAR Clear key
VK_RETURN
VK_SHIFT
VK_CONTROL
VK_MENU
VK_PAUSE
VK_CAPITAL
VK_KANA
VK_HANGUL
VK_JUNJA
VK_FINAL
VK_HANJA
VK_KANJI
VK_CONVERT

VK_NONCONVERT
VK_ACCEPT
VK_MODECHANGE
VK_ESCAPE
VK_SPACE
VK_PRIOR
VK_NEXT
VK_END
VK_HOME
VK_LEFT
VK_UP
VK_RIGHT
VK_DOWN
VK_SELECT
VK_PRINT
VK_EXECUTE
VK_SNAPSHOT
VK_INSERT
VK_DELETE
VK_HELP这些键
key=0表示如果按的不上面的这些,按键就失效

828

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 非技术区
社区管理员
  • 非技术区社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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