DigitalKitty has asked for the wisdom of the Perl Monks concerning the following question:
Hi all.
Is a drop down menu supposed to be grey? I am teaching myself Perl/Tk programming and when I clicked on the title bar, I noticed that the menu item is 'greyed out'. Shouldn't the -background define the whole area?
Thanks,
-Caitlin
Is a drop down menu supposed to be grey? I am teaching myself Perl/Tk programming and when I clicked on the title bar, I noticed that the menu item is 'greyed out'. Shouldn't the -background define the whole area?
#!/usr/bin/perl -w use strict; use Tk; my $main = MainWindow->new(); $main->minsize( qw(450 250) ); $main->title("Look! My first Perl/Tk window."); $main->configure(-background => 'Cyan' ); my $menu_bar = $main->Frame(-relief=>'groove', -borderwidth => 3, -background => 'purple', )->pack(-side =>'top', -fill=>'x'); my $file_mb = $menu_bar->Menubutton(-text=>'File', -background=>'purple', -activebackground=>'cyan', -foreground=>'white', )->pack(-side =>'left'); my $file_mb2 = $menu_bar->Menubutton(-text=>'Help', -background=>'purple', -activebackground=>'cyan', -foreground=>'white', )->pack(-side =>'left'); $file_mb->command(-label=>'Exit', -activebackground =>'magenta', -command=>sub{$main->destroy}); $file_mb->separator(); MainLoop();
Thanks,
-Caitlin
Edit kudra, 2002-05-03 Added info after : in title
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Simple Tk question.
by {NULE} (Hermit) on May 01, 2002 at 17:17 UTC | |
Re: Simple Tk question.
by BlueBlazerRegular (Friar) on May 01, 2002 at 17:48 UTC | |
Re: Simple Tk question.
by {NULE} (Hermit) on May 01, 2002 at 18:00 UTC |
Back to
Seekers of Perl Wisdom