BrowseEntry(3pm)
NAME
Tk::BrowseEntry - entry widget with popup choices.
SYNOPSIS
use Tk::BrowseEntry;
$b = $frame->BrowseEntry(-label => "Label", -variable => \$var);
$b->insert("end", "opt1");
$b->insert("end", "opt2");
$b->insert("end", "opt3");
...
$b->pack;
SUPER-CLASS
The "BrowseEntry" class is derived from the "Frame" class and inherits
all the methods, options and subwidgets of its super-class. By
default, options and methods are delegated to the entry subwidget.
DESCRIPTION
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:
- -arrowimage
- Specifies the image to be used in the arrow button beside the entry
widget. The default is an downward arrow image in the file
cbxarrow.xbm - -autolimitheight
- If set to a true value, then the height of the listbox will be at
most the number of entries in the list. The overall maximum of
"-listheight" still applies. - -autolistwidth
- If set to a true value, then the width of the listbox will match
the width of the largest entry. - -browsecmd
- Specifies a function to call when a selection is made in the popped
up listbox. It is passed the widget and the text of the entry
selected. This function is called after the entry variable has been assigned the value. - -browse2cmd
- Like "-browsecmd", but the callback is called with the listbox
index instead of the selected value. - -buttontakefocus
- Set the "-takefocus" option of the button subwidget.
- -choices
- Specifies the list of choices to pop up. This is a reference to an array of strings specifying the choices.
- -colorstate
- The state of the widget is reflected by color. A non-editable entry
widget will get a light gray background, while an editable entry
will be almost white. [This may change] - -listcmd
- Specifies the function to call when the button next to the entry is
pressed to popup the choices in the listbox. This is called before
popping up the listbox, so can be used to populate the entries in
the listbox. - -listheight
- Set the height of the listbox. See also "-autolimitheight".
- -listwidth
- Specifies the width of the popup listbox.
- -state
- Specifies one of three states for the widget: normal, readonly, or
disabled. If the widget is disabled then the value may not be
changed and the arrow button won't activate. If the widget is
readonly, the entry may not be edited, but it may be changed by
choosing a value from the popup listbox. normal is the default. - -style
- Set the "style" of the widget. Permitted values are "MSWin32" and
"unix". By default "-style" is set to the current platform. Widgets with the "unix" style will look like a normal "BrowseEntry" widget, whereas with the "MSWin32" style the arrow will look close to the
Windows' standard combobox widget, while moving the mouse the
entries will be highlighted, and probably includes other changes. - -variable
- Specifies the variable in which the entered value is to be stored.
METHODS
- insert(index, string)
- Inserts the text of string at the specified index. This string then becomes available as one of the choices.
- delete(index1, index2)
- Deletes items from index1 to index2.
- get The get method is delegated to the choices listbox.
ADVERTISED WIDGETS
The following widgets are advertised:
- entry
- The entry widget.
- arrow
- The button with the arrow image.
- choices
- The toplevel widget containing the choice listbox.
- slistbox
- The scrolled listbox with the choices.
SUBCLASSING
To make subclassing easier, the following methods may be overridden to
use other standard widgets in composing the mega widget:
- LabEntryWidget
- A widget class compatible with Tk::LabEntry used for the entry.
- ButtonWidget
- A widget class compatible with Tk::Button used for the arrow
button. - ListboxWidget
- A widget class compatible with Tk::Listbox used for the choices
listbox. - For example to use a "NumEntry" widget (from the Tk-GBARR CPAN
distribution) instead of the normal "Entry" widget:
package Tk::NumBrowseEntry;
use base qw(Tk::BrowseEntry);
use Tk::NumEntry;
Construct Tk::Widget 'NumBrowseEntry';
sub LabEntryWidget { "NumEntry" }
BUGS
BrowseEntry should really provide more of the ComboBox options.
AUTHOR
Rajappa Iyer rsi@earthling.net
Chris Dean ctdean@cogit.com made additions.
More additions by Slaven Rezic slaven@rezic.de
- 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.