NAME
Tk::ColorEntry - Entry widget with a Tk::PopColor widget attached.
SYNOPSIS
use Tk::ColorEntry;
my $entry = $window->ColorEntry->pack;DESCRIPTION
Megawidget, inherits Tk::Frame Tk::ColorEntry is an entry widget with a label packed to it's right. The background color of the label is used as indicator for the current color. Clicking the entry widget pops a Tk::ColorPop widget.
Pressing escape causes the ColorPop to widthdraw, or if a pick operation is in motion cancels the pick operation.
OPTIONS
- Switch: -entryerrorcolor
-
Default value '#FF0000'. Foreground color of the entry when it's content is not a valid color.
- Switch: -indborderwidth
-
Default value 2. Borderwidth of the indicator label.
- Switch: -indicatorwidth
-
Default value 4. Width of the indicator label.
- Switch: -indrelief
-
Default value 'sunken'. Relief of the indicator label.
- Switch: -popborderwidth
-
Default value 1. Borderwidth of the ColorPop widget.
- Switch: -poprelief
-
Default value 'raised'. Relief of the ColorPop widget.
LICENSE
Same as Perl.
AUTHOR
BUGS
Unknown. If you find any, please contact the author.