Registriert seit: 31. Aug 2005
1.622 Beiträge
FreePascal / Lazarus
|
Re: Animation rückwärts wiedergeben
21. Feb 2006, 16:52
das geht glaube ich nicht mit den Standart AnimSpeed funktionen, da musst du selbst eine Klasse von TImageSprite ableiten und die Methode DoMove überschreiben.
Dann kannst du einfach mit
Delphi-Quellcode:
animpos := animpos -animspeed;
if animpos < 0 then animpos := animcount-1;
Die Animation rückwärts laufen lassen.
Andreas "Sollen sich auch alle schämen, die gedankenlos sich der Wunder der Wissenschaft und Technik bedienen, und nicht mehr davon geistig erfasst haben als die Kuh von der Botanik der Pflanzen, die sie mit Wohlbehagen frisst." - Albert Einstein
|