TestGUI: Update

GUIs.Test.TestGUI/frmLookup.vb

@@ -8,10 +8,22 @@ Public Class frmLookup
             _Datasource.Add($"item-{index}")
         Next
 
+
         LookupControl31.Properties.DataSource = GetDatatable(10)
 
         Dim oEditor As New LookupControl3
         GridControl1.DataSource = New List(Of String) From {"foo", "var"}
+        GridControl1.ForceInitialize()
+
+        Dim oFirstColumn = GridView1.Columns.First()
+        Dim oEditor2 As New RepositoryItemLookupControl3() With {
+            .DataSource = GetDatatable(10),
+            .[ReadOnly] = False,
+            .MultiSelect = False
+        }
+
+        GridControl1.RepositoryItems.Add(oEditor2)
+        GridView1.Columns(0).ColumnEdit = oEditor2
     End Sub
 
     Private Function GetDatatable(Limit As Integer) As DataTable