用以下方岩模法可以测试各按键的Key值。
在表单上放粗团缓置两个Edit控件，然后在Edit1的KeyDown事件中键入以下或历代码
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
EDIT2.Text:=(FLOATTOSTR(ord(KEY)));
end;
这个多了，键盘上销棚的键对应的键值都可以对应KeyDown里塌斗喊的key值团野。
如:
VK_DELETE = 46;
VK_LEFT = 37;
VK_UP = 38;
VK_RIGHT = 39;
VK_DOWN = 40;
VK_F1 = 112;
VK_F2 = 113;
...
VK_F12 = 123;
键盘上所有的key都可以捕捉啊