Private Sub FlyGrid1_NodeCellChange(ByVal sender As Object, ByVal node As NineRays.Windows.Forms.Data.NodeBase, ByVal index As Integer, ByVal value As Object) Handles FlyGrid1.NodeCellChange
        Dim idx As Integer

        'cast FlyGrid as IServiceProvider
        Dim sp As IServiceProvider = CType(FlyGrid1, IServiceProvider)
        ' get a IDropDownListService instance
        Me.FlyGrid1.GetType().Assembly.GetType("NineRays.Windows.Forms.Grids.IDropDownListService")

        'use node.GetType instead of grid.GetType as our flygrid is inherited from myFlyGrid in DataRiseControls
        'it wouldn't work otherwise.
        Dim idls As NineRays.Windows.Forms.Grids.IDropDownListService = CType(sp.GetService(node.GetType().Assembly.GetType("NineRays.Windows.Forms.Grids.IDropDownListService")), IDropDownListService)
        If (Not idls Is Nothing) Then 'get selected index
            idx = idls.SelectedIndex
        End If

    End Sub