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