hello
the following code will show a msgbox before the Form appears on the screen,
i wonder if it is possible to show the msgbox after the Form appears on the
screen automatically.
use Win32::GUI;
$Win = new Win32::GUI::Window(
-left => 3,
-top => 5,
-width => 640,
-height => 480,
-name => "Win",
-run => &message,
);
$Win->Show();
Win32::GUI::Dialog();
sub Win_Terminate {
return -1;
}
sub message {
$msg = "hello";
Win32::GUI::MessageBox($mw,$msg,".",MB_OK);
}
--
View this message in context: http://www.nabble.com/call-a-subroutine-after-the-Form-appearance-tp22512510p22512510.html
Sent from the perl-win32-gui-users mailing list archive at Nabble.com.
|