循环内的交替面板动画

Question

我有两个面板动画（闪烁开/关）很好的心跳。但是我希望他们能够交替跳动而不是同时跳动。所以panel1以10计数击败，然后panel2以10计数击败。然后我想循环这样继续模式，直到用户按下后退键退出活动。我尝试了一些没有运气的事情。这是两个面板在一起跳动......

Sub beats
    PNL1.Initialize("PNL1")
    gdpanel1.Initialize("TOP_BOTTOM", Array As Int(Colors.DarkGray, Colors.Red))
    gdpanel1.CornerRadius=0
    PNL1.Background=gdpanel1
    mainPNL.AddView(PNL1,0,0,100%x,50%y)
    SetRadialGradientRed(gdpanel1,PNL1.Height/1.5)
    a.InitializeAlpha("a",0,1)
    a.Duration = 200
    a.RepeatCount = 10
    a.Start(PNL1)
    PNL2.Initialize("PNL1")
    gdpanel2.Initialize("TOP_BOTTOM", Array As Int(Colors.DarkGray, Colors.Blue))
    gdpanel2.CornerRadius=0
    PNL2.Background=gdpanel2
    mainPNL.AddView(PNL2,0,50%y,100%x,50%y)
    SetRadialGradientBlue(gdpanel2,PNL2.Height/1.5)
    b.InitializeAlpha("b",0,1)
    b.Duration = 200
    b.RepeatCount = 10
    b.Start(PNL2)
End Sub

Sub a_AnimationEnd
    '
End Sub

Sub b_AnimationEnd
    '
End Sub

Answer 1

你应该在Sub a_AnimationEnd中开始动画b并在Sub b_AnimationEnd中开始动画a。