From d915fc2362684c126565a2c020651f198ce8392c Mon Sep 17 00:00:00 2001 From: wyc-26 Date: Wed, 9 Apr 2025 18:21:16 +0800 Subject: [PATCH 1/2] =?UTF-8?q?fix(ModModPack):=20=E8=A7=A3=E5=8E=8B?= =?UTF-8?q?=E5=8E=8B=E7=BC=A9=E5=8C=85=E8=BF=9B=E5=BA=A6=E5=8F=AF=E8=83=BD?= =?UTF-8?q?=E8=B6=85=E8=BF=87=20100%?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb | 1 + 1 file changed, 1 insertion(+) diff --git a/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb b/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb index 1d8dc13..93b11cf 100644 --- a/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb +++ b/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb @@ -115,6 +115,7 @@ Public Module ModModpack Dim Encode = Encoding.GetEncoding("GB18030") Try Retry: + Loader.Progress = 0 '完全不知道为啥会出现文件正在被另一进程使用的问题，总之多试试 DeleteDirectory(InstallTemp) ExtractFile(FileAddress, InstallTemp, Encode, ProgressIncrementHandler:=Sub(Delta) Loader.Progress += Delta * LoaderProgressDelta) From bd24d4c304f92a391da72af73de01c6d8b4a7c9d Mon Sep 17 00:00:00 2001 From: wyc-26 Date: Thu, 10 Apr 2025 16:36:01 +0800 Subject: [PATCH 2/2] =?UTF-8?q?fix(ModModpack):=20=E5=88=9D=E5=A7=8B?= =?UTF-8?q?=E5=80=BC=E4=B8=8D=E4=B8=BA=200?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb b/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb index 93b11cf..ab08f24 100644 --- a/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb +++ b/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb @@ -113,9 +113,10 @@ Public Module ModModpack '解压文件 Dim RetryCount As Integer = 1 Dim Encode = Encoding.GetEncoding("GB18030") + Dim InitialProgress = Loader.Progress Try Retry: - Loader.Progress = 0 + Loader.Progress = InitialProgress '完全不知道为啥会出现文件正在被另一进程使用的问题，总之多试试 DeleteDirectory(InstallTemp) ExtractFile(FileAddress, InstallTemp, Encode, ProgressIncrementHandler:=Sub(Delta) Loader.Progress += Delta * LoaderProgressDelta)