The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

FLTK::Clock - Clock widget for the Fast Light Tool Kit

Description

This widget provides a round analog clock display and is provided for Forms compatibility. It installs a 1-second timeout callback using FLTK::add_timeout().

The color() fills the background. The selectioncolor() (which defaults to GRAY85) fills the hands. The textcolor() is used to color in the tick marks and outline the hands.

type() may be set to SQUARE, ROUND, or DIGITAL). See the base class ClockOutput for some other methods.

Functions

new

my $self = $clock->new( $x, $y, $w, $h, $label );

Design credits

Original clock display written by Paul Haeberli at SGI.

Modifications by Mark Overmars for Forms

Further changes by Bill Spitzak for fltk

Author

Sanko Robinson <sanko@cpan.org> - http://sankorobinson.com/

License and Legal

Copyright (C) 2008-2010 by Sanko Robinson <sanko@cpan.org>

This program is free software; you can redistribute it and/or modify it under the terms of The Artistic License 2.0. See the LICENSE file included with this distribution or notes on the Artistic License 2.0 for clarification.

When separated from the distribution, all original POD documentation is covered by the Creative Commons Attribution-Share Alike 3.0 License. See the clarification of the CCA-SA3.0.