At 9:19 am +0200 09/04/02, [EMAIL PROTECTED] wrote:
>Is it possible to hide/show the menubar via MacPerl ?
Yes. For instance:
#!perl
use Mac::Menus;
my $mnu = GetMenuBar(); # gets a list of the existing menus
ClearMenuBar(); # removes everything
DrawMenuBar(); # implements the change
sleep(10);
SetMenuBar $mnu; # replaces the old Menu Bar
DrawMenuBar(); # implements the change
For some reason when the MenuBar is replaced 'MacPerl Help' items are
not included in the 'Help' menu. The only way I know to get them back
is to quit MacPerl and relaunch.
HTH,
Alan Fry
