- or download this
# create a ballon for this message area etc
$balloon = $tab_mw->Balloon(-statusbar => $msgarea);
# create a TopLevel widget
$toplevel_wg = $tab_mw->Toplevel();
- or download this
#!/usr/bin/perl
use warnings;
...
my $bln = $mw->Balloon( -background => 'LightYellow' )
->attach( $b, -msg =>\$msg );
MainLoop;
- or download this
#!/usr/bin/perl
use strict;
...
MainLoop;