Определите, активна ли раскадровка, если myStoryboard еще не началась?

Question

1- Скопируйте и вставьте следующий код в MainWindow.xaml файл.

<Window x:Class="MainWindow"
xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
Title="MainWindow" Height="350" Width="525">
<StackPanel>
    <Label x:Name="Label1" Height="25" Width="100" Background="Gainsboro"/>
    <TextBox x:Name="TextBox1" Height="25" Width="100" Background="Pink" Text="Hello"/>
</StackPanel>
</Window>

2- Скопируйте и вставьте следующий код в код позади файла.

Class MainWindow

Private WithEvents myDispatcherTimer As New System.Windows.Threading.DispatcherTimer

Private Sub MainWindow_Loaded(sender As Object, e As RoutedEventArgs) Handles Me.Loaded
    AddHandler myDispatcherTimer.Tick, AddressOf myCode_Tick
    myDispatcherTimer.Interval = TimeSpan.FromSeconds(0.5)
    myDispatcherTimer.Start()
End Sub

Private Sub myCode_Tick(ByVal sender As Object, ByVal e As EventArgs)

    Dim myColorAnimation As New Animation.ColorAnimation With {.From = Colors.Transparent, .To = Colors.Red, .Duration = TimeSpan.FromSeconds(0.4), .AutoReverse = True}
    Animation.Storyboard.SetTargetName(element:=myColorAnimation, name:="Label1")
    Animation.Storyboard.SetTargetProperty(element:=myColorAnimation, path:=New PropertyPath("(Label.Background).(SolidColorBrush.Color)"))
    Dim myStoryboard As New Animation.Storyboard
    myStoryboard.Children.Add(myColorAnimation)

    If Not TextBox1.Text = "Hello" Then
        myStoryboard.Begin(containingObject:=Me, isControllable:=True, handoffBehavior:=Animation.HandoffBehavior.SnapshotAndReplace)
    Else
        If myStoryboard.GetCurrentState(containingObject:=Me) = Animation.ClockState.Active Then
            myStoryboard.Stop(containingObject:=Me)
        End If
    End If

End Sub

End Class

3- Запустите этот проект, подождите две секунды и увидите эту ошибку: https://prnt.sc/n08a3j

Сообщение об ошибке:

Невозможно выполнить действие, так как указанная раскадровка не была применена к этому объекту для интерактивного управления

Так, как я могу решить эту ошибку?

Как определить, активна ли раскадровка, если myStoryboard еще не началась?

Answer 1

Здесь есть 2 проблемы, во-первых, ваш код не вызывает метод Begin, если текст не был изменен.Однако метод Begin определяет, является ли Storyboard контролируемым .

Для вызова GetCurrentState необходим флаг controllable .

Поэтому убедитесь, что вы сначала позвонили Begin (я не знаю, что ваше приложение должно делать с исходным текстом, но вы хотели использовать оператор NOT в If NOT TextBox1.Text = "Hello" Then?

Во-вторых, вы хотите передать содержащий объект GetCurrentState:

If myStoryboard.GetCurrentState(containingObject:=Me) = Animation.ClockState.Active Then

Я применил 2 изменения и приложениеможет запускать анимацию без исключения.