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

NAME

Tk::RotatingGauge - a rotating gauge for tk

VERSION

version 1.100140

SYNOPSIS

    use Tk::RotatingGauge;

    my $g = $parent->RotatingGauge( @options );
    $g->value(10.5);

DESCRIPTION

This perl module provides a new Tk widget representing a gauge where the current value always stays at the same place. Think about your old mileage counters...

A rotating gauge item accepts the options described below.

ATTRIBUTES

-background

See Tk::options for more information on this standard option.

-orient

See Tk::options for more information on this standard option.

-box

Specifies the color of the lines boxing the gauge. If set to none, then no box will be drawn. Default to black.

-from

A real value corresponding to the minimum end of the gauge. Default to 0.

-height

Specifies a desired window height that the widget should request from its geometry manager.

-indicator

Specifies the color of the central indicator. If set to none, then no central indicator will be drawn. Default to red.

-policy

Define the rotating policy: if set to rotate (default), then out of bounds values will be mod-ed to fit in the wanted scale. If set to strict, values can't go lower than -from or higher than to.

-to

A real value corresponding to the maximum end of the gauge. Default to 100.

-value

The initial value to be shown. Default to 50.

-visible

The number of values to be displayed. Default to 20.

-width

Specifies a desired window width that the widget should request from its geometry manager.

METHODS

$gauge->value($val);

Sets the value that the gauge should indicate.

SEE ALSO

You can find more information on this module at:

AUTHOR

  Jerome Quelin

COPYRIGHT AND LICENSE

This software is copyright (c) 2007 by Jerome Quelin.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.