jj: rename lookupgrid to lookupControl

LookupGrid/LookupGridHandler.vb

@@ -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
+