jj: Add LookupGrid Control, Work in Progress!

This commit is contained in:
Jonathan Jenne
2018-10-08 16:34:25 +02:00
parent bc740898cc
commit 513ee837fb
16 changed files with 126 additions and 125 deletions

View File

@@ -1,19 +0,0 @@
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