Embarcadero Delphi
Använda animationer i Firemonkey

Roterande rektangel

1. Skapa tom Multi-Device (Firemonkey) -applikation.
2. Släpp rektangel på form.
3. I objektinspektörsfönstret (F11), hitta RotationAngle klicka på rullgardinsmenyn och välj "Skapa ny TFloatAnimation".
4. Objektinspektörsfönstret växlas automatiskt till en nyligen tillagd TFloatAnimation, du kan också se det i strukturmenyn (Skift + Alt
   • F11).
5. I Objektinspektör för TFloatAnimation fyller varaktighet med valfritt antal (i sekunder). I vårt fall kan vi ta 1. Lämna egenskapen StartValue som den är, och i StopValue-typ - 360 (grader, så det går runt). Låter också aktivera Loop-alternativet (den här slingananimationen tills du stoppar koden).

Nu har vi lagt upp vår animation. Allt som återstår är att slå på den: Släpp två knappar på formuläret, ring första "Start", andra - "Stopp". i OnClick-händelse av första knappskrivning:

FloatAnimation1.Start;

OnClick of second-knappkod:

FloatAnimation1.Stop;

Om du ändrade namnet på din TFloatAnimation - Ändra det också när du ringer Start och Stop.

Kör nu ditt projekt, klicka på Start-knappen och njut.