Embarcadero Delphi
Animaties gebruiken in Firemonkey

Roterende TRectangle

1. Maak een lege applicatie voor meerdere apparaten (Firemonkey).
2. Zet de rechthoek neer op het formulier.
3. In het venster Objectcontrole (F11) vindt u RotationAngle, klikt u op de vervolgkeuzeknop en selecteert u "Nieuwe TFloatAnimation maken".
4. Het venster Objectcontrole wordt automatisch overgeschakeld naar een nieuw toegevoegde TFloatAnimation, u kunt het ook bekijken in het menu Structuur (Shift + Alt
   • F11).
5. In Objectcontrole van TFloatAnimation vult u de duur in met een willekeurig nummer (in seconden). Laten we in ons geval 1 nemen. Laat de eigenschap StartValue zoals het is en in het type StopValue - 360 (graden, dus alles gaat rond). Laten we ook de Loop-optie inschakelen (deze animatie loopt door totdat je de code stopt).

Nu hebben we onze animatie ingesteld. Het enige dat overblijft is om het aan te zetten: laat twee knoppen op het formulier vallen, noem de eerste "Start", tweede - "Stop". in OnClick-gebeurtenis van eerste knop schrijven:

FloatAnimation1.Start;

Klik op de tweede knopcode:

FloatAnimation1.Stop;

Als u de naam van uw TFloatAnimation hebt gewijzigd - Wijzig deze ook wanneer u Start en Stop aanroept.

Voer nu uw project uit, klik op Start en geniet ervan.