move LookupGrid to Controls.LookupGrid folder

This commit is contained in:
Jonathan Jenne
2019-04-15 14:36:26 +02:00
parent 7285c56c93
commit 9f55f78e86
23 changed files with 1 additions and 1 deletions

View File

@@ -0,0 +1,21 @@
Imports System.Windows.Forms
Imports DevExpress.XtraGrid.Views.Grid
Namespace LookupGrid
Public Class LookupGridHandler
Inherits Handler.GridHandler
Public Sub New(ByVal gridView As GridView)
MyBase.New(gridView)
End Sub
Protected Overrides Sub OnKeyDown(ByVal e As KeyEventArgs)
MyBase.OnKeyDown(e)
If e.KeyData = Keys.Delete AndAlso View.State = GridState.Normal Then
View.DeleteRow(View.FocusedRowHandle)
End If
End Sub
End Class
End Namespace