diff options
| author | ribet | 2007-05-24 12:40:14 +0000 |
|---|---|---|
| committer | ribet | 2007-05-24 12:40:14 +0000 |
| commit | 624331f5632af8fb549eeea42f74a872283400a5 (patch) | |
| tree | bb28ca259fddd6f9328f07d20ecad613b8a3a296 | |
| parent | f37be14560ef9d1bcef7bf214a61513ca3289442 (diff) | |
| download | mtc-624331f5632af8fb549eeea42f74a872283400a5.zip mtc-624331f5632af8fb549eeea42f74a872283400a5.tar.gz mtc-624331f5632af8fb549eeea42f74a872283400a5.tar.bz2 mtc-624331f5632af8fb549eeea42f74a872283400a5.tar.xz | |
Correction du clignottement lors du bouclage.
| -rw-r--r-- | doc/manuel_utilisateur.txt | 3 | ||||
| -rw-r--r-- | src/MTools/Anim/MPath.pm | 4 |
2 files changed, 2 insertions, 5 deletions
diff --git a/doc/manuel_utilisateur.txt b/doc/manuel_utilisateur.txt index 255b705..1db8e8a 100644 --- a/doc/manuel_utilisateur.txt +++ b/doc/manuel_utilisateur.txt @@ -531,9 +531,6 @@ Les fonctions applicables à un objet MPath sont : - stop: arrête l'animation - isRunning : détermine si l'animation est en cours -*** Au moment du "rebouclage" de l'animation, il y a parfois un -clignottement. Voir comment on peut régler ce problème - Exemple d'utilisation : use MTools; use MTools::GUI::MRect; diff --git a/src/MTools/Anim/MPath.pm b/src/MTools/Anim/MPath.pm index cfb87d0..d24e740 100644 --- a/src/MTools/Anim/MPath.pm +++ b/src/MTools/Anim/MPath.pm @@ -141,8 +141,8 @@ sub __getPoint { my ($self, $percentage) = @_; my @points = @{$self -> mget ('path')}; my $length = $self -> {__length} * $percentage / 100; - my $x = 0; - my $y = 0; + my $x = $points [$#points] -> [0]; + my $y = $points [$#points] -> [1]; my $vx = 0; my $vy = 0; for (my $i = 0; $i < @points - 1; $i ++) |