How to: Change the Speed of a Clock Without Changing the Speed of Its Timeline
A ClockController object's SpeedRatio property enables you to change the speed of a Clock without altering the SpeedRatio of the clock's Timeline. In the following example, a ClockController is used to interactively modify the SpeedRatio of a clock. The CurrentGlobalSpeedInvalidated event and the clock's CurrentGlobalSpeed property are used to display the clock's current global speed each time its interactive SpeedRatio is changed.
Example
/*
This example shows how to interactively control
the speed of a clock
*/
using System;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Media;
using System.Windows.Shapes;
using System.Windows.Media.Animation;
namespace Microsoft.Samples.Animation.TimingBehaviors
{
public class ClockControllerSpeedRatioExample : Page
{
private AnimationClock myControllableClock;
private Button speedRatioButton;
private TextBox speedRatioSettingTextBox;
private double doubleParseResult = 1;
private TextBlock currentGlobalSpeedTextBlock;
public ClockControllerSpeedRatioExample()
{
StackPanel mainPanel = new StackPanel();
// Create a rectangle to animate.
Rectangle animatedRectangle = new Rectangle();
animatedRectangle.Width = 100;
animatedRectangle.Height = 100;
animatedRectangle.Fill = Brushes.Orange;
mainPanel.Children.Add(animatedRectangle);
// Create a DoubleAnimation to
// animate its width.
DoubleAnimation widthAnimation =
new DoubleAnimation(
100,
500,
new Duration(TimeSpan.FromSeconds(5)));
//widthAnimation.RepeatBehavior = RepeatBehavior.Forever;
widthAnimation.AutoReverse = true;
widthAnimation.SpeedRatio = 0.5;
// Create a clock from the animation.
myControllableClock = widthAnimation.CreateClock();
// Apply the clock to the rectangle's Width property.
animatedRectangle.ApplyAnimationClock(
Rectangle.WidthProperty, myControllableClock);
//
// Create some controls the enable the user to
// interactively control the SpeedRatio of the clock.
//
StackPanel speedRatioDetailsPanel = new StackPanel();
speedRatioDetailsPanel.Margin = new Thickness(0,20,0,20);
speedRatioDetailsPanel.Orientation = Orientation.Horizontal;
Label speedRatioLabel = new Label();
speedRatioLabel.Content = "Speed Ratio:";
speedRatioDetailsPanel.Children.Add(speedRatioLabel);
// Create a text box so that the user can
// specify the amount by which to seek.
speedRatioSettingTextBox = new TextBox();
speedRatioSettingTextBox.Text =
myControllableClock.Controller.SpeedRatio.ToString();
speedRatioSettingTextBox.VerticalAlignment = VerticalAlignment.Top;
speedRatioSettingTextBox.TextChanged +=
new TextChangedEventHandler(seekAmountTextBox_TextChanged);
speedRatioDetailsPanel.Children.Add(speedRatioSettingTextBox);
// Create a button to apply SpeedRatio changes.
speedRatioButton = new Button();
speedRatioButton.Content = "Apply Speed Ratio";
speedRatioButton.Click += new RoutedEventHandler(speedRatioButton_Clicked);
speedRatioDetailsPanel.Children.Add(speedRatioButton);
mainPanel.Children.Add(speedRatioDetailsPanel);
// Display the clock's global speed information.
Label myLabel = new Label();
myLabel.Content = "CurrentGlobalSpeed ";
mainPanel.Children.Add(myLabel);
currentGlobalSpeedTextBlock = new TextBlock();
currentGlobalSpeedTextBlock.Text =
myControllableClock.CurrentGlobalSpeed.ToString();
mainPanel.Children.Add(currentGlobalSpeedTextBlock);
// List for speed changes.
myControllableClock.CurrentGlobalSpeedInvalidated +=
new EventHandler(myControllableClock_currentGlobalSpeedInvalidated);
this.Content = mainPanel;
}
// Updates the clock's SpeedRatio.
private void speedRatioButton_Clicked(object sender, RoutedEventArgs e)
{
// This statement triggers a CurrentGlobalSpeedInvalidated
// event.
myControllableClock.Controller.SpeedRatio = doubleParseResult;
}
// Displays the current global speed.
private void myControllableClock_currentGlobalSpeedInvalidated(object sender, EventArgs e)
{
currentGlobalSpeedTextBlock.Text =
myControllableClock.CurrentGlobalSpeed.ToString()
+ " Event triggered at: "
+ DateTime.Now.ToString();
}
// Verifies that speedRatioSettingTextBox has valid text content.
// If it doesn't, the speedRatioButton is disabled.
private void seekAmountTextBox_TextChanged(object sender, TextChangedEventArgs e)
{
TextBox theTextBox = (TextBox)e.Source;
if (theTextBox.Text == null || theTextBox.Text.Length < 1
|| Double.TryParse(theTextBox.Text,
System.Globalization.NumberStyles.Any,
null, out doubleParseResult) == false)
speedRatioButton.IsEnabled = false;
else
speedRatioButton.IsEnabled = true;
}
}
}
'
' This example shows how to interactively control
' the speed of a clock
'
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Media
Imports System.Windows.Shapes
Imports System.Windows.Media.Animation
Namespace Microsoft.Samples.Animation.TimingBehaviors
Public Class ClockControllerSpeedRatioExample
Inherits Page
Private ReadOnly myControllableClock As AnimationClock
Private ReadOnly speedRatioButton As Button
Private ReadOnly speedRatioSettingTextBox As TextBox
Private doubleParseResult As Double = 1
Private ReadOnly currentGlobalSpeedTextBlock As TextBlock
Public Sub New()
Dim mainPanel As New StackPanel()
' Create a rectangle to animate.
Dim animatedRectangle As New Rectangle With {
.Width = 100,
.Height = 100,
.Fill = Brushes.Orange
}
mainPanel.Children.Add(animatedRectangle)
' Create a DoubleAnimation to
' animate its width.
'widthAnimation.RepeatBehavior = RepeatBehavior.Forever
Dim widthAnimation As New DoubleAnimation(100, 500, New Duration(TimeSpan.FromSeconds(5))) With {
.AutoReverse = True,
.SpeedRatio = 0.5
}
' Create a clock from the animation.
myControllableClock = widthAnimation.CreateClock()
' Apply the clock to the rectangle's Width property.
animatedRectangle.ApplyAnimationClock(Rectangle.WidthProperty, myControllableClock)
'
' Create some controls the enable the user to
' interactively control the SpeedRatio of the clock.
'
Dim speedRatioDetailsPanel As New StackPanel With {
.Margin = New Thickness(0, 20, 0, 20),
.Orientation = Orientation.Horizontal
}
Dim speedRatioLabel As New Label With {
.Content = "Speed Ratio:"
}
speedRatioDetailsPanel.Children.Add(speedRatioLabel)
' Create a text box so that the user can
' specify the amount by which to seek.
speedRatioSettingTextBox = New TextBox With {
.Text = myControllableClock.Controller.SpeedRatio.ToString(),
.VerticalAlignment = VerticalAlignment.Top
}
AddHandler speedRatioSettingTextBox.TextChanged, AddressOf seekAmountTextBox_TextChanged
speedRatioDetailsPanel.Children.Add(speedRatioSettingTextBox)
' Create a button to apply SpeedRatio changes.
speedRatioButton = New Button With {
.Content = "Apply Speed Ratio"
}
AddHandler speedRatioButton.Click, AddressOf speedRatioButton_Clicked
speedRatioDetailsPanel.Children.Add(speedRatioButton)
mainPanel.Children.Add(speedRatioDetailsPanel)
' Display the clock's global speed information.
Dim myLabel As New Label With {
.Content = "CurrentGlobalSpeed "
}
mainPanel.Children.Add(myLabel)
currentGlobalSpeedTextBlock = New TextBlock With {
.Text = myControllableClock.CurrentGlobalSpeed.ToString()
}
mainPanel.Children.Add(currentGlobalSpeedTextBlock)
' List for speed changes.
AddHandler myControllableClock.CurrentGlobalSpeedInvalidated, AddressOf myControllableClock_currentGlobalSpeedInvalidated
Content = mainPanel
End Sub
' Updates the clock's SpeedRatio.
Private Sub speedRatioButton_Clicked(sender As Object, e As RoutedEventArgs)
' This statement triggers a CurrentGlobalSpeedInvalidated
' event.
myControllableClock.Controller.SpeedRatio = doubleParseResult
End Sub
' Displays the current global speed.
Private Sub myControllableClock_currentGlobalSpeedInvalidated(sender As Object, e As EventArgs)
currentGlobalSpeedTextBlock.Text = myControllableClock.CurrentGlobalSpeed.ToString() & " Event triggered at: " & Date.Now.ToString()
End Sub
' Verifies that speedRatioSettingTextBox has valid text content.
' If it doesn't, the speedRatioButton is disabled.
Private Sub seekAmountTextBox_TextChanged(sender As Object, e As TextChangedEventArgs)
Dim theTextBox As TextBox = CType(e.Source, TextBox)
If theTextBox.Text Is Nothing OrElse theTextBox.Text.Length < 1 OrElse Double.TryParse(theTextBox.Text, System.Globalization.NumberStyles.Any, Nothing, doubleParseResult) = False Then
speedRatioButton.IsEnabled = False
Else
speedRatioButton.IsEnabled = True
End If
End Sub
End Class
End Namespace
Collaborate with us on GitHub
The source for this content can be found on GitHub, where you can also create and review issues and pull requests. For more information, see our contributor guide.
.NET Desktop feedback