add WIP lookup grid control

LookupGrid/LookupGridControl.vb

@@ -0,0 +1,18 @@
+Imports DevExpress.XtraGrid
+Imports DevExpress.XtraGrid.Views.Base
+Imports DevExpress.XtraGrid.Registrator
+
+Namespace LookupGrid
+    Public Class LookupGridControl
+        Inherits GridControl
+
+        Protected Overrides Function CreateDefaultView() As BaseView
+            Return CreateView("LookupGridView")
+        End Function
+        Protected Overrides Sub RegisterAvailableViewsCore(ByVal collection As InfoCollection)
+            MyBase.RegisterAvailableViewsCore(collection)
+            collection.Add(New MyGridViewInfoRegistrator())
+        End Sub
+    End Class
+End Namespace
+