In Object inspector window (F11) find RotationAngle click on drop
down button, and select "Create New TFloatAnimation".
Object inspector window is automatically switched to a newly added
TFloatAnimation, you can also view it in Structure menu (Shift + Alt
F11).
In Object inspector of TFloatAnimation fill duration with any number
(in seconds). In our case lets take 1. Leave StartValue property as
it is, and in StopValue type - 360 (Degrees, so it all goes round).
Also lets turn Loop option on (this loops animation until you stop
it from code).
Now we have our animation set up. All is left is to turn it on: Drop two buttons on form, call first one "Start", second one - "Stop". in OnClick event of first button write:
FloatAnimation1.Start;
OnClick of second button code:
FloatAnimation1.Stop;
If you changed name of your TFloatAnimation - Also change it when calling Start and Stop.
Now run your project, click Start button and enjoy.
Contributors
Topic Id: 5383
Example Ids: 19168
This site is not affiliated with any of the contributors.