Tk::BrowseEntry - entry widget with popup choices.
use Tk::BrowseEntry;
$b = $frame->BrowseEntry(-label => "Label", -variable => \$var);
$b->insert("end", "opt1");
$b->insert("end", "opt2");
$b->insert("end", "opt3");
...
$b->pack;
BrowseEntry is a poor man's ComboBox. It may be considered an enhanced
version of LabEntry which provides a button to popup the choices of the
possible values that the Entry may take. BrowseEntry supports all the
options LabEntry supports except -textvariable. This is replaced by -variable. Other options that BrowseEntry supports.
- -listwidth
-
Specifies the width of the popup listbox.
- -variable
-
Specifies the variable in which the entered value is to be stored.
- insert(index, string)
-
Inserts the text of string at the specified index. This string then becomes available as one of the choices.
BrowseEntry should really provide more of the ComboBox options.
There should be a way to delete entries which have been previously
inserted.
Rajappa Iyer rsi@ziplink.net
This code was inspired by ComboBox.tcl in Tix4.0 by Ioi Lam and bears more
than a passing resemblance to ComboBox code. This may be distributed under
the same conditions as Perl.
$CommentsMailTo = "perl5@dcs.ed.ac.uk"; include("../syssies_footer.inc");?>