This commit is contained in:
龙腾猫跃
2025-06-17 05:25:51 +08:00
parent 4585f31082
commit ebc9f5e31f
14 changed files with 310 additions and 344 deletions
@@ -17,7 +17,7 @@
If IsLoad Then Return
IsLoad = True
AddHandler FrmMain.KeyDown, AddressOf PageVersionMod_KeyDown
AddHandler FrmMain.KeyDown, AddressOf FrmMain_KeyDown
'调整按钮边距(这玩意儿没法从 XAML 改)
For Each Btn As MyRadioButton In PanFilter.Children
Btn.LabText.Margin = New Thickness(-2, 0, 8, 0)
@@ -424,8 +424,8 @@ Install:
ChangeAllSelected(False)
AniControlEnabled += CacheAniControlEnabled
End Sub
Private Sub PageVersionMod_KeyDown(sender As Object, e As KeyEventArgs) 'Handles Me.KeyDown 监听自己的事件的话进入页面后不点击右侧控件就没办法监听到事件 (#4311)
If FrmMain.PageRight IsNot Me Then Exit Sub
Private Sub FrmMain_KeyDown(sender As Object, e As KeyEventArgs) '监听自己的事件的话进入页面后不点击右侧控件就没办法监听到事件 (#4311)
If FrmMain.PageRight IsNot Me Then Return
If My.Computer.Keyboard.CtrlKeyDown AndAlso e.Key = Key.A Then ChangeAllSelected(True)
End Sub