Skip site navigation (1)Skip section navigation (2)

FreeBSD Manual Pages

  
 
  

home | help
Menustrip(3)	      User Contributed Perl Documentation	  Menustrip(3)

NAME
       Tk::Menustrip - Another menubar with help menu support, etc

SYNOPSIS
	   use Tk::Menustrip;
	   use Tk;

	   my $MainWindow = MainWindow->new();

	   my $l_Menubar = $this->Menustrip();

	   $l_Menubar->MenuLabel     ('File'),
	   $l_Menubar->MenuEntry     ('File', 'Save', sub {Save();});
	   $l_Menubar->MenuSeparator ('File');
	   $l_Menubar->MenuEntry     ('File', 'Exit', sub {Exit();});

	   $l_Menubar->MenuLabel     ('Help', '-right');
	   $l_Menubar->MenuEntry     ('Help', 'About...');
	   $l_Menubar->MenuSeparator ('Help');
	   $l_Menubar->MenuEntry     ('Help', 'Help On...');

	   $l_Menubar->pack(-fill => 'x');

	   Tk::MainLoop;

DESCRIPTION
AUTHORS
       Damion K. Wilson, dkw@rcm.bm

HISTORY
POD ERRORS
       Hey! The	above document had some	coding errors, which are explained
       below:

       Around line 474:
	   =cut	found outside a	pod block.  Skipping to	next block.

perl v5.32.1			  1999-11-26			  Menustrip(3)

NAME | SYNOPSIS | DESCRIPTION | AUTHORS | HISTORY | POD ERRORS

Want to link to this manual page? Use this URL:
<https://www.freebsd.org/cgi/man.cgi?query=Tk::Menustrip&sektion=3&manpath=FreeBSD+13.0-RELEASE+and+Ports>

home | help