![]() | Programming Guide | WideStudio/MWT Index Table of contents |
ÆÄÀÏ ¼±Åà ´ëÈ »óÀÚ
ÆÄÀÏ ¼±Åà ´ëÈ »óÀÚÀÇ Ç¥½Ã
ÆÄÀÏ ¼±Åà ´ëÈ »óÀÚÀÇ »ç¿ëº¾À» º¸¾Æº¾½Ã´Ù. ÆÄÀÏ ¼±Åà ´ëÈ»óÀÚ°°Àº ´ëÈ »óÀÚ¿¡ °ü¿¡¼´Â º¯¸®ÇÑ Ç¥½Ã ¸Þ¼µå popup °¡ ¸¶·ÃµÇ¿©ÀÖ½À´Ï´Ù.popup ¸Þ¼µå´Â ´ëÈ »óÀÚ¸¦ Ç¥½ÃÇÒ »Ó¸¸¾Æ´Ï¶ó ¿ÀÆÛ·¹ÀÌÅͰ¡ OK³ª Ãë¼ÒµîÀ» ¼±ÅÃÇÑ °á°ú¸¦ ÇÔ¼ö º¹±Í·Î µ¹·ÁÁÝ´Ï´Ù. µû¶ó¼ ÇÔ¼ö¸¦ ºÒ·¯³õ´Â°Í¸¸À¸·Î ´ëÈ »óÀÚÀÇ Ç¥½ÃºÎÅÍ ´ëÈ »óÀÚÀÇ Á¾·áÇÑ ½ÃÁ¡ÀÇ ¼±Åðá°úÀÇ ÃëµæÀ» ½ÇÇàÇÒ¼ö ÀÖ½À´Ï´Ù. ÆÄÀÏ ¼±Åà ´ëÈ »óÀÚ³ª ¸Þ½ÃÁö ´ëÈ »óÀÚ¿¡ °üÇÏ¿© ½ÇÁ¦ÀÇ »ùÇÃÇÁ·Î±×·¥À» º¸¾Æº¾½Ã´Ù.
[ÆÄÀÏ ¼±Åà ´ëÈ »óÀÚ]#---------------------------------------------------------- #Function for the event procedure #---------------------------------------------------------- use mwt; sub btnep2 { my ($object) = @_; # ÇÑ ÀÀ¿ëÇÁ·Î±×·¥¿¡ µû¶ó ÇѰ³°¡ ¹Ì¸® ¸¶·ÃµÇ¿©ÀÖ½À´Ï´Ù. # ÆÄÀÏ ¼±Åà ´ëÈ »óÀÚÀÇ ÀνºÅϽºªË Á¢±Ù(access)ÇÕ´Ï´Ù. $fs = mwt::WSGIappFileSelect(); #(A) $fs->setProperty("maskFileName","pl"); #(B) $fs->setProperty("defaultPosition",$mwt::True); #(C) $ret = $fs->popup(); #(D) # ÇÑ ÀÀ¿ëÇÁ·Î±×·¥¿¡ µû¶ó ÇѰ³°¡ ¹Ì¸® ¸¶·ÃµÇ¿©ÀÖ´Â # ¸Þ½ÃÁö ´ëÈ »óÀÚÀÇ ÀνºÅϽº¸¦ ÃëµæÇÕ´Ï´Ù. $msg = mwt::WSGIappMessageDialog(); #(E) $msg->setProperty("width",500); #(F) $msg->setProperty("height",120); #(G) $msg->setProperty("defaultPosition",$mwt::True); #(H) if ($ret == $mwt::WS_DIALOG_OK){ #(I) $str = sprintf("%s °¡ ¼±Åõǿ´½À´Ï´Ù.", $fs->getFileName() ); $msg->setProperty("labelString",$str); $msg->popup(); }elsif ($ret == $mwt::WS_DIALOG_NO){ #(J) $msg->setProperty("labelString","¼±Åþȵǿ´½À´Ï´Ù."); $msg->popup(); }elsif ($ret == $mwt::WS_DIALOG_CANCEL){ #(K) $msg->setProperty("labelString","¼±ÅÃÀº Ãë¼ÒµÇ¿´½À´Ï´Ù."); $msg->popup(); } return; } 1;(A) ¿¡¼ Àü¿ª ÀνºÅϽº Á¢±Ù(access) ÇÔ¼ö¸¦ »ç¿ëÇÏ¿© ÆÄÀÏ ¼±Åà ´ëÈ»óÀÚÀÇ Àü¿ª ÀνºÅϽº¿¡ Á¢±Ù(access)ÇÕ´Ï´Ù. ÆÄÀÏ ¼±Åà ´ëÈ »óÀÚµîÀÇ Å¬·¡½º¿¡´Â ¹Ì¸® ¾ðÁ¦µçÁö »ç¿ëÇÒ¼öÀÖ´Â Àü¿ª ÀνºÅϽº°¡ Çϳª ¸¶·ÃµÇ¿©ÀÖ½À´Ï´Ù. ±×·¡¼ Àü¿ª ÀνºÅϽº Á¢±Ù(access) ÇÔ¼ö¿¡ ÀÇÇÏ¿© Á¢±Ù(access)ÇÒ¼öÀÖµµ·Ï µÇ¿©ÀÖ½À´Ï´Ù.
(B),(C)·Î ¼Ó¼ºÀ» ¼³Á¤Çؼ (D) ·Î ´ëÈ »óÀÚ¸¦ Ç¥½Ã»óÅ·ΠÇÕ´Ï´Ù. ½ÇÁ¦·Î ¼±ÅÃÀÌ ½ÇÇàµÇ¸é popup ¸Þ¼µå°¡ º¹±ÍÇØ¿É´Ï´Ù.
ÆÄÀÏ ¼±Åà ´ëÈ »óÀÚÀÇ ¼±Åðá°ú¸¦ ¸Þ½ÃÁö ´ëÈ »óÀÚ¸¦ »ç¿ëÇØ¼ Ç¥½ÃÇϵµ·Ï ÇսôÙ. (E),(F),(G),(H)¿¡¼ ¸Þ½ÃÁö ´ëÈ »óÀÚÀÇ Àü¿ªÀνºÅϽº¸¦ ÃëµæÇØ¼ ¼Ó¼ºÀ» ¼³Á¤ÇÕ´Ï´Ù.
(I) ¿¡¼´Â ¼±ÅÃµÈ ÆÄÀÏÀ» ¸Þ½ÃÁö ¹®ÀÚ¿·Î Ç¥½ÃÇÕ´Ï´Ù. (J) ´Â ÆÄÀÏ ¼±ÅÃÀÌ ¾ø¾ú´ø ³»¿ëÀ» ¸Þ½ÃÁö ¹®ÀÚ¿·Î Ç¥½ÃÇÕ´Ï´Ù. (K) ¿¡¼´Â Ãë¼ÒµÈ ³»¿ëÀ» ¸Þ½ÃÁö ¹®ÀÚ¿·Î Ç¥½ÃÇÕ´Ï´Ù.
Copyright(C) WideStudio/MWT Development Team, 1999-2005 | Last modified: Jul 31, 2005 |