Embarcadero Delphi
Utilizzo di animazioni in Firemonkey

Trolley a rotazione

1. Crea un'applicazione Multi-Device (Firemonkey) vuota.
2. Rilascia rettangolo sulla forma.
3. Nella finestra di ispezione degli oggetti (F11) trova RotationAngle clic sul pulsante a discesa e seleziona "Crea nuovo TFloatAnimation".
4. La finestra di ispezione degli oggetti viene automaticamente impostata su TFloatAnimation appena aggiunta, puoi anche visualizzarla nel menu Struttura (Shift + Alt
   • F11).
5. In Object inspector di TFloatAnimation riempie la durata con qualsiasi numero (in secondi). Nel nostro caso, prendiamo 1. Lascia la proprietà StartValue così com'è, e nel tipo StopValue - 360 (Gradi, quindi tutto gira). Permette anche di attivare l'opzione Loop (questo loop esegue l'animazione finché non lo si interrompe dal codice).

Ora abbiamo impostato la nostra animazione. Tutto è lasciato è quello di accenderlo: Drop due pulsanti sul modulo, chiamare prima uno "Start", il secondo - "Stop". nell'evento OnClick della scrittura del primo pulsante:

FloatAnimation1.Start;

OnClick del secondo pulsante del codice:

FloatAnimation1.Stop;

Se hai cambiato il nome del tuo TFloatAnimation, cambia anche quando chiami Start e Stop.

Ora esegui il tuo progetto, fai clic sul pulsante Start e divertiti.