真是怪事(50分)

  • 主题发起人 主题发起人 savetime
  • 开始时间 开始时间
S

savetime

Unregistered / Unconfirmed
GUEST, unregistred user!

以下一段程序,开始运行得好好的,后来不知为什么
VK_LEFT, VK_RIGHT, VK_DOWN, VK_UP不起作用
而 VK_SPACE和VK_NUMPAD0能用,是怎么回事。

OnKeyDown(Key: Word)
begin

case FPlayerID of
1:
case Key of
Ord('A'), Ord('a'):
SquareOperate(soMoveLeft);
Ord('D'), Ord('d'):
SquareOperate(soMoveRight);
Ord('S'), Ord('s'):
SquareOperate(soDropDown);
Ord('J'), Ord('j'), Ord('W'), Ord('w'):
SquareOperate(soRotate);
end;
2:
case Key of
VK_LEFT, VK_SPACE:
SquareOperate(soMoveLeft);
VK_RIGHT:
SquareOperate(soMoveRight);
VK_DOWN:
SquareOperate(soDropDown);
VK_UP, VK_NUMPAD0:
SquareOperate(soRotate);
end;

end;

顺便问一下,DELPHI IDE中如何将一大段程序快速缩进.
 
》顺便问一下,DELPHI IDE中如何将一大段程序快速缩进.
先选择要缩进的程序行,然后Ctrl+Shift+i 向右缩进,Ctrl+Shift+u 向左缩进!
 
把要缩进的程序行均选中就行了,即选中多行
至于按键不响应要检查一下是在什么地方不响应了
 
实在对不起,我在FORM上放了个CHECKBOX,所以不能响应。
谢谢了!
 
后退
顶部