or
Private Sub RadGridEvents_DetailTableDataBind(ByVal source As Object, ByVal e As GridDetailTableDataBindEventArgs) Handles RadGridEvents.DetailTableDataBind Dim dataItem As GridDataItem = CType(e.DetailTableView.ParentItem, GridDataItem) Select Case e.DetailTableView.Name Case "EventMerchantList" Dim EventID As Integer = dataItem.GetDataKeyValue("eventID") Dim eventML As List(Of Merchant) eventML = Merchant.GetAllMerchantsByEventID(EventID) If Not eventML Is Nothing Then If eventML.Count > 0 Then e.DetailTableView.DataSource = eventML End If End If End Select End Sub Protected Sub RadGridEvents_PreRender(ByVal sender As Object, ByVal e As EventArgs) HideExpandColumnRecursive(RadGridEvents.MasterTableView) End Sub Public Sub HideExpandColumnRecursive(ByVal tableView As GridTableView) Dim nestedViewItems As GridItem() = tableView.GetItems(GridItemType.NestedView) For Each nestedViewItem As GridNestedViewItem In nestedViewItems For Each nestedView As GridTableView In nestedViewItem.NestedTableViews If nestedView.Items.Count = 0 Then Dim cell As TableCell = nestedView.ParentItem("ExpandColumn") cell.Controls(0).Visible = False nestedViewItem.Visible = False End If If nestedView.HasDetailTables Then HideExpandColumnRecursive(nestedView) End If Next Next End Subprotected void grdOwnerHistory_ItemDataBound(object sender, GridItemEventArgs e) { STEPS_AdditionalOwner_DataAdapter additionalDA = new STEPS_AdditionalOwner_DataAdapter(); STEPS_Client_DataAdapter clientDA = new STEPS_Client_DataAdapter(); if (e.Item is GridHeaderItem) { GridHeaderItem headerItem = (GridHeaderItem)e.Item; } else if (e.Item is GridDataItem) { GridDataItem dataItem = (GridDataItem)e.Item; if (!Object.Equals(this.RadToolTipManager1, null)) { RadToolTipManager1.TargetControls.Add(((HyperLink)dataItem["Owner_Name"].FindControl("lnkOwner_Name")).ClientID, "Owner_Name|" + dataItem["Owner_ID"].Text.Replace(" ", "").Replace("<nobr>", "").Replace("</nobr>", ""), true); //((HyperLink)dataItem["Owner_Name"].FindControl("lnkOwner_Name")).Font.Underline = true; DataSet ds = additionalDA.getAdditionalOwnerByTenureId(long.Parse(dataItem["Tenure_Id"].Text)); foreach (DataRow dRow in ds.Tables[0].Rows){ DataSet clientDS = clientDA.GetClientById(CommonFunction.ConvertIDToInt64( dRow["Owner_Id"]), long.Parse(this.employeeId)); string clientName; if (clientDS.Tables[0].Rows.Count > 0){ clientName = clientDS.Tables[0].Rows[0]["Rn_Descriptor"].ToString(); HyperLink link = new HyperLink(); link.Text = clientName; RadToolTipManager1.TargetControls.Add(link.ClientID, "Owner_Name|" + dRow["Owner_Id"].ToString(), true); dataItem["Owner_Name"].Controls.Add(link); } } } } }I’d like to have a fixed height radeditor which will limit content input after the boundary of the radeditor is reached. However, after setting the Height (500px), EnableResize(false), and AutoResizeHeight(false) parameters scrollbars continue to appear and the page still accepts input indefinitely.
Is there actually a way to limit the amount of input by fixing the height of a radeditor?
'on Page Load of the UserControl RadTreeList1.Style.Add(HtmlTextWriterStyle.Overflow, "auto") RadTreeList1.Width = mWidth RadTreeList1.Height = mHeight RadTreeList1.EditMode = TreeListEditMode.InPlace RadTreeList1.Enabled = True XmlDataSource1.DataFile = Path & "RowData.xml" RadTreeList1.Columns.Clear() Dim tmplt As New Web.UI.TemplateBuilder Dim selectColumn As New TreeListTemplateColumn selectColumn.DataField = "selected" selectColumn.EditItemTemplate = New CheckBoxTemplate("") selectColumn.ItemTemplate = New CheckBoxTemplate("") RadTreeList1.Columns.Add(selectColumn) Dim boundColumn As New TreeListBoundColumn boundColumn.DataField = "C2" boundColumn.UniqueName = "C2" boundColumn.HeaderText = "C2" RadTreeList1.Columns.Add(boundColumn) Private Sub RadTreeList1_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.TreeListItemDataBoundEventArgs) Handles RadTreeList1.ItemDataBound If TypeOf e.Item Is TreeListDataItem Then Dim dataItem As TreeListDataItem = e.Item Dim cb As Web.UI.WebControls.CheckBox cb = dataItem.FindControl("templateColumnCheckBox") AddHandler cb.CheckedChanged, AddressOf CheckBox1_CheckedChanged cb.Checked = True End If End Sub Protected Sub CheckBox1_CheckedChanged(ByVal sender As Object, ByVal e As EventArgs) 'never get this event.... End Sub Public Class CheckBoxTemplate Implements System.Web.UI.ITemplate Private CheckBox As System.Web.UI.WebControls.CheckBox Private colname As String Public Sub New(ByVal cName As String) colname = cName End Sub Public Sub InstantiateIn(ByVal container As System.Web.UI.Control) Implements System.Web.UI.ITemplate.InstantiateIn CheckBox = New System.Web.UI.WebControls.CheckBox CheckBox.ID = "templateColumnCheckBox" CheckBox.AutoPostBack = True container.Controls.Add(CheckBox) End SubEnd Class