![]() | Programming Guide | WideStudio/MWT Index Table of contents |
ÀÔ·Â Çʵ忡¼ Ű ÀÔ·ÂÀ» ¼±º°Çϱ⿡´Â
ÀÔ·Â Çʵ忡¼ Ű ÀÔ·ÂÀ» ¼±º°Çϱ⿡´Â Ű ÈÅ(hook) Æ®¸®°Å(trigger)·Î À̺¥Æ® ÇÁ·Î½ÃÀú¸¦ ÀÛ¼ºÇÕ´Ï´Ù.# Ű ÈÅÀÇ À̺¥ÅÍ ºê·Î½ÃÀúÀÇ »ùÇà # 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) ¸¦ ½ÇÇàÇØ¼ ÀԷ Ű Äڵ带 Ä¡¿ö¼ ÀÔ·ÂÀÌ ¾ø¾ú´ø°Íó·³ ÇൿÇÕ´Ï´Ù.
Copyright(C) WideStudio/MWT Development Team, 1999-2005 | Last modified: Jul 31, 2005 |