![]() | Programming Guide | WideStudio/MWT Index Table of contents |
ÀÔ·Â Çʵ忡¼ Ű ÀÔ·ÂÀ» ¼±º°Çϱ⿡´Â
ÀÔ·Â Çʵ忡¼ Ű ÀÔ·ÂÀ» ¼±º°Çϱ⿡´Â Ű ÈÅ(hook) Æ®¸®°Å(trigger)·Î À̺¥Æ® ÇÁ·Î½ÃÀú¸¦ ÀÛ¼ºÇÕ´Ï´Ù.(* Ű ÈÅ(hook)ÀÇ À̺¥Æ® ÇÁ·Î½ÃÀúÀÇ »ùÇà *) (* WSEV_KEY_HOOK Æ®¸®°Å(trigger)·Î ¼³Á¤ÇÕ´Ï´Ù. *) ... let hookop obj = (* ¾î¶² 󸮸¦ ¾²½Ê½Ã¿À *) let key = get_int (_WSGIappKeyboard '() -> getKey () ) in if (((key >= get_int _WSK_0) && ( key < get_int _WSK_9)) || ((key >= get_int _WSK_KP_0) && ( key < get_int _WSK_KP_9)) || (key = get_int _WSK_plus) || (key = get_int _WSK_minus) || (key = get_int _WSK_BackSpace) || (key = get_int _WSK_Delete) || (key = get_int _WSK_Insert) || (key = get_int _WSK_space) || (key = get_int _WSK_Up) || (key = get_int _WSK_Down) || (key = get_int _WSK_Left) || (key = get_int _WSK_Right) || (key = get_int _WSK_Return) ) then begin (* ¼ýÀÚ Å°´Â 󸮸¦ Åë°úÇÑ´Ù *) end else begin (* ±×¿Ü´Â ¹ö¸°´Ù *) ignore(_WSGIappKeyboard '() -> setKey (0)); end () let _ = Callback.register "hookop" hookopÀÌ »ùÇÃÀº ¼ýÀÚ ÀԷ¸¸À» ½ÇÇàÇÒ ÀÔ·Â Çʵ带 ½ÇÇöÇÕ´Ï´Ù. ÀÚÆÇ °´Ã¼¿¡ ´ëÇØ¼ getKey() ÇÔ¼ö¿¡ÀÇÇÏ¿© ÇöÀç ÀԷµǿ©Àִ Ű¸¦ ¼±º°ÇÏ¿© ÇÊ¿ä¾ø´Â ŰÀÎ °æ¿ì _WSGIappKeyboard '()->setKey(0) ¸¦ ½ÇÇàÇØ¼ ÀԷ Ű Äڵ带 Ä¡¿ö¼ ÀÔ·ÂÀÌ ¾ø¾ú´ø°Íó·³ ÇൿÇÕ´Ï´Ù.
Copyright(C) WideStudio/MWT Development Team, 1999-2005 | Last modified: Jul 31, 2005 |