LookupGrid: Fix LookupGrid 3

2021-02-19 11:40:51 +01:00
parent 61e3c21c16
commit b0c64badb0
2 changed files with 23 additions and 11 deletions
--- a/GUIs.Test.TestGUI/frmLookup.vb
+++ b/GUIs.Test.TestGUI/frmLookup.vb
@@ -8,8 +8,10 @@ Public Class frmLookup
            _Datasource.Add($"item-{index}")
        Next

-
-        LookupControl31.Properties.DataSource = GetDatatable(10)
+        Dim oTable = GetDatatable(10)
+        LookupControl31.Properties.DataSource = oTable
+        LookupControl31.Properties.ValueMember = oTable.Columns.Item(0).ColumnName
+        LookupControl31.Properties.DisplayMember = oTable.Columns.Item(0).ColumnName

        Dim oEditor As New LookupControl3
        GridControl1.DataSource = New List(Of String) From {"foo", "var"}