|
|
@@ -17,6 +17,7 @@
|
|
|
If IsLoad Then Return
|
|
|
IsLoad = True
|
|
|
|
|
|
+ AddHandler FrmMain.KeyDown, AddressOf PageVersionMod_KeyDown
|
|
|
'调整按钮边距(这玩意儿没法从 XAML 改)
|
|
|
For Each Btn As MyRadioButton In PanFilter.Children
|
|
|
Btn.LabText.Margin = New Thickness(-2, 0, 8, 0)
|
|
|
@@ -423,7 +424,8 @@ Install:
|
|
|
ChangeAllSelected(False)
|
|
|
AniControlEnabled += CacheAniControlEnabled
|
|
|
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)
|
|
|
End Sub
|
|
|
|