回 帖 发 新 帖 刷新版面

主题:求上下左右方向键的 ascii码值

如何才能在CB6.0里调用方向键?

回复列表 (共2个回复)

沙发

是调用还是响应?

箭头键的键值是这样定义的:
  VK_Down=40   
  VK_LEFT=37   
  VK_UP=38   
  VK_RIGHT=39 
例如,在新建工程中加一个Label1和一个Edit1,在Edit1的OnKeyDown事件中加入以下代码:

void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
switch(Key)
 {
  case VK_LEFT:
  Label1->Caption="Left";
  break;
  case VK_RIGHT:
  Label1->Caption="Right";
  break;
  case VK_UP:
  Label1->Caption="Up";
  break;
  case VK_DOWN:
  Label1->Caption="Down";
  break;
  default:
  Label1->Caption=IntToStr(Key);
 }
}

这样,当光标在Edit1里时,你每按一个箭头键,Label1都会显示相应的方向;按其他键时,则显示相应的键值。

板凳

你好.我是全职网赚工作者.
如果你有时间有电脑.会打字.
想在网络上创业.请联系我..
项目绝对真实.详情QQ空间资料
加盟请联系 QQ909065437

我来回复

您尚未登录,请登录后再回复。点此登录或注册