• 博客园logo
  • 会员
  • 周边
  • 众包
  • 新闻
  • 博问
  • 闪存
  • 赞助商
  • Chat2DB
    • 搜索
      所有博客
    • 搜索
      当前博客
  • 写随笔 我的博客 短消息 简洁模式
    用户头像
    我的博客 我的园子 账号设置 会员中心 简洁模式 ... 退出登录
    注册 登录
纯粹备忘
博客园    首页    新随笔    联系   管理    订阅  订阅

delphi键盘按钮参数

分别在FormCreate,FormKeyPress下编写一句代码就可以了如下:

procedure TForm1.FormCreate(Sender: TObject);
begin
keypreview:=true; //可以接收键盘操作
end;

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key = #27 then
    application.terminate;   //关闭程序
end;

#13 回车 
#10换行 
#20为空格  

键盘常用ASCII码(delphi)

键盘常用ASCII码(delphi) ESC键 VK_ESCAPE (27)
回车键: VK_RETURN (13) 
TAB键: VK_TAB (9)
Caps Lock键: VK_CAPITAL (20) 

Shift键: VK_SHIFT ($10) Ctrl键: VK_CONTROL (17) Alt键: VK_MENU (18) 空格键: VK_SPACE ($20/32) 退格键: VK_BACK (8) 左徽标键: VK_LWIN (91) 右徽标键: VK_LWIN (92) 鼠标右键快捷键:VK_APPS (93) Insert键: VK_INSERT (45) Home键: VK_HOME (36) Page Up: VK_PRIOR (33) PageDown: VK_NEXT (34) End键: VK_END (35) Delete键: VK_DELETE (46) 方向键(←): VK_LEFT (37) 方向键(↑): VK_UP (38) 方向键(→): VK_RIGHT (39) 方向键(↓): VK_DOWN (40) F1键: VK_F1 (112) F2键: VK_F2 (113) F3键: VK_F3 (114) F4键: VK_F4 (115) F5键: VK_F5 (116) F6键: VK_F6 (117) F7键: VK_F7 (118) F8键: VK_F8 (119) F9键: VK_F9 (120) F10键: VK_F10 (121) F11键: VK_F11 (122) F12键: VK_F12 (123) Num Lock键: VK_NUMLOCK (144) 小键盘0: VK_NUMPAD0 (96) 小键盘1: VK_NUMPAD0 (97) 小键盘2: VK_NUMPAD0 (98) 小键盘3: VK_NUMPAD0 (99) 小键盘4: VK_NUMPAD0 (100) 小键盘5: VK_NUMPAD0 (101) 小键盘6: VK_NUMPAD0 (102) 小键盘7: VK_NUMPAD0 (103) 小键盘8: VK_NUMPAD0 (104) 小键盘9: VK_NUMPAD0 (105) 小键盘.: VK_DECIMAL (110) 小键盘*: VK_MULTIPLY (106) 小键盘+: VK_MULTIPLY (107) 小键盘-: VK_SUBTRACT (109) 小键盘/: VK_DIVIDE (111) Pause Break键: VK_PAUSE (19) Scroll Lock键: VK_SCROLL (145)
//------------------------------
      VK_LBUTTON = 1; 
VK_RBUTTON = 2; 
VK_CANCEL = 3; 
VK_MBUTTON = 4; 
VK_BACK = 8; 
VK_TAB = 9; 
VK_CLEAR = 12; 
VK_RETURN = 13; 
VK_SHIFT = $10; 
VK_CONTROL = 17; 
VK_MENU = 18; 
VK_PAUSE = 19; 
VK_CAPITAL = 20; 
VK_ESCAPE = 27; 
VK_SPACE = $20; 
VK_PRIOR = 33; 
VK_NEXT = 34; 
VK_END = 35; 
VK_HOME = 36; 
VK_LEFT = 37; 
VK_UP = 38; 
VK_RIGHT = 39; 
VK_DOWN = 40; 
VK_SELECT = 41; 
VK_PRINT = 42; 
VK_EXECUTE = 43; 
VK_SNAPSHOT = 44; 
VK_INSERT = 45; 
VK_DELETE = 46; 
VK_HELP = 47; 
{ VK_0 thru VK_9 are the same as ASCII '0' thru '9' ($30 - $39) } 
{ VK_A thru VK_Z are the same as ASCII 'A' thru 'Z' ($41 - $5A) } 
VK_LWIN = 91; 
VK_RWIN = 92; 
VK_APPS = 93; 
VK_NUMPAD0 = 96; 
VK_NUMPAD1 = 97; 
VK_NUMPAD2 = 98; 
VK_NUMPAD3 = 99; 
VK_NUMPAD4 = 100; 
VK_NUMPAD5 = 101; 
VK_NUMPAD6 = 102; 
VK_NUMPAD7 = 103; 
VK_NUMPAD8 = 104; 
VK_NUMPAD9 = 105; 
VK_MULTIPLY = 106; 
VK_ADD = 107; 
VK_SEPARATOR = 108; 
VK_SUBTRACT = 109; 
VK_DECIMAL = 110; 
VK_DIVIDE = 111; 
VK_F1 = 112; 
VK_F2 = 113; 
VK_F3 = 114; 
VK_F4 = 115; 
VK_F5 = 116; 
VK_F6 = 117; 
VK_F7 = 118; 
VK_F8 = 119; 
VK_F9 = 120; 
VK_F10 = 121; 
VK_F11 = 122; 
VK_F12 = 123; 
VK_F13 = 124; 
VK_F14 = 125; 
VK_F15 = 126; 
VK_F16 = 127; 
VK_F17 = 128; 
VK_F18 = 129; 
VK_F19 = 130; 
VK_F20 = 131; 
VK_F21 = 132; 
VK_F22 = 133; 
VK_F23 = 134; 
VK_F24 = 135; 
VK_NUMLOCK = 144; 
VK_LSHIFT = 160; 
VK_RSHIFT = 161; 
VK_LCONTROL = 162; 
VK_RCONTROL = 163; 
VK_LMENU = 164; 
VK_RMENU = 165; 
VK_PROCESSKEY = 229; 
VK_ATTN = 246; 
VK_CRSEL = 247; 
VK_EXSEL = 248; 
VK_EREOF = 249; 
VK_PLAY = 250; 
VK_ZOOM = 251; 
VK_NONAME = 252; 
VK_PA1 = 253; 
VK_OEM_CLEAR = 254;
posted @ 2011-07-20 16:34  纯粹备忘  阅读(4237)  评论(0)    收藏  举报
刷新页面返回顶部
博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3