Tk::XPMs - xpm images for icons
use Tk; use Tk::XPMs qw(:all); my $top = MainWindow->new; my $xpm = $top->Pixmap(-data => openfolder_xpm); my $b1 = $top->Button( -image => $xpm, -command => sub{ print "openfolder_xpm\n"; }, );
This module provides some xpm images for icons. Each image is implemented as a function which returns the xpm data as a string.
The following image methods are defined:
Returns a tool box icon.
Returns a 32 x 32 Tk symbol.
Returns a 14 x 15 floppy disc symbol.
Returns another 14 x 15 floppy disc symbol.
Returns a 16 x 12 symbol for a folder. The $color parameter is optional. Default color is "#f0ff80".
Returns a 17 x 15 symbol for a folder. The color of the folder symbol is red.
Returns a 17 x 15 open folder symbol. The $color parameter is optional. Default color is "#f0ff80".
Returns a 12 x 12 symbol for a windows text file. The $color parameter is optional. Default color is "white".
Returns a symbol for a source file. The $color parameter is optional. Default color is "white".
Returns a symbol for a file. The $color parameter is optional. Default color is "white".
Returns a symbol for a windows folder.
Returns a symbol for a opened windows folder.
Returns a symbol for an opened windows folder. The $color parameter is optional. Default color is "yellow".
Returns a symbol for a text file. The $color parameter is optional. Default color is "white".
Returns a symbol for a color editor.
Returns a camel icon. The $color parameter is optional. Default color is "#7f7f00".
Returns a symbol for an up-arrow. The $color parameter is optional. Default color is "white".
Returns a symbol for a down-arrow. The $color parameter is optional. Default color is "white".
Returns a symbol for a blue left arrow.
Returns a symbol for a blue right arrow.
Returns a symbol for a left arrow. The $color parameter is optional. Default color is "#ffffff".
Returns a symbol for a right arrow. The $color parameter is optional. Default color is "#ffffff".
Returns a symbol for a |< arrow. The $color parameter is optional. Default color is "#ffffff".
Returns a symbol for a < arrow. The $color parameter is optional. Default color is "#ffffff".
Returns a symbol for a << arrow. The $color parameter is optional. Default color is "#ffffff".
Returns a symbol for a > arrow. The $color parameter is optional. Default color is "#ffffff".
Returns a symbol for a >> arrow. The $color parameter is optional. Default color is "#ffffff".
Returns a symbol for a >| arrow. The $color parameter is optional. Default color is "#ffffff".
Returns a symbol for an envelope.
Returns a symbol for a x-shaped cross. The $color parameter is optional. Default color is "red".
Returns a symbol for a info symbol.
Returns a symbol for a zoom-in lense.
Returns a symbol for a zoom-out lense.
Returns a symbol for a cut symbol (disabled).
Returns a symbol for a cut symbol (normal).
Returns a symbol for a paste symbol (disabled).
Returns a symbol for a paste symbol (normal).
Returns a symbol for a big lense.
Returns a symbol for eyeglasses.
Returns a symbol for crossed out eyeglasses.
Returns a symbol for "Thumbnail" Dialog.
Returns a symbol for "Diashow" Dialog.
Returns a symbol for a "rotate left" arrow. The $color parameter is optional. Default color is "#FCFCFC".
Returns a symbol for a "rotate right" arrow. The $color parameter is optional. Default color is "#FCFCFC".
Returns a symbol for an "Exit" button. The $color parameter for the text is optional. Default color is "#000000".
Returns a symbol for a "Stop" button.
Returns a symbol for an "Eye" button.
Returns a symbol for an "Crossed out Eye" button.
Returns a symbol for a "Lock" button.
Returns a 32 x 32 symbol for money.
Returns a symbol for a not selected checkbox. The $color parameter is optional. Default color is "#FFFFFF".
Returns a symbol for a not selected yellow checkbox The $color parameter is optional. Default color is "yellow".
Returns a symbol for a selected checkbox The $color parameter is optional. Default color is "yellow".
None by default. There are export tags :all and :arrows which can be used to import all methods or only the arrow methods.
Lorenz Domke, <lorenz.domke@gmx.de>
Copyright 2005 by Lorenz Domke
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Tk::XPMs, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Tk::XPMs
CPAN shell
perl -MCPAN -e shell install Tk::XPMs
For more information on module installation, please visit the detailed CPAN module installation guide.