| WideStudio Programming Guide | WideStudio Index Table of contents

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

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

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

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

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

Document Release 3.70 for WideStudio ver 3.70, May 2004

WideStudio documents index | Table of contents

Copyright(C) WideStudio Development Team, 1999-2004 | Last modified: May 25, 2004