From d915cd48f6db3ba80976f11f8be5b21376cc0ff2 Mon Sep 17 00:00:00 2001 From: tangge233 <2697992791@qq.com> Date: Mon, 5 Aug 2024 00:41:00 +0800 Subject: [PATCH] =?UTF-8?q?feat:=20=E6=97=A0=E5=8F=AF=E6=9B=B4=E6=96=B0=20?= =?UTF-8?q?Mod=20=E6=97=B6=E9=9A=90=E8=97=8F=E5=AF=B9=E5=BA=94=E5=8D=A1?= =?UTF-8?q?=E7=89=87?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Pages/PageVersion/PageVersionMod.xaml.vb | 15 ++++++++++----- 1 file changed, 10 insertions(+), 5 deletions(-) diff --git a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionMod.xaml.vb b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionMod.xaml.vb index 1a8ce34..55e5799 100644 --- a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionMod.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionMod.xaml.vb @@ -146,14 +146,16 @@ ''' 刷新卡片标题。 ''' Private Sub RefreshTitle() - RefreshTargetTitle(PanDefaultListBack, PanDefaultList, "启用 Mod") + RefreshTargetTitle(PanDefaultListBack, PanDefaultList, "已启用 Mod") RefreshTargetTitle(PanUpdateListBack, PanUpdateList, "可更新 Mod") - RefreshTargetTitle(PanDisabledListBack, PanDisabledList, "禁用 Mod") + '没有可以更新的 Mod 就暂时隐藏卡片 + PanUpdateListBack.Visibility = If(PanUpdateList.Children.Count.Equals(0), Visibility.Collapsed, Visibility.Visible) + RefreshTargetTitle(PanDisabledListBack, PanDisabledList, "已禁用的 Mod") RefreshTargetTitle(PanUnavaliableListBack, PanUnavaliableList, "暂不可用 Mod") End Sub Private Sub RefreshTargetTitle(Card As MyCard, List As StackPanel, Name As String) - Dim Mods = List.Children.Cast(Of MyLocalModItem).Select(Function(i) i.Entry).ToList + Dim Mods = List.Children.Cast(Of MyLocalModItem).ToList If Not IsSearching Then Card.Title = Name & " 列表 (" & Mods.Count & ")" ElseIf Mods.Any() Then @@ -161,8 +163,11 @@ Else Card.Title = Name & " 列表无搜索结果" End If - List.Visibility = If(Mods.Any(), Visibility.Visible, Visibility.Collapsed) - Card.CanSwap = If(Mods.Any(), True, False) + Dim IsContainItem As Boolean = Mods.Any() + List.Visibility = If(IsContainItem, Visibility.Visible, Visibility.Collapsed) + 'CanSwap 设置无效果，不知道为什么 + Card.CanSwap = IsContainItem + Card.IsSwaped = Not IsContainItem End Sub #End Region