例3:在屏幕上输出按键操作的结果，包括Shift、Alt、Ctrl键 。界面如下:
示例代码:
过程TForm1 。FormKeyDown(发送方:TObjectvar键:WordShift:TShiftState)；开始标签1 。标题:= & # 39；'；if Shift & gt；= [ssShift]然后Label1 。标题:= & # 39；Shift & # 39；if Shift & gt；= [ssAlt]然后Label1 。标题:= & # 39；Alt & # 39；if Shift & gt；= [ssCtrl]然后Label1 。标题:= & # 39；Ctrl & # 39；Label1 。标题:= Label1 。caption inttostr(key)；end；
,
推荐阅读
- 顺丰和菜鸟数据断交 顺丰菜鸟互撕背后的真相
- 经典磁性系统中的拓扑绝缘体和半金属 长直螺线管内部的磁感应强度
- 鲫鱼不能和什么一起吃
- 三黄鸡好还是柴鸡好三黄鸡和柴鸡哪个好
- 电脑键盘变成快捷键了怎么办 电脑键盘变成快捷键了如何处理
- 小学作文纸和抄书纸一样吗
- 薏米和南瓜能一起煮吗
- 薏米可以和大米一起煮吗
- 薏米可以和绿豆一起煮吗
- 玉米须和荷叶泡水的功效