Tk::StyledButton is a Perl module that provides a shaped button with stylized shading, using a Tk::Canvas object to implement the button rendering. The usual Tk::Button options and behaviors are preserved as much as possible.
When a button is rendered, 2 versions are created:
idle version
This version uses the unmodified -background value to render the button.
active version
This version uses the uses a brightened version of the -background value to render the button.
If the GD (min. version 2.30) and GD::Text modules are installed, the button images can be rendered via GD and captured for external use.
Note that some option values (e.g., -shape => 'folio', -orient => 'vertical') are provided for use by Tk::StyledNB (derived from Tk::DynaTabFrame ), and have minimal value for general use.
SYNOPSIS
use Tk::StyledButton;
...
$b = $MW->StyledButton(
-style => 'shiny' | 'round' | 'gel' | 'flat' | 'image',
-shape => 'rectangle' | 'oval' | 'round' | 'bevel' | 'folio' | [ @coords ],
-dispersion => fractional-number,
-angle => fractional-number,
-image => "Tk::Photo variable",
-state => 'normal' | 'disabled',
-command => [ sub {a callback} ],
-text => 'OK',
-font => $font,
-compound => 'left',
-orient => 'horizontal' | 'vertical',
-tooltip => 'Some helpful text'
)->pack();
...
MainLoop;
Product's homepage
Requirements:
· Perl