Ajout d ’un menu au cadre

$b_menu=$cadre->Menubutton(-text => "File",

-tearoff => 0,

-relief => 'ridge',

-menuitems => [['command' => "load",

-command => \&lire_fic],

['command' => "Save",

-command => \&sauve_fic],

['command' => "Search",

-command => \&search_in_fic],

['command' => "Exit",

-command => sub {exit;}]])

->pack(-side => 'left');

Diapositive précédente

Diapositive suivante

Revenir à la première diapositive

Afficher la version graphique