From a174c4856a2992ba7b7f6ce9e86b709a5d688b54 Mon Sep 17 00:00:00 2001 From: Ciilu <109708109+Ciilu@users.noreply.github.com> Date: Fri, 7 Mar 2025 22:12:58 +0800 Subject: [PATCH 1/2] update --- .../Pages/PageSetup/PageSetupUI.xaml.vb | 15 +++++++++++++-- 1 file changed, 13 insertions(+), 2 deletions(-) diff --git a/Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb b/Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb index 1f697f4..1ec2d98 100644 --- a/Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb @@ -1,4 +1,6 @@ -Public Class PageSetupUI +Imports NAudio.Wave + +Public Class PageSetupUI Public Shadows IsLoaded As Boolean = False @@ -355,7 +357,16 @@ Refresh: PanMusicVolume.Visibility = Visibility.Visible PanMusicDetail.Visibility = Visibility.Visible BtnMusicClear.Visibility = Visibility.Visible - CardMusic.Title = "背景音乐(" & EnumerateFiles(Path & "PCL\Musics\").Count & " 首)" + Dim validMusicCount As Integer = 0 + For Each File In EnumerateFiles(Path & "PCL\Musics\") + Try + Using reader As New AudioFileReader(File.FullName) + validMusicCount += 1 + End Using + Catch ex As Exception + End Try + Next + CardMusic.Title = "背景音乐(" & validMusicCount & " 首)" Else PanMusicVolume.Visibility = Visibility.Collapsed PanMusicDetail.Visibility = Visibility.Collapsed From 855ff55495419fe2f3fc5c50a289fde2431c858e Mon Sep 17 00:00:00 2001 From: Ciilu <109708109+Ciilu@users.noreply.github.com> Date: Sat, 8 Mar 2025 07:18:05 +0800 Subject: [PATCH 2/2] =?UTF-8?q?=E6=89=A9=E5=B1=95=E5=90=8D=E6=8E=92?= =?UTF-8?q?=E9=99=A4?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb b/Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb index 1ec2d98..d1d5c08 100644 --- a/Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb +++ b/Plain Craft Launcher 2/Pages/PageSetup/PageSetupUI.xaml.vb @@ -360,9 +360,8 @@ Refresh: Dim validMusicCount As Integer = 0 For Each File In EnumerateFiles(Path & "PCL\Musics\") Try - Using reader As New AudioFileReader(File.FullName) - validMusicCount += 1 - End Using + If {".ini", ".jpg", ".txt", ".cfg", ".lrc", ".db", ".png"}.Contains(File.Extension.ToLower) Then Continue For + validMusicCount += 1 Catch ex As Exception End Try Next