9。键盘鼠标和文件编程1。键盘编程
1.键盘编程1.1键盘
在 Windows 下,键盘的按键事件如下图:
以上按键事件传入的参数可以用来判断用户的按键行为: OnKeyDown 与 OnKeyUp
参数为用户按键的 Key 值(word值),代表 Windows 中的 Virtual Key Code。 OnKeyPress
参数为一个 Char 值,是一个 ASCII 字符。
Virtual Key Code:
常数名称
十六进制值
十进制值
对应按键
VK_LBUTTON
01
1
鼠标的左键
VK_RBUTTON
02
2
鼠标的右键
VK-CANCEL
03
3
Ctrl Break(通常不需要处理)
VK_MBUTTON
04
4
鼠标的中键(三按键鼠标)
VK_BACK
08
8
Backspace键
VK_TAB
09
9
Tab键
VK_CLEAR
0C
12
Clear键(Num Lock关闭时的数字键盘5)
VK_RETURN
0D
13
Enter键
VK_SHIFT
10
16
Shift键
VK_CONTROL
11
17
Ctrl键
VK_MENU
12
18
Alt键
VK_PAUSE
13
19
Pause键
VK_CAPITAL
14
20
CapsLock键
VK_ESCAPE
1B
27
Ese键
VK_SPACE
20
32
Spacebar键
VK_PRIOR
21
33
PageUp键
VK_NEXT
22
34
PageDomw键
VK_END
23
35
End键
VK_HOME
24
36
Home键
VK_LEFT
25
37
LEFTARROW键( )
VK_UP
26
38
UPARROW键( )
VK_RIGHT
27
39
RIGHTARROW键( )
VK_DOWN
28
40
DOWNARROW键( )
VK_Select
29
41
Select键
VK_PRINT
2A
42
VK_EXECUTE
2B
43
EXECUTE键
VK_SNAPSHOT
2C
44
Print Screen键(抓屏)
VK_Insert
2D
45
Ins键(Num Lock关闭时的数字键盘0)
VK_Delete
2E
46
Del键(Num Lock关闭时的数字键盘.)
VK_HELP
2F
47
Help键
VK_0
30
48
0键
VK_1
31
49
1键
VK_2
32
50
2键
VK_3
33
51
3键
VK_4
34
52
4键
VK_5
35
53
5键
VK_6
36
54
6键
VK_7
37
55
7键
VK_8
38
56
8键
VK_9
39
57
9键
VK_A
41
65
A键
VK_B
42
66
B键
VK_C
43
67
C键
VK_D
44
68
D键
VK_E
45
69
E键
VK_F
46
70
F键
VK_G
47
71
G键
VK_H
48
72
H键
VK_I
49
73
I键
VK_J
4A
74
J键
VK_K
4B
75
K键
VK_L
4C
76
L键
VK_M
4D
77
M键
VK_N
4E
78
N键
VK_O
4F
79
O键
VK_P
50
80
P键
VK_Q
51
81
Q键
VK_R
52
82
R键
VK_S
53
83
S键
VK_T
54
84
T键
VK_U
55
85
U键
VK_V
56
86
V键
VK_W
57
87
W键
VK_X
58
88
X键
VK_Y
59
89
Y键
VK_Z
5A
90
Z键
VK_NUMPAD0
60
96
数字键0键
VK_NUMPAD1
61
97
数字键1键
VK_NUMPAD2
62
98
数字键2键
VK_NUMPAD3
62
99
数字键3键
VK_NUMPAD4
64
100
数字键4键
VK_NUMPAD5
65
101
数字键5键
VK_NUMPAD6
66
102
数字键6键
VK_NUMPAD7
67
103
数字键7键
VK_NUMPAD8
68
104
数字键8键
VK_NUMPAD9
69
105
数字键9键
VK_MULTIPLY
6A
106
数字键盘上的*键
VK_ADD
6B
107
数字键盘上的 键
VK_SEPARATOR
6C
108
Separator键
VK_SUBTRACT
6D
109
数字键盘上的-键
VK_DECIMAL
6E
110
数字键盘上的.键
VK_DIVIDE
6F
111
数字键盘上的/键
VK_F1
70
112
F1键
VK_F2
71
113
F2键
VK_F3
72
114
F3键
VK_F4
73
115
F4键
VK_F5
74
116
F5键
VK_F6
75
117
F6键
VK_F7
76
118
F7键
VK_F8
77
119
F8键
VK_F9
78
120
F9键
VK_F10
79
121
F10键
VK_F11
7A
122
F11键
VK_F12
7B
123
F12键
VK_NUMLOCK
90
144
NumLock键
VK_SCROLL
91
145
ScrollLock键
VK_LWIN
91
左win键
VK_RWIN
92
右win键
VK_APPS
93
右Ctrl左边键,点击相当于点击鼠标右键,会弹出快捷菜单
186
;(分号)
187
=键
188
,键(逗号)
189
-键(减号)
190
.键(句号)
191
/键
192
`键(Esc下面)
219
[键
220
键
221
]键
222
"键(引号) 1.2键盘事件OnKeyDown
在键盘上按下任意一个键都会触发该事件。对于字母键、数字键、功能键、Ctrl、Shift 或 Alt 等键都将触发该事件。 OnKeyPress
在键盘上按下一个字符键会触发该事件,单独按下功能键、Ctrl、Shift 或 Alt 等键不会触发该事件。 OnKeyUp
在按下键盘上任一键后松开时会触发该事件。对于字母键、数字键、功能键、Ctrl、Shift 或 Alt 等键都将触发该事件。 TShiftState
在 OnKeyDown、OnKeyUp、OnMouseDown 和 OnMouseUp 等事件中,包含一个类型为 TShiftState 的变量 Shift,其值用于判断当键盘上的键按下时,Shift、Alt 和 Ctrl 键的状态,或者按下鼠标的状态。
TShiftState 类型的定义:
Type TShiftState = set of (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble); 1.3键盘编程示例
示例一:在按键过程中让窗体颜色发生变化。 var FormColor: TColor; procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin FormColor := Form1.Color; Form1.Color := clGreen; end; procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); begin Form1.Color := FormColor; end;
示例二:模拟按下键盘的某个键。
在该例中,需要使用 Delphi WinAPI 消息函数 PostMessage,界面如下:
示例代码: procedure TForm1.Button1Click(Sender: TObject); begin // a PostMessage(Edit1.Handle, WM_KEYDOWN, 65, 0); end; procedure TForm1.Button2Click(Sender: TObject); begin // b PostMessage(Edit1.Handle, WM_KEYDOWN, 66, 0); end; procedure TForm1.Button3Click(Sender: TObject); begin // c PostMessage(Edit1.Handle, WM_KEYDOWN, 67, 0); end;
示例三:在屏幕上输出按键操作的结果,包括:Shift、Alt和Ctrl键。界面如下:
示例代码: procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin Label1.Caption := ""; if Shift >= [ssShift] then Label1.Caption := "Shift + "; if Shift >= [ssAlt] then Label1.Caption := "Alt + "; if Shift >= [ssCtrl] then Label1.Caption := "Ctrl + "; Label1.Caption := Label1.Caption + inttostr(key); end;
19张照片告诉你,尼泊尔的现状尼泊尔算是亚洲最贫穷的国家,据统计每天生活费不满2美元的人口超过国民总人数的70,失业率超过40。可是这样的国家却总被人们称为幸福指数最高的国家,这到底为何?尼泊尔,即使是它的首都
构图失败,只因1个小瑕疵,旅游照片的摄影技巧摄影中级班,天天评照片。下面这张照片(图一),构图模式是没问题的,整体来看,画面比较简洁,效果也不错。但是有一个小瑕疵。图一远端的呼应点太普通树枝作为前景,分成了左右两个部分,疏密
名媛打卡的网红酒店到底有多脏?最近,我对网红两个字可以说是患上了PTSD。特别是假期一到,各家网红酒店软广硬广狂轰滥炸,在各种肤白貌美大长腿以及刁钻拍照角度爹妈不认级别滤镜的加持下,酒店气泡屋无边泳池无敌江景房
岁月静好若是真实的样子该多好陪友人在一个古镇景区逛悠,此处三步一小景,处处显得精致典雅。两名女子着装素雅,面容清秀,缓缓行走其间。她们时而浅笑不语,时而低声交谈着什么,时而停在某处拍照。一切看起来都那么美好!
吴尊和老婆要带一对儿女来中国读书了最近放寒假了以后吴尊和老婆经常带着一对儿女到处出去玩,去了上海外滩打卡吴尊发文称动物园科技馆马戏团美食聚餐统统不放过,一边旅游一边工作非常的幸福。还去了一年四季如春的三亚,吴尊感慨
网红小吃齐聚龙庆峡美食广场美食广场位于北京龙庆峡风景区彩灯核心区域。龙庆峡美食广场引进国内知名小吃团队,让游客在参观旖旎灯光体验的同时也能满足味蕾的多样需求。引入高质量网红食品,提升食品品质网红蛋仔冰激凌脆
飞机票怎么买最便宜?牢记3个原则,不再吃亏花冤枉钱民航之人著小妹身为南航资深打工人,对买便宜机票,薅南航羊毛深有心得。有许多经常选座南航飞机出行的朋友,是否有南航机票稍贵的感觉?我想说,那是你没掌握正确的购票时机!一旦掌握了下面的
啃猪蹄,烤柴火,喝杆杆酒,陕南农村如此令人向往虎年春节,我要带你回农村!农村的变化真是大啊,一天比一天美丽富裕。小洋楼水泥路自来水,极大改善了村民的生活和居住条件。陕南气温温润,植被茂密。一江清水,让安康多了几分灵气。乡村旅游
开启马德里这独一无二的艺术之旅西班牙位于欧洲西南部的伊比利亚半岛,马德里是西班牙首都及最大都市,素有欧洲之门之称。马德里就像毕加索笔下的抽象画,色彩斑斓吸引眼球,同时也考验着神经像那场弗拉明戈舞蹈,绚丽的服饰精
北京号带您云游2021北京网红打卡地之夜间经济类霓虹初上,月影朦胧,城市退却浮躁。白天劳碌的人们卸下疲累,尽情放松享受夜晚生活。今天,北京号小编就带您领略2021年北京网红打卡地之夜间经济类,涉及6个区共10个地点。快跟小编一起
张俊伟委员打造健康旅游特色旅游品牌张俊伟委员。人民网王慧摄人民网呼和浩特1月23日电(王慧张聿修)内蒙古拥有得天独厚的旅游资源,但旅游企业还存在小散弱的特点,收入项目主要以吃住行等内容为主。自治区政协委员呼伦贝尔市
行走自贡寻味荣县观山场余肥肠五年前,探访青龙山恐龙化石埋葬点曾途经荣县观山场国庆小长假,从双古牛峰寨专程去观山场品尝朋友推荐的余肥肠,也第一次完成了寻味荣县的乡镇美食。寻访完荣县双古牛峰古寨,抵达观山镇已是下
川渝地区2021年企业员工工资价位表出炉来看哪些职位薪酬高华龙网新重庆客户端讯(记者姜念月)今(27)日,重庆市人力资源和社会保障局联合四川省人力资源和社会保障厅发布了川渝地区2021年人力资源市场工资价位及企业人工成本信息(下称成本信息
2胜5负!中国斯诺克遭遇滑铁卢5人同日出局,名将爆冷一轮游北京时间2022年10月31日,斯诺克英格兰公开赛结束资格赛争夺,中国斯诺克遭遇滑铁卢,7位选手先后登场,结果取得2胜5负的成绩,5人倒在资格赛。之前在北爱尔兰公开赛夺得亚军的周跃
2022双11买苹果手机,iphone13和iphone14怎么选?看这几点就够了各大手机厂商为了销量经常会进行促销降价来吸引消费者,不同手机品牌降价力度也不一样,所以销售情况也不尽相同,不过每年电商节苹果和小米这两个品牌不管是线上还是线下都卖的很不错,例如双1
中央为什么点名发展沈阳?沈阳,辽宁省省会。中国东北地区的政治经济文化商贸中心,全国15个副省级城市之一。2021年沈阳地区生产总值(GDP)7249。7亿元,比上年增长7。0。新中国刚建立时,全国四大强市
浙江金华有个古村,600年,村落以八卦布局,外人进入铁定迷路人生匆匆,转眼又是三年。在这个静谧的夜晚,想起那次我们的行走,从温州出发,经丽水,到永康,最后到金华。在行走中,我们一路拾趣,寻找当地的好吃的好玩的。在浙师大读研期间的各种乐事,影
牛皮革是真皮吗?牛皮和牛皮革傻傻分不清楚皮鞋我发现很多人在买皮鞋或者包包的时候,经常看见包装盒上的材质一栏,写着的是牛皮革,他就摸不着头脑了,牛皮革是什么材质?是真皮吗?在很多人的意识里牛皮是真皮,加上一个革字,就混乱了
OPPOFindN2再曝,小尺寸折叠屏旗舰时间已经来到了2022年第四季度,智能手机市场的正代迭代旗舰竞争暂时告一段落,短暂地进入了以其他定位产品为主的发布期。2021年12月中旬,OPPO带来了旗下全新的折叠旗舰Find
仁者长寿德者延年(2013年写的文章)长寿翁仁者长寿德者延年,可谓是古今中外许多养生学家和长寿之人实践证明的一个放之四海而皆准的真理。儒家创始人孔子,不仅是教育家思想家政治家,而且还是一位杰出的养生学家。他就反复主张仁
痔疮自我保健俗话说十人九痔。痔虽小病,危害非常小。为防痔复发,减轻危害,自我保健相当重要。(1)调理饮食十有八九是便秘惹的祸。老年人多因肠功能减退,排便动力不足,食物残渣在肠道内运行滞缓,水分
黄芪和西洋参哪个补气效果好黄芪和西洋参哪个补气效果好西洋参和黄芪都是补气的,但此气非彼气,这两种气是不同的,不能混为一谈。一般黄芪补阳气,西洋参有类似人参的功效,但没有人参的劲力。人参的气是正气,元气,西洋