Wish View method .SetRotation and .SetRotationAnimated

[Jeffrey Cameron]

Right now, for simple animations (e.g. rotating an expand/collapse indicator 180 degrees) I'm using the Animation Plus library to do the rotations:

Private Sub RotateControl(Control As View, FromDegree As Int, ToDegree As Int, Duration As Long)
    Dim An As AnimationPlus
    An.InitializeRotateCenter("", FromDegree, ToDegree, Control)
    An.Duration = Duration
    An.RepeatCount = 0
    An.PersistAfter = True
    An.Start(Control)
End Sub

I could eliminate this library altogether for most applications if there were a SetRotation (and SetRotationAnimated) method in addition to the SetLayout, SetColor, etc., methods of views.

 

[Erel]

Note that Rotation property and SetRotationAnimated are available in XUI library.

Dim x As B4XView = YourView
x.SetRotationAnimated(1000, 45)

 

[Jeffrey Cameron]

I was unaware... I will investigate it. You make too many improvements too quickly for me to possibly keep up!

Thanks!