NAME
Game::Pexeso::Spinner - A spinner used to show progress.
SYNOPSIS
my $spinner = Game::Pexeso::Spinner->new();
$spinner->set_position(100, 100);
$stage->add($spinner);
$stage->signal_connect('button-release-event', sub {
my ($actor, $event) = @_;
if ($event->button == 1) {
print "Start\n";
$spinner->pulse_animation_start();
}
elsif ($event->button == 2) {
print "Stop\n";
$spinner->pulse_animation_stop();
}
else {
print "Once\n";
$spinner->pulse_animation_step();
}
});DESCRIPTION
A spinner showing progress that can be animated.
METHODS
The following methods are available:
new
Creates a new spinner.
Usage:
my $spinner = Game::Pexeso::Spinner->new();pulse_animation_step
Animates the spinner group of one step.
pulse_animation_start
Animates the spinner group continuously until pulse_animation_stop() is called.
pulse_animation_stop
Stop a previous animation that was started with pulse_animation_start().
AUTHORS
Emmanuel Rodriguez <potyl@cpan.org>.
COPYRIGHT AND LICENSE
Copyright (C) 2009 by Emmanuel Rodriguez.
This library is free software; you can redistribute it and/or modify it under the same terms of:
This module is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
You should have received a copy of the GNU Library General Public License along with this module; if not, see http://www.gnu.org/licenses/.
For the terms of The Artistic License, see perlartistic.