View on
MetaCPAN is shutting down
For details read Perl NOC. After June 25th this page will redirect to
Slaven Rezić > Tk-804.031 > Tk::chooseColor


Annotate this POD


New  36
Open  67
Stalled  17
View/Report Bugs
Source   Latest Release: Tk-804.034


Tk::chooseColor - pops up a dialog box for the user to select a color.


 $color = $widget->chooseColor?(-option=>value, ...)?;


The method chooseColor is implemented as a perl wrapper on the core tk "command" tk_chooseColor, and $widget is passed as the argument to the hidden -parent option. The implementation of internal tk_chooseColor is platform specific, on Win32 it is a native dialog, and on UNIX/X11 it is implemented in terms of Tk::ColorEditor.

The chooseColor method pops up a dialog box for the user to select a color. The following option-value pairs are possible as command line arguments:


Specifies the color to display in the color dialog when it pops up. color must be in a form acceptable to the Tk_GetColor function.


Makes $widget the logical parent of the color dialog. The color dialog is displayed on top of its parent window.


Specifies a string to display as the title of the dialog box. If this option is not specified, then a default title will be displayed.

If the user selects a color, tk_chooseColor will return the name of the color in a form acceptable to Tk_GetColor. If the user cancels the operation, the command will return undef.


 $widget->configure(-fg => $parent->chooseColor(-initialcolor => 'gray',
                                                -title => "Choose color"));


color selection dialog

syntax highlighting: