RepositoryItemGridLookUpEdit Class

using DevExpress.XtraEditors;
using DevExpress.XtraGrid.Columns;
using System.Data.OleDb;

// A lookup editor created at runtime. 
GridLookUpEdit gridLookup;
// A navigator control to navigate the "Order Details" table. 
DataNavigator dataNav;

// DataView for the "Order Details" table. 
DataView dvMain;
// DataView for the "Products" table. 
DataView dvDropDown;

//... 


private void Form1_Load(object sender, System.EventArgs e) {
   gridLookup = new GridLookUpEdit();
   gridLookup.Bounds = new Rectangle(10, 40, 200, 20);
   this.Controls.Add(gridLookup);

   dataNav = new DataNavigator();
   dataNav.Bounds = new Rectangle(10, 10, 250, 20);
   this.Controls.Add(dataNav);

   InitData();
   InitLookUp();

   dataNav.DataSource = dvMain;
}

private void InitData() {
   // Dataset to provide data from the database 
   DataSet ds = new DataSet();
   string connestionString = 
     "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\DB\\nwind.mdb";

   // Connect to the "Order Details" table 
   System.Data.OleDb.OleDbDataAdapter dbAdapter = 
     new OleDbDataAdapter("SELECT * FROM [Order Details]", connestionString);
   // Load data from the "Order Details" table to the dataset 
   dbAdapter.Fill(ds, "Order Details");
   // Connect to the "Products" table 
   dbAdapter = new OleDbDataAdapter("SELECT * FROM Products", connestionString);
   // Load data from the "Products" table into the dataset 
   dbAdapter.Fill(ds, "Products");

   DataViewManager dvm = new DataViewManager(ds);               
   dvMain = dvm.CreateDataView(ds.Tables["Order Details"]);
   dvDropDown = dvm.CreateDataView(ds.Tables["Products"]);
}


private void InitLookUp() {
   // Bind the edit value to the ProductID field of the "Order Details" table; 
   // the edit value matches the value of the ValueMember field. 
   gridLookup.DataBindings.Add("EditValue", dvMain, "ProductID");

   // Prevent columns from being automatically created when a data source is assigned. 
   gridLookup.Properties.PopupView.OptionsBehavior.AutoPopulateColumns = false;
   // The data source for the dropdown rows 
   gridLookup.Properties.DataSource = dvDropDown;
   // The field for the editor's display text. 
   gridLookup.Properties.DisplayMember = "ProductName";
   // The field matching the edit value. 
   gridLookup.Properties.ValueMember = "ProductID";

   // Add two columns in the dropdown: 
   // A column to display the values of the ProductID field; 
   GridColumn col1 = gridLookup.Properties.PopupView.Columns.AddField("ProductID");
   col1.VisibleIndex = 0;
   col1.Caption = "Product ID";
   // A column to display the values of the ProductName field. 
   GridColumn col2 = gridLookup.Properties.PopupView.Columns.AddField("ProductName");
   col2.VisibleIndex = 1;
   col2.Caption = "Product Name";

   // Set column widths according to their contents. 
   gridLookup.Properties.PopupView.BestFitColumns();
   // Specify the total dropdown width. 
   gridLookup.Properties.PopupFormWidth = 300;         
}

Imports DevExpress.XtraEditors
Imports DevExpress.XtraGrid.Columns
Imports System.Data.OleDb

 ' A lookup editor created at runtime. 
Dim gridLookup As GridLookUpEdit
' A navigator control to navigate the "Order Details" table. 
Dim dataNav As DataNavigator

' DataView for the "Order Details" table. 
Dim dvMain As DataView
' DataView for the "Products" table. 
Dim dvDropDown As DataView

'... 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _
  Handles MyBase.Load
   gridLookup = New GridLookUpEdit()
   gridLookup.Bounds = New Rectangle(10, 40, 200, 20)
   Me.Controls.Add(gridLookup)

   dataNav = New DataNavigator()
   dataNav.Bounds = New Rectangle(10, 10, 250, 20)
   Me.Controls.Add(dataNav)

   InitData()
   InitLookUp()

   dataNav.DataSource = dvMain
End Sub 


Private Sub InitData()
   ' Dataset to provide data from the database 
   Dim ds As New DataSet()
   Dim connestionString As String = _
     "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\DB\nwind.mdb" 

   ' Connect to the "Order Details" table 
   Dim dbAdapter As New OleDbDataAdapter("SELECT * FROM [Order Details]", connestionString)
   ' Load data from the "Order Details" table to the dataset 
   dbAdapter.Fill(ds, "Order Details")
   ' Connect to the "Products" table 
   dbAdapter = New OleDbDataAdapter("SELECT * FROM Products", connestionString)
   ' Load data from the "Products" table into the dataset 
   dbAdapter.Fill(ds, "Products")

   Dim dvm As New DataViewManager(ds)
   dvMain = dvm.CreateDataView(ds.Tables("Order Details"))
   dvDropDown = dvm.CreateDataView(ds.Tables("Products"))
End Sub 



Private Sub InitLookUp()
   ' Bind the edit value to the ProductID field of the "Order Details" table; 
   ' the edit value matches the value of the ValueMember field. 
   gridLookup.DataBindings.Add("EditValue", dvMain, "ProductID")

   ' Prevent columns from being automatically created when a data source is assigned. 
   gridLookup.Properties.PopupView.OptionsBehavior.AutoPopulateColumns = False 
   ' The data source for the dropdown rows 
   gridLookup.Properties.DataSource = dvDropDown
   ' The field for the editor's display text. 
   gridLookup.Properties.DisplayMember = "ProductName" 
   ' The field matching the edit value. 
   gridLookup.Properties.ValueMember = "ProductID" 

   ' Add two columns in the dropdown: 
   ' A column to display the values of the ProductID field; 
   Dim col1 As GridColumn = gridLookup.Properties.PopupView.Columns.AddField("ProductID")
   col1.VisibleIndex = 0
   col1.Caption = "Product ID" 
   ' A column to display the values of the ProductName field. 
   Dim col2 As GridColumn = gridLookup.Properties.PopupView.Columns.AddField("ProductName")
   col2.VisibleIndex = 1
   col2.Caption = "Product Name" 

   ' Set column widths according to their contents. 
   gridLookup.Properties.PopupView.BestFitColumns()
   ' Specify the total dropdown width. 
   gridLookup.Properties.PopupFormWidth = 300
End Sub