Delphi KeyPress KeyDown時Key的值


Shift 是一個集合變量。
type TShiftState = set of (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble);
也就是說TShiftstate類型有ssShift, ssAlt, ssCtrl, ssLeft(鼠標左鍵), ssRight(鼠標右鍵), ssMiddle(鼠標中鍵), ssDouble (鼠標雙擊)
Value Meaning
ssShift               The Shift key is held down.
ssAlt                  The Alt key is held down.
ssCtrl                The Ctrl key is held down.
ssLeft                The left mouse button is held down.
ssRight             The right mouse button is held down.
ssMiddle            The middle mouse button is held down.
ssDouble          The mouse was double-clicked.
用來判斷組合鍵中是否用shift、Ctrl、鼠標左鍵、右鍵、中鍵、雙擊事件。
 
Delphi中一些常用的組合鍵值
CTRL+A:#1 CTRL+B:#2 CTRL+C:#3 CTRL+D:#4 CTRL+E:#5 CTRL+F:#6 CTRL+G:#7
CTRL+H:#8 CTRL+I:#9 CTRL+J:#10 CTRL+K:#11 CTRL+L:#12 CR:#13 CTRL+N:#14
CTRL+O:#15 CTRL+P:#16 CTRL+Q:#17 CTRL+R:#18 CTRL+S:#19 CTRL+T:#20
CTRL+U:#21 CTRL+V:#22 CTRL+W:#23 CTRL+X:#24 CTRL+Y:#25 CTRL+Z:#26 ESC:#27
CTRL+:#28 CTRL+]:#29 SHIFT+CTRL+-:#30 DEL:#127
 
一般用在keydown、keyup、keypress事件中。
OnKeyDown和OnKeyUp事件中的Key是Word型的,表示用戶按的是鍵盤上的哪個鍵,OnKeyPress中的Key是Char型,表示用戶輸入什么字符。一個產生8位(char)常規健值,一個產生16位(word)功能健健值。

1.KeyPress主要用來捕獲數字(注意:包括Shift+數字的符號)、字母(注意:包括大小寫)、小鍵盤等除了F1-12、SHIFT、Alt、Ctrl、Insert、Home、PgUp、Delete、End、PgDn、ScrollLock、Pause、NumLock、{菜單鍵}{開始鍵}和方向鍵外的ANSI字符,KeyDown和KeyUp 通常可以捕獲鍵盤除了PrScrn所有按鍵(這里不討論特殊鍵盤的特殊鍵)
2.KeyPress 只能捕獲單個字符
KeyDown 和KeyUp 可以捕獲組合鍵。
3.KeyPress 可以捕獲單個字符的大小寫
4.KeyDown和KeyUp 對於單個字符捕獲的KeyValue 都是一個值,也就是不能判斷單個字符的大小寫。
5.KeyPress 不區分小鍵盤和主鍵盤的數字字符。
KeyDown 和KeyUp 區分小鍵盤和主鍵盤的數字字符。
6.其中PrScrn 按鍵KeyPress、KeyDown和KeyUp 都不能捕獲。

keydown是鍵盤按下任何鍵
keypress是鍵盤按下任何數字鍵和任何字母鍵
 
keydown 與keypress的聲明格式差別很大
1 onkeydown事件
type TKeyEvent   =   procedure   (Sender:   TObject;   var   Key:   Word;   Shift:   TShiftState)   of   object;
property   OnKeyDown:   TKeyEvent;
該事件在有任何鍵按下的時候,就發生。看!它響應的是Word類型,還能識別Shift鍵狀態
2 onkeypress事件
type   TKeyPressEvent   =   procedure   (Sender:   TObject;   var   Key:   Char)   of   object;
property   OnKeyPress:   TKeyPressEvent;
該事件響應的是字符類型Char,只能識別ASCII碼,不能識別組合鍵和控制鍵和功能鍵。按下功能鍵、控制鍵不產生該事件,但產生OnkeyDown事件。
 
TWinControl與鍵盤相關的3個事件如下:
OnKeyDown:鍵按下
OnKeyPress:有Ascii字符產生
OnKeyUp:鍵放開
其中OnKeyDown、OnKeyUp對任何按鍵都有響應,傳入參數為
var   Key:   Word 鍵的掃描值
    Shift:   TShiftState 表示控制鍵狀態,包括鍵盤上的Ctrl、Shift、Alt和鼠標的左、中、右鍵及雙擊。
 
OnKeyPress事件只對Ascii有響應,傳入參數為
var   Key:   Char Ascii字符
//例如F1-F10只有onKeydown有反應
另外TWincontrol.   KeyPreview:Boolean屬性確定控件是否在子控件之前處理按鍵。
 
比如說enter鍵,
onkeypress事件
if  key=#13   then    //當你按下enter鍵時觸發該事件
do  something
 
onkeydown事件
if  key=13  then     //當你按下enter鍵時觸發該事件
do  something
 
 
其中所有的KeyDown事件里面應該用如下判斷:
if Key = VK_RETURN then
...
所有的KeyPress事件里面應該用如下判斷:
if Key = #13 then
...

postmessage(self.handle,wm_keydown,vk_tab,0);
keybd_event(VK_TAB,2,0,0);
perform(WM_NEXTDLGCTL,0,0);
SelectNext(ActiveControl, True, True);
...

但是顯然用回車代碼TAB顯然不適合於BUTTON,你在它上面按回車的時候它會執行OnClick,所以不會TAB,你可以用別的鍵代替回車。
 
》》》》》》》》》》
 
鍵值
 
在keydown事件里面
showmessage(inttostr(key));
在keypress事件里面
showmessage(key);
就知道了。

Form1.KeyPreview := True;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Showmessage(IntToStr(Key));
end;

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
Showmessage(IntToStr(Ord(Key)));
end;


{ Virtual Keys, Standard Set }
{$EXTERNALSYM VK_LBUTTON}
VK_LBUTTON = 1;
{$EXTERNALSYM VK_RBUTTON}
VK_RBUTTON = 2;
{$EXTERNALSYM VK_CANCEL}
VK_CANCEL = 3;
{$EXTERNALSYM VK_MBUTTON}
VK_MBUTTON = 4; { NOT contiguous with L & RBUTTON }
{$EXTERNALSYM VK_BACK}
VK_BACK = 8;
{$EXTERNALSYM VK_TAB}
VK_TAB = 9;
{$EXTERNALSYM VK_CLEAR}
VK_CLEAR = 12;
{$EXTERNALSYM VK_RETURN}
VK_RETURN = 13;
{$EXTERNALSYM VK_SHIFT}
VK_SHIFT = $10;
{$EXTERNALSYM VK_CONTROL}
VK_CONTROL = 17;
{$EXTERNALSYM VK_MENU}
VK_MENU = 18;
{$EXTERNALSYM VK_PAUSE}
VK_PAUSE = 19;
{$EXTERNALSYM VK_CAPITAL}
VK_CAPITAL = 20;
{$EXTERNALSYM VK_KANA }
VK_KANA = 21;
{$EXTERNALSYM VK_HANGUL }
VK_HANGUL = 21;
{$EXTERNALSYM VK_JUNJA }
VK_JUNJA = 23;
{$EXTERNALSYM VK_FINAL }
VK_FINAL = 24;
{$EXTERNALSYM VK_HANJA }
VK_HANJA = 25;
{$EXTERNALSYM VK_KANJI }
VK_KANJI = 25;
{$EXTERNALSYM VK_CONVERT }
VK_CONVERT = 28;
{$EXTERNALSYM VK_NONCONVERT }
VK_NONCONVERT = 29;
{$EXTERNALSYM VK_ACCEPT }
VK_ACCEPT = 30;
{$EXTERNALSYM VK_MODECHANGE }
VK_MODECHANGE = 31;
{$EXTERNALSYM VK_ESCAPE}
VK_ESCAPE = 27;
{$EXTERNALSYM VK_SPACE}
VK_SPACE = $20;
{$EXTERNALSYM VK_PRIOR}
VK_PRIOR = 33;
{$EXTERNALSYM VK_NEXT}
VK_NEXT = 34;
{$EXTERNALSYM VK_END}
VK_END = 35;
{$EXTERNALSYM VK_HOME}
VK_HOME = 36;
{$EXTERNALSYM VK_LEFT}
VK_LEFT = 37;
{$EXTERNALSYM VK_UP}
VK_UP = 38;
{$EXTERNALSYM VK_RIGHT}
VK_RIGHT = 39;
{$EXTERNALSYM VK_DOWN}
VK_DOWN = 40;
{$EXTERNALSYM VK_SELECT}
VK_SELECT = 41;
{$EXTERNALSYM VK_PRINT}
VK_PRINT = 42;
{$EXTERNALSYM VK_EXECUTE}
VK_EXECUTE = 43;
{$EXTERNALSYM VK_SNAPSHOT}
VK_SNAPSHOT = 44;
{$EXTERNALSYM VK_INSERT}
VK_INSERT = 45;
{$EXTERNALSYM VK_DELETE}
VK_DELETE = 46;
{$EXTERNALSYM VK_HELP}
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) }
{$EXTERNALSYM VK_LWIN}
VK_LWIN = 91;
{$EXTERNALSYM VK_RWIN}
VK_RWIN = 92;
{$EXTERNALSYM VK_APPS}
VK_APPS = 93;
{$EXTERNALSYM VK_NUMPAD0}
VK_NUMPAD0 = 96;
{$EXTERNALSYM VK_NUMPAD1}
VK_NUMPAD1 = 97;
{$EXTERNALSYM VK_NUMPAD2}
VK_NUMPAD2 = 98;
{$EXTERNALSYM VK_NUMPAD3}
VK_NUMPAD3 = 99;
{$EXTERNALSYM VK_NUMPAD4}
VK_NUMPAD4 = 100;
{$EXTERNALSYM VK_NUMPAD5}
VK_NUMPAD5 = 101;
{$EXTERNALSYM VK_NUMPAD6}
VK_NUMPAD6 = 102;
{$EXTERNALSYM VK_NUMPAD7}
VK_NUMPAD7 = 103;
{$EXTERNALSYM VK_NUMPAD8}
VK_NUMPAD8 = 104;
{$EXTERNALSYM VK_NUMPAD9}
VK_NUMPAD9 = 105;
{$EXTERNALSYM VK_MULTIPLY}
VK_MULTIPLY = 106;
{$EXTERNALSYM VK_ADD}
VK_ADD = 107;
{$EXTERNALSYM VK_SEPARATOR}
VK_SEPARATOR = 108;
{$EXTERNALSYM VK_SUBTRACT}
VK_SUBTRACT = 109;
{$EXTERNALSYM VK_DECIMAL}
VK_DECIMAL = 110;
{$EXTERNALSYM VK_DIVIDE}
VK_DIVIDE = 111;
{$EXTERNALSYM VK_F1}
VK_F1 = 112;
{$EXTERNALSYM VK_F2}
VK_F2 = 113;
{$EXTERNALSYM VK_F3}
VK_F3 = 114;
{$EXTERNALSYM VK_F4}
VK_F4 = 115;
{$EXTERNALSYM VK_F5}
VK_F5 = 116;
{$EXTERNALSYM VK_F6}
VK_F6 = 117;
{$EXTERNALSYM VK_F7}
VK_F7 = 118;
{$EXTERNALSYM VK_F8}
VK_F8 = 119;
{$EXTERNALSYM VK_F9}
VK_F9 = 120;
{$EXTERNALSYM VK_F10}
VK_F10 = 121;
{$EXTERNALSYM VK_F11}
VK_F11 = 122;
{$EXTERNALSYM VK_F12}
VK_F12 = 123;
{$EXTERNALSYM VK_F13}
VK_F13 = 124;
{$EXTERNALSYM VK_F14}
VK_F14 = 125;
{$EXTERNALSYM VK_F15}
VK_F15 = 126;
{$EXTERNALSYM VK_F16}
VK_F16 = 127;
{$EXTERNALSYM VK_F17}
VK_F17 = 128;
{$EXTERNALSYM VK_F18}
VK_F18 = 129;
{$EXTERNALSYM VK_F19}
VK_F19 = 130;
{$EXTERNALSYM VK_F20}
VK_F20 = 131;
{$EXTERNALSYM VK_F21}
VK_F21 = 132;
{$EXTERNALSYM VK_F22}
VK_F22 = 133;
{$EXTERNALSYM VK_F23}
VK_F23 = 134;
{$EXTERNALSYM VK_F24}
VK_F24 = 135;
{$EXTERNALSYM VK_NUMLOCK}
VK_NUMLOCK = 144;
{$EXTERNALSYM VK_SCROLL}
VK_SCROLL = 145;
{ VK_L & VK_R - left and right Alt, Ctrl and Shift virtual keys.
Used only as parameters to GetAsyncKeyState() and GetKeyState().
No other API or message will distinguish left and right keys in this way. }
{$EXTERNALSYM VK_LSHIFT}
VK_LSHIFT = 160;
{$EXTERNALSYM VK_RSHIFT}
VK_RSHIFT = 161;
{$EXTERNALSYM VK_LCONTROL}
VK_LCONTROL = 162;
{$EXTERNALSYM VK_RCONTROL}
VK_RCONTROL = 163;
{$EXTERNALSYM VK_LMENU}
VK_LMENU = 164;
{$EXTERNALSYM VK_RMENU}
VK_RMENU = 165;
{$EXTERNALSYM VK_PROCESSKEY}
VK_PROCESSKEY = 229;
{$EXTERNALSYM VK_ATTN}
VK_ATTN = 246;
{$EXTERNALSYM VK_CRSEL}
VK_CRSEL = 247;
{$EXTERNALSYM VK_EXSEL}
VK_EXSEL = 248;
{$EXTERNALSYM VK_EREOF}
VK_EREOF = 249;
{$EXTERNALSYM VK_PLAY}
VK_PLAY = 250;
{$EXTERNALSYM VK_ZOOM}
VK_ZOOM = 251;
{$EXTERNALSYM VK_NONAME}
VK_NONAME = 252;
{$EXTERNALSYM VK_PA1}
VK_PA1 = 253;
{$EXTERNALSYM VK_OEM_CLEAR}
VK_OEM_CLEAR = 254;

:),其實不用記,你不是用delphi嗎,在ide里面輸入vk_f1總會吧,然后按住ctrl鍵
單擊剛才你輸入的vk_f1,就會出來啦!
至於key:char的值,就是key:word的ascII碼,你可以看chr(vk_f1),chr(vk_enter),都可以哈!
 
》》》》》》》》》》》》》》》》》》
 
delphi幫助里的虛擬鍵值表:
vk_right right arrow key
vk_down down arrow key
vk_select select key
vk_print print key (keyboard-specific)
vk_execute execute key
vk_snapshot print screen key
vk_insert insert key
vk_delete delete key
vk_help help key
vk_lwin left windows key (microsoft keyboard)
vk_rwin right windows key (microsoft keyboard)
vk_apps applications key (microsoft keyboard)
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)
vk_f1 f1 key
vk_f2 f2 key
vk_f3 f3 key
vk_f4 f4 key
vk_f5 f5 key
vk_f6 f6 key
vk_f7 f7 key
vk_f8 f8 key
vk_f9 f9 key
vk_f10 f10 key
vk_f11 f11 key
vk_f12 f12 key
vk_f13 f13 key
vk_f14 f14 key
vk_f15 f15 key
vk_f16 f16 key
vk_f17 f17 key
vk_f18 f18 key
vk_f19 f19 key
vk_f20 f20 key
vk_f21 f21 key
vk_f22 f22 key
vk_f23 f23 key
vk_f24 f24 key
vk_numlock num lock key
vk_scroll scroll lock key
vk_lshift left shift key (only used with getasynckeystate and getkeystate)
vk_rshift right shift key (only used with getasynckeystate and getkeystate)
vk_lcontrol left ctrl key (only used with getasynckeystate and getkeystate)
vk_rcontrol right ctrl key (only used with getasynckeystate and getkeystate)
vk_lmenu left alt key (only used with getasynckeystate and getkeystate)
vk_rmenu right alt key (only used with getasynckeystate and getkeystate)
vk_processkey process key
vk_attn attn key
vk_crsel crsel key
vk_exsel exsel key
vk_ereof erase eof key
vk_play play key
vk_zoom zoom key
vk_noname reserved for future use
vk_pa1 pa1 key
vk_oem_clear clear key
 
模擬鼠標
鼠標移動(移動量dx,dy)
mouse_event(MOUSEEVENTF_MOVE,dx,dy,0, 0 );
鼠標在(x,y)處按下或釋放
setcursorpos(x,y);
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0 );
mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0 );
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 );
mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0 );
鼠標雙擊由兩次按下與釋放來模擬
鍵盤模擬
一般虛擬鍵值(VK_)由KeyDown或keyup事件得到
特殊鍵值
Tab--9
Shift--16
Ctrl--17
Alt--18
CapsLock--20
Esc--27
Win--91,92
NumLock--144
ScrollLock--145
按下鍵
keybd_event(key, MapVirtualKey(key, 0 ), KEYEVENTF_KEYUP , 0 );
釋放鍵
keybd_event(key, MapVirtualKey(key, 0 ), 0 , 0 );
以上做法對大多數鍵有效,少數鍵要用到不同的值
 
 
常數名稱           十六進制值   十進制值     對應按鍵
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>#57and  (key<#48then           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)


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM