chores: 同步 #4360 有关下载任务名称的修改
This commit is contained in:
@@ -205,7 +205,12 @@
|
|||||||
RunInNewThread(
|
RunInNewThread(
|
||||||
Sub()
|
Sub()
|
||||||
Try
|
Try
|
||||||
Dim Desc As String = If(Project.Type = CompType.ModPack, "整合包", If(Project.Type = CompType.Mod, "Mod ", "资源包"))
|
Dim Desc As String = "资源"
|
||||||
|
Select Case Project.Type
|
||||||
|
Case CompType.ModPack : Desc = "整合包"
|
||||||
|
Case CompType.Mod : Desc = "Mod "
|
||||||
|
Case CompType.ResourcePack : Desc = "资源包"
|
||||||
|
End Select
|
||||||
'确认默认保存位置
|
'确认默认保存位置
|
||||||
Dim DefaultFolder As String = Nothing
|
Dim DefaultFolder As String = Nothing
|
||||||
If Project.Type = CompType.Mod Then
|
If Project.Type = CompType.Mod Then
|
||||||
|
|||||||
Reference in New Issue
Block a user