Wish Add AnimationCompleted event

[rraswisak]

Hi,

My B4A object use SetLayoutAnimated to make some animation, as in B4J we can use this code:

'B4J Code...
Sub ShowLabel
   Dim lbl As Label
   lbl.Initialize("lbl")
   lbl.SetLayoutAnimated(1500,100,100,80,40)
   Wait For lbl_AnimationCompleted
   lbl.Text = "Done"
End Sub

In B4A SetLayoutAnimated method is available but not AnimationCompleted event as B4J does, previousely i use sleep to handle this situation, but it would be elegant if B4A can also has AnimationCompleted event so we can use Wait For.

Thank you

 

[LucaMs]

+1

[attached a (not so smart) workaround].

 

[rraswisak]

Thank @LucaMs for the attachment and nice example, i'm done with this approach too...
Using Sleep is the only option right now, i just wish can use AnimationCompleted event (internally) and using Wait For... as simple as B4J does

 

[LucaMs]

Thank @LucaMs for the attachment and nice example, i'm done with this approach too...
Using Sleep is the only option right now, i just wish can use AnimationCompleted event (internally) and using Wait For... as simple as B4J does

Yes, I know...

My + 1