在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
常数名称 十六进制值 十进制值 对应按键 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 Caps Lock键 VK_ESCAPE 1B 27 Ese键 VK_SPACE 20 32 Spacebar键 VK_PRIOR 21 33 Page Up键 VK_NEXT 22 34 Page Domw键 VK_END 23 35 End键 VK_HOME 24 36 Home键 VK_LEFT 25 37 LEFT ARROW 键(←) VK_UP 26 38 UP ARROW键(↑) VK_RIGHT 27 39 RIGHT ARROW键(→) VK_DOWN 28 40 DOWN ARROW键(↓) 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 Num Lock 键 VK_SCROLL 91 145 Scroll Lock键
上面没有提到的:(都在大键盘) VK_LWIN 91 左win键 VK_RWIN 92 右win键 VK_APPS 93 右Ctrl左边键,点击相当于点击鼠标右键,会弹出快捷菜单 186 ;(分号) 187 =键 188 ,键(逗号) 189 -键(减号) 190 .键(句号) 191 /键 192 `键(Esc下面) 219 [键 220 /键 221 ]键 222 '键(引号) procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key=VK_DELETE then key:=0; end; Delphi6.0,2000下通过Top 于在keydown中屏蔽掉除数字外的所有键 还应该允许Ctr+C/X/V,所以总结起来应该是: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not (Key in ['0'..'9', #3, #22, #24, #8, #13, #45]) then Key := #0; end; procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if (key>#57) and (key<#48) then key:=#0; end; 我想你最好将你的例程写出来。 如果是像CKEN阁下说的那样,你要将按键事件屏蔽的话,实际上应该是直接赋值: Key:=0; (注意不是Key:=#0,因为这里的Key是Word类型,在keypress事件中,key的值是Char型,就要用“#”) Good luck 在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) |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论