![]() | Programming Guide | WideStudio Index Table of contents |
ºÎ¸ð °´Ã¼¸¦ ÃëµæÇϱ⿡´Â
ºÎ¸ð °´Ã¼¸¦ ÃëµæÇϱ⿡´Â
ºÎ¸ð °´Ã¼¸¦ ÃëµæÇϱ⿡´Â, ¸â¹ö ÇÔ¼ö getParent() ¸¦ »ç¿ëÇÕ´Ï´Ù.use mpfc; sub event_procedure { my ($object) = @_; # ºÎ¸ð°´Ã¼¸¦ Ãëµæ $parent = $object->getParent(); # ºÎ¸ð°´Ã¼¿¡ Á¢±Ù $parent->setVisible($mpfc::False); return; } 1;object °¡ ¹èÄ¡µÇ¿©ÀÖ´Â ºÎ¸ð °´Ã¼¸¦ ÃëµæÇØ¼, Ç¥½Ã ¼Ó¼ºÀ» ºÒ°¡·Î Çϴ°÷ÀÔ´Ï´Ù.ºÎ¸ð ¾ÖÇø®ÄÉÀÌ¼Ç À©µµ¿ì¸¦ ÃëµæÇϱ⿡´Â
ºÎ¸ð ¾ÖÇø®ÄÉÀÌ¼Ç À©µµ¿ì¸¦ ÃëµæÇϱ⿡´Â, ¸â¹ö ÇÔ¼ö getParentWindow() ¸¦ »ç¿ëÇÕ´Ï´Ù.use mpfc; sub event_procedure { my ($object) = @_; # ºÎ¸ð ¾ÖÇø®ÄÉÀÌ¼Ç À©´õ¿ì¸¦ Ãëµæ $win = $object->getParentWindow(); # ºÎ¸ð ¾ÖÇø®ÄÉÀÌ¼Ç À©´õ¿ì¿¡ Á¢±Ù $win->setVisible($mpfc::False); return; } 1;object °¡ ¹èÄ¡µÇ¿©ÀÖ´Â ºÎ¸ð ¾ÖÇø®ÄÉÀÌ¼Ç À©µµ¿ì¸¦ ÃëµæÇØ¼, Ç¥½Ã ¼Ó¼ºÀ» ºÒ°¡·Î Çϴ°÷ÀÔ´Ï´Ù.
Copyright(C) T. Hirabayashi, 2000-2004 | Last modified: Feb 25, 2004 |