Accessing Edit Form controls

[Adonis]

Hello ,

  I am trying to access controls in an edit form to render the visibility of certain controls I tried the following but cannot find the controls ,

Public Sub RadGrid1_ItemCommand(ByVal source As Object, ByVal e As GridItemEventArgs) Handles RadGrid1.ItemEvent
        If TypeOf (e.Item) Is GridEditFormInsertItem Then
            Dim item As GridEditFormInsertItem = CType(e.Item, GridEditFormInsertItem)
            Dim panel As Panel = DirectCast(item.FindControl("Panel1"), Panel)
            Dim cmbDataType As RadComboBox = DirectCast(item.FindControl("DataTypeDropDown"), RadComboBox)
            If cmbDataType.SelectedValue = "Choice" Then
                panel.Visible = True
            Else
                panel.Visible = False
            End If
        End If

what would be the proper method to access the controls?

[Princy]

Hello Adonis,

Access the control in ItemDataBound event and set its visibility accordingly.

VB.Net:

Protected Sub RadGrid1_ItemDataBound(sender As Object, e As GridItemEventArgs)
    If TypeOf e.Item Is GridEditFormItem AndAlso e.Item.IsInEditMode Then
        'access edit form
        Dim item As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)
        Dim panel As Panel = DirectCast(item.FindControl("Panel1"), Panel)
        Dim cmbDataType As RadComboBox = DirectCast(item.FindControl("DataTypeDropDown"), RadComboBox)
        If cmbDataType.SelectedValue = "Choice" Then
            panel.Visible = True
        Else
            panel.Visible = False
        End If
    End If

    If TypeOf e.Item Is GridEditFormInsertItem AndAlso e.Item.OwnerTableView.IsItemInserted Then
        ' access insert form
        Dim item As GridEditFormInsertItem = DirectCast(e.Item, GridEditFormInsertItem)
        Dim panel As Panel = DirectCast(item.FindControl("Panel1"), Panel)
        Dim cmbDataType As RadComboBox = DirectCast(item.FindControl("DataTypeDropDown"), RadComboBox)
        If cmbDataType.SelectedValue = "Choice" Then
            panel.Visible = True
        Else
            panel.Visible = False
        End If
    End If
End Sub

Thanks,
Princy.

[Adonis]

Thanks that worked great, I also wanted to reverse the option of hiding the panel if the selected index changed of the RadComboBox, right now I am doing it rather clumsy by rebinding the grid in the Selected index changed event for the radcombobox,I imagine there is a better way to accomplish that?

[Princy]

Hello Adonis,

In SelectedIndexChanged event of RadComboBox, access RadComboBox first and using NamingContainer property of RadComboBox, get the GridEditFormItem. Then using FindControl method access the panel and set its visibility accordingly.

VB.Net:

Protected Sub RadComboBox1_SelectedIndexChanged(o As Object, e As RadComboBoxSelectedIndexChangedEventArgs)
    Dim combo As RadComboBox = DirectCast(o, RadComboBox)
    Dim editItem As GridEditFormItem = DirectCast(combo.NamingContainer, GridEditFormItem)
    Dim panel As Panel = DirectCast(item.FindControl("Panel1"), Panel)
    If combo.SelectedValue = "Choice" Then
        panel.Visible = True
    Else
        panel.Visible = False
    End If
End Sub

Thanks,
Princy.