I'm writing a login gui in perl and I've got a mental block:

I've created my gui:

my $main = Win32::GUI::Window->new(
        -name   => 'Main',
        -width  => 600,
        -height => 400,
        -text   => 'GHS Login',
        -sizable=> 0,
        -hasminimize => 0,
        -hasmaximize=> 0, 
);
... widgets positioned
$main->Center();
$main->Show();
Win32::GUI::Dialog();
exit(0);

My question is, how can I get the  window to be displayed and then have
perl code running in the background?
I've tried:
sub Main_Activate {
        ... perl code
return 0;
}
The perl code runs and then the window appears.


Thanks
Brian Rowlands
We must accept finite disappointment, but we must never lose infinite
hope.
Martin Luther King Jr. </quotes/k/martinlutherking/>  



-------------------------------------------------------------------------
This SF.net email is sponsored by the 2008 JavaOne(SM) Conference 
Don't miss this year's exciting event. There's still time to save $100. 
Use priority code J8TL2D2. 
http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone
_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
http://perl-win32-gui.sourceforge.net/

Reply via email to