Questions on UI for ASP.NET AJAX Forum

2 answers

278 views

RadComboBox problem with requesting items

Hi, I want to disable AllowCustomText in RadComboBox I find this article AllowCustomText Cannot Be Disabled When Loading Items on Demand and try to implement it. I set these property in my onLoad method:

EnableLoadOnDemand = false;

EnableViewState = true;

ShowMoreResultsBox = true;

EnableVirtualScrolling = true;

AppendDataBoundItems = true;

ShowToggleImage = true;

NoWrap = true;

AllowCustomText = false;

MarkFirstMatch = true;

HighlightTemplatedItems = true;

DropDownWidth = 350;

MaxHeight = 250;

Filter = RadComboBoxFilter.Contains;

and register these events

ItemsRequested += new RadComboBoxItemsRequestedEventHandler(comboItemsRequested);

OnClientDropDownOpening = "OnClientComboBoxDropDownOpeningHandler";

where client script is

function OnClientComboBoxDropDownOpeningHandler(sender, eventArgs) {

try {

sender.requestItems("", false);

} catch (e) {

radalert(e.message + "<br>"+ e.stack)

}

My combobox is defined in modal window so it is shown on user request and hide after selection. It works perfectly when I open it for the first time. But if I open combobox, hide the dialog and open it again then it doesn't work. Clicking on combobox doesn't start dropDown event and the script. For testing I add the same client script on event OnClientKeyPressing. It starts the script, but it throws this exception:

b is undefined

and stack trace:
Telerik.Web.UI.ControlItem.prototype._initialize@http://localhost:60103/Telerik.Web.UI.WebResource.axd?_TSM_HiddenField_=ctl00_ctl00_ctl00_ctl00_ctl00_ContentBody_ContentMain_RadScriptManager1_TSM&compress=1&_TSM_CombinedScripts_=%3b%3bSystem.Web.Extensions%2c+Version%3d4.0.0.0%2c+Culture%3dneutral%2c+Telerik.Web.UI%2c+Version%3d2013.3.1114.40%2c+:1978:1

b.RadComboBox._createChildControls@http://localhost:60103/Telerik.Web.UI.WebResource.axd?_TSM_HiddenField_=ctl00_ctl00_ctl00_ctl00_ctl00_ContentBody_ContentMain_RadScriptManager1_TSM&compress=1&_TSM_CombinedScripts_=%3b%3bSystem.Web.Extensions%2c+Version%3d4.0.0.0%2c+Culture%3dneutral%2c+Telerik.Web.UI%2c+Version%3d2013.3.1114.40%2c+:3850:1

b.RadComboBox.prototype._createChildControls@http://localhost:60103/Telerik.Web.UI.WebResource.axd?_TSM_HiddenField_=ctl00_ctl00_ctl00_ctl00_ctl00_ContentBody_ContentMain_RadScriptManager1_TSM&compress=1&_TSM_CombinedScripts_=%3b%3bSystem.Web.Extensions%2c+Version%3d4.0.0.0%2c+Culture%3dneutral%2c+Telerik.Web.UI%2c+Version%3d2013.3.1114.40%2c+:3317:1

b.RadComboBox.prototype._ensureChildControls@http://localhost:60103/Telerik.Web.UI.WebResource.axd?_TSM_HiddenField_=ctl00_ctl00_ctl00_ctl00_ctl00_ContentBody_ContentMain_RadScriptManager1_TSM&compress=1&_TSM_CombinedScripts_=%3b%3bSystem.Web.Extensions%2c+Version%3d4.0.0.0%2c+Culture%3dneutral%2c+Telerik.Web.UI%2c+Version%3d2013.3.1114.40%2c+:3318:67

b.RadComboBox.prototype.requestItems@http://localhost:60103/Telerik.Web.UI.WebResource.axd?_TSM_HiddenField_=ctl00_ctl00_ctl00_ctl00_ctl00_ContentBody_ContentMain_RadScriptManager1_TSM&compress=1&_TSM_CombinedScripts_=%3b%3bSystem.Web.Extensions%2c+Version%3d4.0.0.0%2c+Culture%3dneutral%2c+Telerik.Web.UI%2c+Version%3d2013.3.1114.40%2c+:4659:2

OnClientComboBoxDropDownOpeningHandler@http://localhost:60103/Js/ContentClient/def_content_client.js?v=0.3.0.1:215:16 Sys.EventHandlerList.prototype.getHandler/<@http://localhost:60103/Telerik.Web.UI.WebResource.axd?_TSM_HiddenField_=ctl00_ctl00_ctl00_ctl00_ctl00_ContentBody_ContentMain_RadScriptManager1_TSM&compress=1&_TSM_CombinedScripts_=%3b%3bSystem.Web.Extensions%2c+Version%3d4.0.0.0%2c+Culture%3dneutral%2c+Telerik.Web.UI%2c+Version%3d2013.3.1114.40%2c+:6:51366

Do you have any idea what can be wrong?

Thank you,
Petr

ComboBox

answered on 28 Sep 2015

2 answers

132 views

radEditor disabled in production, works in test

I have a VS2013 web forms project and use the RadEditor in many places. All works fine in test (Windows 8.1 Pro) but when publishing to production on Windows server 2012 R2, the editor appears with toolbars but with no content and totally disabled. I am not setting any custom skins as the default is fine. I have made sure that all entries in web.config for Telerik are the same. I am testing in the same browser (Chrome). No errors appear, the control is just completely disabled.

Editor

answered on 28 Sep 2015

1 answer

142 views

RadEditor - Paste plain text text box is not displayed with IE 9

Hi,

I use RadEditor version 2011.01.0519.35. I found that the paste plain text text box will not prompt on IE 9. Instead, it prompts in other browsers and also emulator IE Edge mode. I tried radeditor in telerik demo page http://demos.telerik.com/aspnet-ajax/editor/examples/overview/defaultcs.aspx and the same thing occurs.

I also found this error "HTML1114: Codepage unicode from (UNICODE byte order mark) overrides conflicting codepage windows-1252 from (13)" in console.

Can you share with me about any solutions/ alternative that I can use?

General Discussions

answered on 28 Sep 2015

0 answers

97 views

Basic theme with image manager

Anybody have this they could post? Thanks!

Editor

asked on 28 Sep 2015

4 answers

862 views

Display multiple row values into single cell (LINQ and RadGrid)

Below is a scaled down version for what I am needing.

Table A has two columns: Location_ Name, ITEM_ID
Table B has two columns: ID, Description

Relationship is 1 to many, respectively.

In my grid I want to concatenate all descriptions delimited by ',' and by each location into a single cell.

The output would be as follows:

Location Description

Westchester 12546,145879,15698,12583
Torrance 32145,3258,32458
Glendale 14785
Pasadena 14589,156478

Grid properties:

AutoGenerateColumns

="False"
AllowFilteringByColumn="True"

AllowPaging="True"
AllowSorting="True"

Please advise how I can achieve this?

Thanks in advance.

Grid

answered on 27 Sep 2015

1 answer

98 views

Show Equivalent Client Side Alert in Radwindow (i.e. Server Side Button Click)

Hi I am using UI for ASP.NET AJAX Q1 2015 SP1. In my form, some other event I am populating a hidden field (i.e. hdnFolderCreated).

Client Side event below code works

function disp_confirm() {

alert("Process Complete!!! " + "\n\n" + document.getElementById('<%=hdnFolderCreated.ClientID %>').value + "."

+ "\n\nIf required, copy previous Month PDF files to verify the total's "

+ "\nand Standard definitation file into above mentioned folder.");

}

My question is possible I can display the same alert message in a server side button click event inside a Rad Window? If so how? Thanks for any help.

gc_0620

Window

answered on 25 Sep 2015

2 answers

796 views

MaxFileSize Limitation

I am currently developing a web application using the RadAsynUpload control with a "ChunkSize" set to 4MB. I am now looking to prevent my users from uploading files larger than 6GB. The RadAsyncUpload control has a "MaxFileSize" property, but unfortunately the value is factored in bytes and the data type is only defined as an integer. With this limitation, the "MaxFileSize" cannot be set above 2GB (2,147,483,647 bytes). If I do not set the "MaxFileSize" property on the RadAsyncUpload control, I can successfully upload 6GB and larger files. Because I am using the chuck upload feature, I've configured my web.config file to handle uploads slightly larger than 4MB (the chunk size).

Does anyone have a workaround for this? Thanks!

AsyncUpload

answered on 25 Sep 2015

3 answers

206 views

RadScheduler, RadToolTipManager, and number of appointments per day

I created a RadScheduler that works in parallel with a RadToolTipManager using this demo as a guide: http://demos.telerik.com/aspnet-ajax/scheduler/examples/radtooltip/defaultcs.aspx . Everything is working as intended, except for one thing that I cannot figure out related to the "VisibleAppointmentsPerDay" property.

The basic problem is this: If I set RadScheduler1.MonthView.VisibleAppointmentsPerDay = 4, and then switch to the DayView on the browser, the custom tool tip I wrote will only appear for the first 4 appointments on that day. Any other appointments simply show the default tool tip. I verified that the VisibleAppointmentsPerDay property was the issue by setting it to 5, which made my custom tool tip appear for the first 5 appointments.

I only want 4 visible appointments on the MonthView, but I still want all the appointments to use my custom tool tip on the DayView. Can anyone give me some insight as to what to do in this situation?

Thanks!

Scheduler

answered on 25 Sep 2015

1 answer

319 views

Column Header Wrapping and Cell Formatting with ExcelToExport

I have a radgrid on my aspx page. I build the grid/columns dynamically in the code behind. I use the NeedDataSource to populate the data and then use the ExportToExcel command to export the grid. I cannot find how to either wrap the column headers and/or format my numeric columns with commas. Below is the code and the aspx page and code-behind. Please help on how to do both.

A button on my page calls the exportSummary() function.

<telerik:RadGrid ID="rgExportSummary" runat="server" OnExcelMLWorkBookCreated="rgExportSummary_ExcelMLWorkBookCreated" OnNeedDataSource="rgExportSummary_NeedDataSource">

<MasterTableView Visible="false" HierarchyDefaultExpanded="true" Font-Names="Arial" Font-Size="8pt" AutoGenerateColumns="false">

<HeaderStyle Font-Names = "Arial" Font-Bold = "true" Font-Size = "8pt" />

<ItemStyle Font-Names="Arial" Font-Bold="false" Font-Size="8pt" />

</MasterTableView>

</telerik:RadGrid>


Public Sub exportSummary() 
     Dim sql As String = ""
     Try
         sql = "exec ibuy.dbo.WB_sp_PrintBuyByReports_ForMultipleEvents " & buyByReportID 
         mobjDatabase.subExecuteNonQuery(sql) 
     Catch ex As SqlException 
         Throw New Exception(ex.Message & ", SQL: " & sql & ",frmPlanner.exportSummary") 
     End Try
     Dim nsaid As New GridBoundColumn 
     nsaid.HeaderStyle.Width = Unit.Pixel(50) 
     nsaid.ItemStyle.Width = Unit.Pixel(50) 
     nsaid.DataField = "VendorMasterCD"
     nsaid.HeaderText = "NSA ID"
     nsaid.UniqueName = "VendorMasterCD"
     rgExportSummary.MasterTableView.Columns.Add(nsaid) 
     Dim vendor As New GridBoundColumn 
     vendor.HeaderStyle.Width = Unit.Pixel(50) 
     vendor.ItemStyle.Width = Unit.Pixel(50) 
     vendor.DataField = "VendorName"
     vendor.HeaderText = "Vendor"
     vendor.UniqueName = "VendorName"
     rgExportSummary.MasterTableView.Columns.Add(vendor) 
     Dim product As New GridBoundColumn 
     product.HeaderStyle.Width = Unit.Pixel(50) 
     product.ItemStyle.Width = Unit.Pixel(50) 
     product.DataField = "VendorProduct"
     product.HeaderText = "Product"
     product.UniqueName = "VendorProduct"
     rgExportSummary.MasterTableView.Columns.Add(product) 
     Dim productid As New GridBoundColumn 
     productid.HeaderStyle.Width = Unit.Pixel(50) 
     productid.ItemStyle.Width = Unit.Pixel(50) 
     productid.DataField = "ProductID"
     productid.HeaderText = "Product ID"
     productid.UniqueName = "ProductID"
     rgExportSummary.MasterTableView.Columns.Add(productid) 
     If Not cbBreakoutByProduct.Checked Then
         Dim circset As New GridBoundColumn 
         circset.HeaderStyle.Width = Unit.Pixel(50) 
         circset.ItemStyle.Width = Unit.Pixel(50) 
         circset.DataField = "CirculationSet"
         circset.HeaderText = "Circ Set"
         circset.UniqueName = "CirculationSet"
         rgExportSummary.MasterTableView.Columns.Add(circset) 
         Dim release As New GridBoundColumn 
         release.HeaderStyle.Width = Unit.Pixel(50) 
         release.ItemStyle.Width = Unit.Pixel(50) 
         release.DataField = "Release"
         release.HeaderText = "Release"
         release.UniqueName = "Release"
         rgExportSummary.MasterTableView.Columns.Add(release) 
     End If
     If cbBreakoutByDay.Checked Then
         Dim day As New GridBoundColumn 
         day.HeaderStyle.Width = Unit.Pixel(50) 
         day.ItemStyle.Width = Unit.Pixel(50) 
         day.DataField = "DistributionDay"
         day.HeaderText = "Day"
         day.UniqueName = "DistributionDay"
         rgExportSummary.MasterTableView.Columns.Add(day) 
     End If
     If cbBreakoutByDay.Checked And cbIncludeDeliveryCodes.Checked Then
         Dim deliveryCodes As New GridBoundColumn 
         deliveryCodes.HeaderStyle.Width = Unit.Pixel(50) 
         deliveryCodes.ItemStyle.Width = Unit.Pixel(50) 
         deliveryCodes.DataField = "DeliveryCode"
         deliveryCodes.HeaderText = "Delivery Code"
         deliveryCodes.UniqueName = "DeliveryCode"
         rgExportSummary.MasterTableView.Columns.Add(deliveryCodes) 
     End If
     If cbBreakoutByDay.Checked And cbIncludeVersions.Checked Then
         Dim versions As New GridBoundColumn 
         versions.HeaderStyle.Width = Unit.Pixel(50) 
         versions.ItemStyle.Width = Unit.Pixel(50) 
         versions.DataField = "VersionsDescription"
         versions.HeaderText = "Version"
         versions.UniqueName = "VersionsDescription"
         rgExportSummary.MasterTableView.Columns.Add(versions) 
     End If
     Dim rop As New GridBoundColumn 
     rop.HeaderStyle.Width = Unit.Pixel(50) 
     rop.ItemStyle.Width = Unit.Pixel(50) 
     rop.DataField = "ROPIndValue"
     rop.HeaderText = "ROP"
     rop.UniqueName = "ROPIndValue"
     rgExportSummary.MasterTableView.Columns.Add(rop) 
     'loop through criteria table to get what is visible 
     sql = ""
     Dim columnDataField As String = ""
     Dim columnIndex As Integer = 1 
     Dim maxProductID As Integer = 0 
     If cbBreakoutByProduct.Checked Then
         Try
             sql = "Select productid,count(*) from ibuy.dbo.Tmp_BuyByGeo_SummaryEvents_" & buyByReportID & " group by productid order by 2 desc"
             mobjSqlDataReader = mobjDatabase.fnRetrieveData("DATAREADER", sql) 
             mobjSqlDataReader.Read() 
             maxProductID = mobjSqlDataReader("productid") 
             mobjSqlDataReader.Close() 
             sql = "Select b.* from ibuy.dbo.Tmp_BuyByGeo_SummaryEvents_" & buyByReportID & " a, ibuy.dbo.tmp_WB_BuyByReportsList" & UcHeader.SessionId & " b where a.productid = " & maxProductID & " and a.EventsID = b.EventID and a.EventDistributionPatternID = b.EventDistributionPatternID order by b.EventID, b.EventDistributionPatternID"
             mobjSqlDataReader = mobjDatabase.fnRetrieveData("DATAREADER", sql) 
             Do While mobjSqlDataReader.Read 
                 Dim day As New GridBoundColumn 
                 day.HeaderStyle.Width = Unit.Pixel(150) 
                 day.ItemStyle.Width = Unit.Pixel(150) 
                 columnDataField = "Day" & columnIndex 
                   
                 If mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim <> "" Then
                     day.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " " & mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim.Replace(">", "").Replace("<", "") & " Day"
                 Else
                     day.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " Day"
                 End If
                 day.DataField = columnDataField 
                 day.UniqueName = columnDataField 
                 Dim circSet1 As New GridBoundColumn 
                 circSet1.HeaderStyle.Width = Unit.Pixel(150) 
                 circSet1.ItemStyle.Width = Unit.Pixel(150) 
                 columnDataField = "CirculationSet" & columnIndex 
                   
                 If mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim <> "" Then
                     circSet1.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " " & mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim.Replace(">", "").Replace("<", "") & " Circ Set"
                 Else
                     circSet1.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " Circ Set"
                 End If
                 circSet1.DataField = columnDataField 
                 circSet1.UniqueName = columnDataField 
                 Dim release1 As New GridBoundColumn 
                 release1.HeaderStyle.Width = Unit.Pixel(150) 
                 release1.ItemStyle.Width = Unit.Pixel(150) 
                 columnDataField = "Release" & columnIndex 
                  
                 If mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim <> "" Then
                     release1.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " " & mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim.Replace(">", "").Replace("<", "") & " Release"
                 Else
                     release1.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " Release"
                 End If
                 release1.DataField = columnDataField 
                 release1.UniqueName = columnDataField 
                 Dim circulation As New GridBoundColumn 
                 circulation.HeaderStyle.Width = Unit.Pixel(150) 
                 circulation.ItemStyle.Width = Unit.Pixel(150) 
                 columnDataField = "Circulation" & columnIndex 
                   
                 If mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim <> "" Then
                     circulation.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " " & mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim.Replace(">", "").Replace("<", "") & " Circulation"
                 Else
                     circulation.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " Circulation"
                 End If
                 circulation.HeaderStyle.Wrap = True
                 circulation.DataField = columnDataField 
                 circulation.UniqueName = columnDataField 
                 rgExportSummary.MasterTableView.Columns.Add(day) 
                 rgExportSummary.MasterTableView.Columns.Add(circSet1) 
                 rgExportSummary.MasterTableView.Columns.Add(release1) 
                 rgExportSummary.MasterTableView.Columns.Add(circulation) 
                 columnIndex += 1 
             Loop
             mobjSqlDataReader.Close() 
         Catch ex As SqlException 
             Throw New Exception(ex.Message & ", SQL: " & sql & ",frmPlanner.exportZipDetail") 
         End Try
     Else
         Try
             sql = "Select * from ibuy.dbo.tmp_WB_BuyByReportsList" & UcHeader.SessionId & " order by EventID, EventDistributionPatternID"
             mobjSqlDataReader = mobjDatabase.fnRetrieveData("DATAREADER", sql) 
             Do While mobjSqlDataReader.Read 
                 Dim criteria As New GridBoundColumn 
                 criteria.HeaderStyle.Width = Unit.Pixel(150) 
                 criteria.ItemStyle.Width = Unit.Pixel(150) 
                 columnDataField = "Circulation" & columnIndex 
                   
                 If mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim <> "" Then
                     criteria.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " " & mobjSqlDataReader("EventDistributionPatternCode").ToString.Trim.Replace(">", "").Replace("<", "") & " Circulation"
                 Else
                     criteria.HeaderText = mobjSqlDataReader("EventName").ToString.Trim.Replace(">", "").Replace("<", "") & " Circulation"
                 End If
                 criteria.DataField = columnDataField 
                 criteria.UniqueName = columnDataField 
                 rgExportSummary.MasterTableView.Columns.Add(criteria) 
                 columnIndex += 1 
             Loop
             mobjSqlDataReader.Close() 
         Catch ex As SqlException 
             Throw New Exception(ex.Message & ", SQL: " & sql & ",frmPlanner.exportZipDetail") 
         End Try
     End If
     If columnIndex = 3 Then
         Dim difference As New GridBoundColumn 
         difference.HeaderStyle.Width = Unit.Pixel(150) 
         difference.ItemStyle.Width = Unit.Pixel(150) 
         difference.HeaderText = "Difference"
         difference.DataField = "Difference"
         difference.UniqueName = "Difference"
         rgExportSummary.MasterTableView.Columns.Add(difference) 
     End If
     If cbShowMinimumRequirements.Checked Then
         Dim sundayMinimum As New GridBoundColumn 
         sundayMinimum.HeaderStyle.Width = Unit.Pixel(50) 
         sundayMinimum.ItemStyle.Width = Unit.Pixel(50) 
         sundayMinimum.DataField = "SundayMinQty"
         sundayMinimum.HeaderText = "Sunday Minimum Quantity"
         sundayMinimum.UniqueName = "SundayMinQty"
         rgExportSummary.MasterTableView.Columns.Add(sundayMinimum) 
         Dim dailyMinimum As New GridBoundColumn 
         dailyMinimum.HeaderStyle.Width = Unit.Pixel(50) 
         dailyMinimum.ItemStyle.Width = Unit.Pixel(50) 
         dailyMinimum.DataField = "DailyMinQty"
         dailyMinimum.HeaderText = "Daily Minimum Quantity"
         dailyMinimum.UniqueName = "DailyMinQty"
         rgExportSummary.MasterTableView.Columns.Add(dailyMinimum) 
         Dim sundayCharge As New GridBoundColumn 
         sundayCharge.HeaderStyle.Width = Unit.Pixel(50) 
         sundayCharge.ItemStyle.Width = Unit.Pixel(50) 
         sundayCharge.DataField = "SundayMinCharge"
         sundayCharge.HeaderText = "Sunday Minimum Charge"
         sundayCharge.UniqueName = "SundayMinCharge"
         rgExportSummary.MasterTableView.Columns.Add(sundayCharge) 
         Dim dailyCharge As New GridBoundColumn 
         dailyCharge.HeaderStyle.Width = Unit.Pixel(50) 
         dailyCharge.ItemStyle.Width = Unit.Pixel(50) 
         dailyCharge.DataField = "DailyMinCharge"
         dailyCharge.HeaderText = "Daily Minimum Charge"
         dailyCharge.UniqueName = "DailyMinCharge"
         rgExportSummary.MasterTableView.Columns.Add(dailyCharge) 
     End If
     rgExportSummary.Rebind() 
     rgExportSummary.ExportSettings.Excel.Format = DirectCast([Enum].Parse(GetType(GridExcelExportFormat), "ExcelML"), GridExcelExportFormat) 
     rgExportSummary.ExportSettings.ExportOnlyData = True
     rgExportSummary.ExportSettings.OpenInNewWindow = True
     rgExportSummary.MasterTableView.ExportToExcel() 
 End Sub
 Protected Sub rgExportSummary_ExcelMLWorkBookCreated(sender As Object, e As Telerik.Web.UI.GridExcelBuilder.GridExcelMLWorkBookCreatedEventArgs) Handles rgExportSummary.ExcelMLWorkBookCreated 
     Dim index As Integer = 0 
     For Each row As RowElement In e.WorkBook.Worksheets(0).Table.Rows 
         If index = 0 Then
             For Each cell As CellElement In row.Cells 
                 cell.StyleValue = "Header"
             Next
         Else
             For Each cell As CellElement In row.Cells 
                 cell.StyleValue = "Detail"
             Next
         End If
         index += 1 
     Next
     Dim style As New StyleElement("Detail") 
     style.FontStyle.Bold = False
     style.FontStyle.FontName = "Arial"
     style.FontStyle.Size = 8 
     e.WorkBook.Styles.Add(style) 
     Dim header As New StyleElement("Header") 
     header.FontStyle.Bold = True
     header.FontStyle.FontName = "Arial"
     header.FontStyle.Size = 8 
     e.WorkBook.Styles.Add(header) 
 End Sub
 Protected Sub rgExportSummary_NeedDataSource(sender As Object, e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles rgExportSummary.NeedDataSource 
     Dim sSQL As String = ""
     Dim objDataTable As New DataTable 
     If export Then
         Try
             If cbBreakoutByProduct.Checked Then
                 sSQL = "select * from iBuy.dbo.Tmp_BuyByGeo_ForMultipleEvents_" & buyByReportID & " order by VendorMasterCD"
             Else
                 sSQL = "select * from iBuy.dbo.Tmp_BuyByGeo_ForMultipleEvents_" & buyByReportID & " order by VendorMasterCD, CirculationSet"
             End If
             objDataTable = GetDataTable(sSQL) 
             rgExportSummary.DataSource = objDataTable 
         Catch ex As SqlException 
             Throw New Exception(ex.Message & ", SQL: " & sSQL & ",frmPlanner.subLoadStates") 
         End Try
     End If
 End Sub

Grid

answered on 25 Sep 2015

1 answer

75 views

PanelBar - Sliding PanelBar

Hi,

Would I like to remove this line of code "<telerik:RadSkinManager ID="RadSkinManager1" runat="server" ShowChooser="true" />"

of your example "PanelBar - Sliding PanelBar : http://demos.telerik.com/aspnet-ajax/panelbar/examples/applicationscenarios/slidingpanelbar/defaultcs.aspx"

The problem is deleting this code the slide fails to collapse the panelbar.

Expand the panelbar -> works well

Collapse the panelbar -> Fail.

I tried to put ShowChooser="false" but does not work either.

Why?

Thanks

SkinManager