I'm getting a strange pause during the animation of a callout? See code below:
Private
Sub
imHelpEnhanceDistance_MouseDown(sender
As
Object
, e
As
MouseButtonEventArgs)
Handles
imHelpEnhanceDistance.MouseDown
Try
Dim
clCodeCallout
As
New
RadCallout()
With
clCodeCallout
.FontSize = 10
.Content =
"My helpful Text Message"
.Width = 210
.Height = 70
.TextWrapping = TextWrapping.Wrap
.Background = Brushes.DarkGreen
.Foreground = Brushes.White
End
With
Dim
clSettings
As
New
CalloutPopupSettings()
With
clSettings
.Placement = System.Windows.Controls.Primitives.PlacementMode.Top
.CanPopupExceedScreen =
True
.ShowAnimationDuration = 0.55D
.ShowAnimationEasing =
New
BounceEase()
With
{.EasingMode = EasingMode.EaseOut, .Bounces = 20, .Bounciness = 5}
.CloseAnimationEasing =
New
CircleEase()
With
{.EasingMode = EasingMode.EaseOut}
.CloseAnimationDuration = 0.3D
.ShowAnimationType = CalloutAnimation.Move
.CloseAnimationType = CalloutAnimation.Move
.AutoClose =
True
End
With
CalloutPopupService.Show(clCodeCallout, TryCast(sender, FrameworkElement), clSettings)
Catch
ex
As
Exception
Log.Write(ex)
End
Try
End
Sub