INIT OK 20.1.4

This commit is contained in:
2020-06-09 10:30:25 +02:00
parent 96e5588d9d
commit 291939e03f
25 changed files with 54 additions and 60 deletions
@@ -172,15 +172,15 @@ Public Class MasterDetailVC
End If
End If
End Sub
Private Sub view_KeyDown(ByVal sender As Object, ByVal e As Windows.Forms.KeyEventArgs)
If _view.FocusedColumn IsNot column OrElse e.KeyCode <> Windows.Forms.Keys.Space Then
Private Sub view_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs)
If _view.FocusedColumn IsNot column OrElse e.KeyCode <> System.Windows.Forms.Keys.Space Then
Return
End If
InvertRowSelection(_view.FocusedRowHandle)
End Sub
Private Sub View_Click(ByVal sender As Object, ByVal e As EventArgs)
Dim info As GridHitInfo
Dim pt As Point = _view.GridControl.PointToClient(Windows.Forms.Control.MousePosition)
Dim pt As Point = _view.GridControl.PointToClient(System.Windows.Forms.Control.MousePosition)
info = _view.CalcHitInfo(pt)
If info.Column Is column Then
If info.InColumn Then