feat: 点击“下载新 Mod”按钮跳转到下载页面时自动填充搜索框的内容

This commit is contained in:
wyc-26
2025-04-04 08:25:22 +08:00
parent 36cc718efb
commit ca729067c1
2 changed files with 8 additions and 0 deletions
@@ -5,6 +5,10 @@
''' 在切换到该页面时自动设置的目标版本。 ''' 在切换到该页面时自动设置的目标版本。
''' </summary> ''' </summary>
Public Shared TargetVersion As McVersion = Nothing Public Shared TargetVersion As McVersion = Nothing
''' <summary>
''' 在切换到该页面时自动设置的搜索框内的内容。
''' </summary>
Public Shared TargetName As String = Nothing
'加载器信息 '加载器信息
Public Shared Loader As New LoaderTask(Of CompProjectRequest, Integer)("CompProject Mod", AddressOf CompProjectsGet, AddressOf LoaderInput) With {.ReloadTimeout = 60 * 1000} Public Shared Loader As New LoaderTask(Of CompProjectRequest, Integer)("CompProject Mod", AddressOf CompProjectsGet, AddressOf LoaderInput) With {.ReloadTimeout = 60 * 1000}
@@ -52,6 +56,9 @@
ModLoader = CompModLoaderType.Forge Then '选择了 Forge ModLoader = CompModLoaderType.Forge Then '选择了 Forge
ModLoader = CompModLoaderType.Any '此时,视作没有筛选 Mod Loader(因为部分老 Mod 没有设置自己支持的加载器) ModLoader = CompModLoaderType.Any '此时,视作没有筛选 Mod Loader(因为部分老 Mod 没有设置自己支持的加载器)
End If End If
If TargetName IsNot Nothing Then
FrmDownloadMod.TextSearchName.Text = TargetName
End If
With Request With Request
.SearchText = FrmDownloadMod.TextSearchName.Text .SearchText = FrmDownloadMod.TextSearchName.Text
.GameVersion = GameVersion .GameVersion = GameVersion
@@ -381,6 +381,7 @@ Install:
''' </summary> ''' </summary>
Private Sub BtnManageDownload_Click(sender As Object, e As MouseButtonEventArgs) Handles BtnManageDownload.Click, BtnHintDownload.Click Private Sub BtnManageDownload_Click(sender As Object, e As MouseButtonEventArgs) Handles BtnManageDownload.Click, BtnHintDownload.Click
PageDownloadMod.TargetVersion = PageVersionLeft.Version '将当前版本设置为筛选器 PageDownloadMod.TargetVersion = PageVersionLeft.Version '将当前版本设置为筛选器
PageDownloadMod.TargetName = SearchBox.Text '将当前搜索框内容设置为筛选器
FrmMain.PageChange(FormMain.PageType.Download, FormMain.PageSubType.DownloadMod) FrmMain.PageChange(FormMain.PageType.Download, FormMain.PageSubType.DownloadMod)
End Sub End Sub