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

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

if Not (Key in [Chr(VK_LBUTTON)..Chr(VK_HELP),'0'..'9']) then
Key := Chr(0);
...全文
66 点赞 收藏 4
写回复
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表示如果按的不上面的这些,按键就失效
回复 点赞
发动态
发帖子
非技术区
创建于2007-08-02

588

社区成员

5.4w+

社区内容

Delphi 非技术区
社区公告
暂无公告