WideStudio/MWT Programming Guide	WideStudio/MWT Index Table of contents

---

输入字段中键盘输入的处理

通过WSEV_KEY_HOOK触发器的事件处理，对输入字段中键盘输入进行处理。

# WSEV_KEY_HOOK触发器的事件处理例
# 设置WSEV_KEY_HOOK触发器
use mwt;

sub hookop {
  my ($object) = @_;
  # 获取键盘码
  $key = mwt::WSDkeyboard_getKey( mwt::WSGIappKeyboard() );
  if  (($key >= $mwt::WSK_0    && $key <= $mwt::WSK_9   ) ||
       ($key >= $mwt::WSK_KP_0 && $key <= $mwt::WSK_KP_9) ||
        $key == $mwt::WSK_plus      || $key == $mwt::WSK_minus  ||
        $key == $mwt::WSK_BackSpace || $key == $mwt::WSK_Delete ||
        $key == $mwt::WSK_Insert    || $key == $mwt::WSK_space  ||
        $key == $mwt::WSK_Up        || $key == $mwt::WSK_Down   ||
        $key == $mwt::WSK_Left      || $key == $mwt::WSK_Right  ||
        $key == $mwt::WSK_Return ){
    # 只接受关心的键盘输入
    return;
  }
  # 屏蔽其他键盘输入
  mwt::WSDkeyboard_setKey( mwt::WSGIappKeyboard(), 0);
  return;
}
1;

上述的例子中，只接受数字输入。通过键盘对象的getKey()函数获得当前的键盘输入码。 通过 mwt::WSDkeyboard_setKey(0) 函数将不需要的输入内容删除。