diff --git a/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb b/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb
index b4c93c3..a7e61cb 100644
--- a/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb
+++ b/Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb
@@ -886,15 +886,19 @@ Retry:
'''
Public Remain As String()
'''
- ''' 是否需要保留 PCL 全局设置。仅在压缩包中有效。
+ ''' 是否需要保留 PCL 全局设置。仅在包括 PCL 时有效。
'''
Public PCLSetupGlobal As Boolean = True
'''
- ''' 整合包名称。仅在 Modrinth 有效。
+ ''' 整合包名称。
'''
Public Name As String = ""
'''
- ''' 版本号。仅在 Modrinth 有效。
+ ''' 整合包描述。
+ '''
+ Public Desc As String = ""
+ '''
+ ''' 版本号。
'''
Public VerID As String = ""
Public Sub New(Version As McVersion,
@@ -903,7 +907,7 @@ Retry:
Remain As String(),
Optional PCLSetupGlobal As Boolean = True,
Optional Name As String = "",
- Optional Author As String = "",
+ Optional Desc As String = "",
Optional VerID As String = "")
Me.Version = Version
Me.Dest = Dest
@@ -911,6 +915,7 @@ Retry:
Me.Remain = Remain
Me.PCLSetupGlobal = PCLSetupGlobal
Me.Name = Name
+ Me.Desc = Desc
Me.VerID = VerID
End Sub
End Class
diff --git a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml
index 0d6a627..3c5edc7 100644
--- a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml
+++ b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml
@@ -28,14 +28,15 @@
-
+
-
-
-
+
+
+
+
+
-
@@ -50,8 +51,8 @@
-
-
+
+
diff --git a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml.vb b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml.vb
index 213debc..aecd7b9 100644
--- a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml.vb
+++ b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml.vb
@@ -1,8 +1,5 @@
-Imports System.Runtime.CompilerServices
-
-Public Class PageVersionExport
+Public Class PageVersionExport
Private Sub PageVersionExport_Loaded(sender As Object, e As RoutedEventArgs) Handles Me.Loaded
- TbExportName.HintText = PageVersionLeft.Version.Name
Reload()
End Sub
@@ -10,6 +7,8 @@ Public Class PageVersionExport
Public Sub Reload()
AniControlEnabled += 1
+ TbExportName.HintText = PageVersionLeft.Version.Name
+ TbExportDesc.HintText = PageVersionLeft.Version.Info
PanDisplayItem.Children.Clear()
ItemVersion = PageSelectRight.McVersionListItem(PageVersionLeft.Version.Load())
ItemVersion.IsHitTestVisible = False
@@ -38,6 +37,10 @@ Public Class PageVersionExport
ItemVersion.Title = If(String.IsNullOrWhiteSpace(sender.Text), PageVersionLeft.Version.Name, sender.Text)
End Sub
+ Private Sub TbExportDesc_TextChanged(sender As MyTextBox, e As TextChangedEventArgs) Handles TbExportDesc.TextChanged
+ ItemVersion.Info = If(String.IsNullOrWhiteSpace(sender.Text), PageVersionLeft.Version.Info, sender.Text)
+ End Sub
+
Private CustomLogoVal As String
'''
''' 自定义 Logo 的路径。