fix(PageDownloadInstall): 打断安装预览页面进入动画后再次切换至下载页面时显示错误*2

This commit is contained in:
wyc-26
2025-03-28 22:35:47 +08:00
parent 38c5f5e9a1
commit d91515c27d
@@ -106,7 +106,7 @@
AaTranslateX(PanSelect, -CType(PanSelect.RenderTransform, TranslateTransform).X, 200, 100, Ease:=New AniEaseOutFluent(AniEasePower.ExtraStrong)), AaTranslateX(PanSelect, -CType(PanSelect.RenderTransform, TranslateTransform).X, 200, 100, Ease:=New AniEaseOutFluent(AniEasePower.ExtraStrong)),
AaCode( AaCode(
Sub() Sub()
'PanMinecraft.Visibility = Visibility.Collapsed PanMinecraft.Visibility = Visibility.Collapsed
PanBack.IsHitTestVisible = True PanBack.IsHitTestVisible = True
'初始化 Binding '初始化 Binding
If IsFirstLoaded Then Exit Sub If IsFirstLoaded Then Exit Sub
@@ -118,7 +118,7 @@
BtnFabricClearInner.SetBinding(Shapes.Path.FillProperty, New Binding("Foreground") With {.Source = CardFabric.MainTextBlock, .Mode = BindingMode.OneWay}) BtnFabricClearInner.SetBinding(Shapes.Path.FillProperty, New Binding("Foreground") With {.Source = CardFabric.MainTextBlock, .Mode = BindingMode.OneWay})
BtnFabricApiClearInner.SetBinding(Shapes.Path.FillProperty, New Binding("Foreground") With {.Source = CardFabricApi.MainTextBlock, .Mode = BindingMode.OneWay}) BtnFabricApiClearInner.SetBinding(Shapes.Path.FillProperty, New Binding("Foreground") With {.Source = CardFabricApi.MainTextBlock, .Mode = BindingMode.OneWay})
BtnOptiFabricClearInner.SetBinding(Shapes.Path.FillProperty, New Binding("Foreground") With {.Source = CardOptiFabric.MainTextBlock, .Mode = BindingMode.OneWay}) BtnOptiFabricClearInner.SetBinding(Shapes.Path.FillProperty, New Binding("Foreground") With {.Source = CardOptiFabric.MainTextBlock, .Mode = BindingMode.OneWay})
End Sub,, True) End Sub)
}, "FrmDownloadInstall SelectPageSwitch", True) }, "FrmDownloadInstall SelectPageSwitch", True)
End Sub End Sub
Public Sub ExitSelectPage() Handles BtnBack.Click Public Sub ExitSelectPage() Handles BtnBack.Click
@@ -130,7 +130,7 @@
DisabledPageAnimControls.Add(BtnStart) DisabledPageAnimControls.Add(BtnStart)
BtnStart.Show = False BtnStart.Show = False
SelectClear() '清除已选择项 SelectClear() '清除已选择项
'PanMinecraft.Visibility = Visibility.Visible PanMinecraft.Visibility = Visibility.Visible
PanSelect.IsHitTestVisible = False PanSelect.IsHitTestVisible = False
PanMinecraft.IsHitTestVisible = True PanMinecraft.IsHitTestVisible = True
PanBack.IsHitTestVisible = False PanBack.IsHitTestVisible = False