Uwe Gansert > Paw-0.54 > Paw::Menu

Download:
Paw-0.54.tar.gz

Dependencies

Annotate this POD

CPAN RT

Open  0
Report a bug
Source  

Pulldown Menu ^

$pdm=Paw::Paw-Menu->new($title, [$name], [$border]);>

Parameter

     $title  => visible title

     $name   => name of the widget [optionally]

     $border => only "shade" as option so far [optionally]

Example

     $pdm=Paw::Menu->new(title=>"Datei", border=>"shade");

add_menu_point($text, \&callback), add_menu_point($other_menu)

generates a new menupoint (with name "$text") and branches on the function "callback", if it is activated. There is also the possibility to give just another menu and you will get a Pulldown Menu in the Pulldown Menu.

Example

     $men->add_menu_point("Beep", \&menu_beep);

     #Pulldownmenu "$men" in Pulldownmenu "$men2".
     $men2->add_menu_point($men);