Menu::Item - Online Linux Manual PageSection : 3pm
Updated : 2020-11-09
Source : perl v5.32.0
Note : User Contributed Perl Documentation
NAMETk::Menu::Item − Base class for Menu items
SYNOPSIS require Tk::Menu::Item;
my $but = $menu−>Button(...);
$but−>configure(...);
my $what = $but−>cget();
package Whatever;
require Tk::Menu::Item;
@ISA = qw(Tk::Menu::Item);
sub PreInit
{
my ($class,$menu,$info) = @_;
$info−>{'−xxxxx'} = ...
my $y = delete $info−>{'−yyyy'};
}
DESCRIPTIONTk::Menu::Item is the base class from which Tk::Menu::Button, Tk::Menu::Cascade, Tk::Menu::Radiobutton and Tk::Menu::Checkbutton are derived. There is also a Tk::Menu::Separator. Constructors are declared so that $menu−>Button(...) etc. do what you would expect. The −label option is pre-processed allowing ~ to be prefixed to the character to derive a −underline value. Thus $menu−>Button(−label => 'Goto ~Home',...)
is equivalent to
$menu−>Button(−label => 'Goto Home', −underline => 6, ...)
The Cascade menu item creates a sub-menu and accepts these options: −menuitems A list of items for the sub-menu. Within this list (which is also accepted by Menu and Menubutton) the first two elements of each item should be the ‟constructor” name and the label: −menuitems => [
[Button => '~Quit', −command => [destroy => $mw]],
[Checkbutton => '~Oil', −variable => \$oil],
]
−postcommand A callback to be invoked before posting the menu. −tearoff Specifies whether sub-menu can be torn-off or not. −menuvar Scalar reference that will be set to the newly-created sub-menu. The returned object is currently a blessed reference to an array of two items: the containing Menu and the 'label'. Methods configure and cget are mapped onto underlying entryconfigure and entrycget. The main purpose of the OO interface is to allow derived item classes to be defined which pre-set the options used to create a more basic item.
BUGSThis OO interface is very new. Using the label as the ‟key” is a problem for separaror items which don't have one. The alternative would be to use an index into the menu but that is a problem if items are deleted (or inserted other than at the end). There should probably be a PostInit entry point too, or a more widget like defered 'configure'. 0
Johanes Gumabo
Data Size : 8,868 byte
man-Tk::Menu::Item.3pmBuild : 2024-12-05, 20:55 :
Visitor Screen : x
Visitor Counter ( page / site ) : 3 / 200,718
Visitor ID : :
Visitor IP : 3.15.34.105 :
Visitor Provider : AMAZON-02 :
Provider Position ( lat x lon ) : 39.962500 x -83.006100 : x
Provider Accuracy Radius ( km ) : 1000 :
Provider City : Columbus :
Provider Province : Ohio , : ,
Provider Country : United States :
Provider Continent : North America :
Visitor Recorder : Version :
Visitor Recorder : Library :
Online Linux Manual Page : Version : Online Linux Manual Page - Fedora.40 - march=x86-64 - mtune=generic - 24.12.05
Online Linux Manual Page : Library : lib_c - 24.10.03 - march=x86-64 - mtune=generic - Fedora.40
Online Linux Manual Page : Library : lib_m - 24.10.03 - march=x86-64 - mtune=generic - Fedora.40
Data Base : Version : Online Linux Manual Page Database - 24.04.13 - march=x86-64 - mtune=generic - fedora-38
Data Base : Library : lib_c - 23.02.07 - march=x86-64 - mtune=generic - fedora.36
Very long time ago, I have the best tutor, Wenzel Svojanovsky . If someone knows the email address of Wenzel Svojanovsky , please send an email to johanes_gumabo@yahoo.co.id .
If error, please print screen and send to johanes_gumabo@yahoo.co.id
Under development. Support me via PayPal.
ERROR : Need New Coding : (parse_manual_page_|249|Tk::Menu::Item.3pm|36/37|el══─{─══.|.el══─{─══. ds -- \|\(em\|
) (htmlprn|149|Tk::Menu::Item.3pm|36/37|.el══─{─══. ds -- — |.el══─{─══. ds -- \|\(em\|
) (parse_manual_page_|249|Tk::Menu::Item.3pm|43|br══─}─══|'br══─}─══
) (htmlprn|149|Tk::Menu::Item.3pm|43|'br══─}─══ |'br══─}─══
)