Help for this page

Select Code to Download


  1. 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();
    
  2. or download this
    #!/usr/bin/perl
    use warnings;
    ...
    my $bln = $mw->Balloon( -background => 'LightYellow' )
                    ->attach( $b, -msg =>\$msg );
    MainLoop;
    
  3. or download this
    #!/usr/bin/perl
    use strict;
    ...
    MainLoop;