Merge pull request #5872 from Open-KFC/feat4311

Feat:模组管理页面无需点击右侧控件即可触发全选快捷键
This commit is contained in:
龙腾猫跃
2025-06-17 03:20:14 +08:00
committed by GitHub
@@ -17,6 +17,7 @@
If IsLoad Then Return If IsLoad Then Return
IsLoad = True IsLoad = True
AddHandler FrmMain.KeyDown, AddressOf PageVersionMod_KeyDown
'调整按钮边距(这玩意儿没法从 XAML 改) '调整按钮边距(这玩意儿没法从 XAML 改)
For Each Btn As MyRadioButton In PanFilter.Children For Each Btn As MyRadioButton In PanFilter.Children
Btn.LabText.Margin = New Thickness(-2, 0, 8, 0) Btn.LabText.Margin = New Thickness(-2, 0, 8, 0)
@@ -423,7 +424,8 @@ Install:
ChangeAllSelected(False) ChangeAllSelected(False)
AniControlEnabled += CacheAniControlEnabled AniControlEnabled += CacheAniControlEnabled
End Sub End Sub
Private Sub PageVersionMod_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown Private Sub PageVersionMod_KeyDown(sender As Object, e As KeyEventArgs) 'Handles Me.KeyDown 监听自己的事件的话进入页面后不点击右侧控件就没办法监听到事件 (#4311)
If FrmMain.PageRight IsNot Me Then Exit Sub
If My.Computer.Keyboard.CtrlKeyDown AndAlso e.Key = Key.A Then ChangeAllSelected(True) If My.Computer.Keyboard.CtrlKeyDown AndAlso e.Key = Key.A Then ChangeAllSelected(True)
End Sub End Sub