[perl-win32-gui] 2 questions

[Christopher Sagayam]

to cut a long story short ...   $W->Tab->AddButton(     -name     => "createchangetab0",     -left     => 300,     -top      => 80 ,     -text     => " Create/Change ",     -width    => 180,     -height   => 22,     -foreground => [0,255,0],     -background => [0,0,0],         );   >>>>     some more code here   <<<<<<     $W2 = new Win32::GUI::Window(                 -name  => "W2",                 -title => "Popup Window",                 -pos   => [ 150, 150 ],                 -size  => [ 300, 200 ],         );                 $W->Show;   &Tab_Click;  # Initialize display of first tab (only).   Win32::GUI::Dialog();               sub createchangetab0_Click { $W2->Show(); }     sub Tab_Click {....}             now when I click on the button     "createchangetab0"     The subroutine createchangetab0_Click   doesnt get called ?   why ??           second question   how do I set a font color or font size using Win32 gui ?     Thanks   chris