首页 相关文章 Delphi技巧点滴

Delphi技巧点滴

  1.如何检测Insert、Capslock、NumLock、ScrollLock状态键的状态

  Delphi可以调用Win API的Getkeyboardstate()函数。

  常量 按键名称

  VK_INSERT znsert键

  VK_NUMLOCK Num Lock键

  VK_CAPITAL Caps Lock键

  VK_SCROLL Scroll Lock键

  键盘缓冲区每一位都有一位特定的格式,对于状态键来说,最低位是1时表示状态键处于ON状态,你可以使用odd()函数来确定这一位的状态,以下是一个简单的例子请参考。例子中放置一个Timer控件、一个StatusBar状态条。

  

procedure TForm1.Timer1Timer(Sender: TObject);var ks:tkeyboardstate;begingetkeyboardstate(ks);//检测键盘函数if odd(ks[VK_NUMLOCK]) thenstatusbar1.panels.items[0].text:=NU...[ 查看全文 ]

2016-02-19 标签:

Delphi技巧点滴的相关文章

手机页面
收藏网站 回到头部