ColorEditor - Online Linux Manual PageSection : 3pm
Updated : 2020-11-09
Source : perl v5.32.0
Note : User Contributed Perl Documentation

NAMETk::ColorEditor − a general purpose Tk widget Color Editor

SYNOPSIS​ use Tk::ColorEditor; ​ ​ $cref = $mw−>ColorEditor(−title => $title, −cursor => @cursor); ​ ​ $cref−>Show;

DESCRIPTIONColorEditor is implemented as an object with various methods, described below. First, create your ColorEditor object during program initialization (one should be sufficient), and then configure it by specifying a list of Tk widgets to colorize. When it's time to use the editor, invoke the Show() method. ColorEditor allows some customization: you may alter the color attribute menu by adding and/or deleting menu items and/or separators, turn the status window on or off, alter the configurator's list of color widgets, or even supply your own custom color configurator callback. 1. Call the constructor to create the editor object, which in turn returns a blessed reference to the new object: ​ use Tk::ColorEditor; ​ ​ $cref = $mw−>ColorEditor( ​ −title => $title, ​ −cursor => @cursor, ​ ); ​ ​ mw − a window reference, usually the result of a MainWindow−>new ​ call. As the default root of a widget tree, $mw and all ​ descendant widgets at object−creation−time are configured ​ by the default color configurator procedure. (You probably ​ want to change this though or you might end up colorizing ​ ColorEditor!) ​ title − Toplevel title, default = ' '. ​ cursor − a valid Tk '−cursor' specification (default is ​ 'top_left_arrow'). This cursor is used over all ColorEditor ​ "hot spots". 2. Invoke the configure() method to change editor characteristics: ​ $cref−>configure(−option => value, ..., −option−n => value−n); ​ ​ options: ​ −command : a callback to a `set_colors' replacement. ​ −widgets : a reference to a list of widget references ​ for the color configurator. ​ −display_status : TRUE IFF display the ColorEditor status ​ window when applying colors. ​ −add_menu_item : 'SEP', or a color attribute menu item. ​ −delete_menu_item : 'SEP', a color attribute menu item, or color ​ attribute menu ordinal. ​ ​ For example: ​ ​ $cref−>configure(−delete_menu_item => 3, ​ −delete_menu_item => 'disabledforeground', ​ −add_menu_item => 'SEP', ​ −add_menu_item => 'New color attribute', ​ −widgets => [$ce, $qu, $f2b2], ​ −widgets => [$f2−>Descendants], ​ −command => [\&my_special_configurator, some, args ]); 3. Invoke the Show() method on the editor object, say, by a button or menu press: ​ $cref−>Show; 4. The cget(−widgets) method returns a reference to a list of widgets that are colorized by the configurator. Typically, you add new widgets to this list and then use it in a subsequent configure() call to expand your color list. ​ $cref−>configure( ​ −widgets => [ ​ @{$Filesystem_ref−>cget(−widgets)}, @{$cref−>cget(−widgets)}, ​ ]); 5. The delete_widgets() method expects a reference to a list of widgets which are then removed from the current color list. ​ $cref−>delete_widgets($OBJTABLE{$objname}>{'−widgets'})

AUTHORSStephen O. Lidie, Lehigh University Computing Center. 95/03/05 lusol@Lehigh.EDU Many thanks to Guy Decoux (decoux@moulon.inra.fr) for doing the initial translation of tcolor.tcl to TkPerl, from which this code has been derived.
0
Johanes Gumabo
Data Size   :   10,714 byte
man-Tk::ColorEditor.3pmBuild   :   2024-12-05, 20:55   :  
Visitor Screen   :   x
Visitor Counter ( page / site )   :   2 / 237,795
Visitor ID   :     :  
Visitor IP   :   3.144.37.178   :  
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::ColorEditor.3pm|36/37|el══─{─══.|.el══─{─══. ds -- \|\(em\| )         (htmlprn|149|Tk::ColorEditor.3pm|36/37|.el══─{─══. ds --  —  |.el══─{─══. ds -- \|\(em\| )         (parse_manual_page_|249|Tk::ColorEditor.3pm|43|br══─}─══|'br══─}─══ )         (htmlprn|149|Tk::ColorEditor.3pm|43|'br══─}─══ |'br══─}─══ )