or
dim x as integer = 0
Private
Sub
Page_Load(sender
As
Object
, e
As
EventArgs)
Handles
Me
.Load
panel_SideMenu.ExpandMode = PanelBarExpandMode.SingleExpandedItem
End
Sub
Private
Sub
setPanel(Of T)(
ByVal
list
As
List(Of T),
ByRef
ArrayNameFilds
As
Array, nameTitle
As
String
)
If
Not
IsPostBack
Then
Dim
radGridTmp
As
New
RadGrid
radGridTmp.DataSource = list
setColumnsOnGrid(radGridTmp, ArrayNameFilds)
radGridTmp.ClientSettings.Selecting.AllowRowSelect =
True
radGridTmp.ClientSettings.EnablePostBackOnRowClick =
False
radGridTmp.ClientSettings.Scrolling.AllowScroll =
True
Dim
radItemTmp
As
New
RadPanelItem()
radItemTmp.Text = nameTitle
radItemTmp.Controls.Add(radGridTmp)
Dim
radpanel
As
New
RadPanelItem
If
x = 0
Then
radpanel.Expanded =
True
End
If
radpanel.Items.Add(radItemTmp)
panel_SideMenu.Items.Add(radpanel)
x += 1
End
If
End
Sub
<
telerik:RadPanelBar
ID
=
"panel_SideMenu"
Runat
=
"server"
>
</
telerik:RadPanelBar
>
<
telerik:RadWindow
ID
=
"modalPopup"
runat
=
"server"
Modal
=
"true"
VisibleOnPageLoad
=
"false"
EnableViewState
=
"false"
Width
=
"1105px"
Height
=
"600px"
>
<
ContentTemplate
>
<
div
id
=
"FullScreenGridLayer"
style
=
"float: none; clear: both;"
>
<
telerik:RadPivotGrid
ID
=
"RadPivotFullScreenGrid"
runat
=
"server"
AllowPaging
=
"true"
Skin
=
"Windows7"
AggregatesPosition
=
"Columns"
OnPreRender
=
"PivotFullScreenGrid_PreRender
>
<
PagerStyle
ChangePageSizeButtonToolTip
=
"Change Page Size"
PageSizeControlType
=
"RadComboBox"
>
</
PagerStyle
>
<
Fields
>
<
telerik:PivotGridColumnField
DataField
=
"SaleDate"
GroupInterval
=
"Year"
IsHidden
=
"false"
UniqueName
=
"DateByYear"
Caption
=
"Year"
ShowGroupsWhenNoData
=
"true"
>
</
telerik:PivotGridColumnField
>
<
telerik:PivotGridColumnField
DataField
=
"SaleDate"
GroupInterval
=
"Month"
ShowGroupsWhenNoData
=
"true"
UniqueName
=
"DateByMonth"
Caption
=
"Month"
>
</
telerik:PivotGridColumnField
>
<
telerik:PivotGridRowField
DataField
=
"PCName"
Caption
=
"PC Center"
UniqueName
=
"PCName"
>
</
telerik:PivotGridRowField
>
<
telerik:PivotGridRowField
DataField
=
"ManagerName"
Caption
=
"A/C Manager"
UniqueName
=
"ManagerName"
>
</
telerik:PivotGridRowField
>
<
telerik:PivotGridRowField
DataField
=
"RepName"
Caption
=
"Agent"
UniqueName
=
"RepName"
CellStyle-BorderStyle
=
"Dashed"
>
</
telerik:PivotGridRowField
>
<
telerik:PivotGridAggregateField
DataField
=
"Units"
GrandTotalAggregateFormatString
=
""
UniqueName
=
"Units"
CellStyle-BorderStyle
=
"Dashed"
>
</
telerik:PivotGridAggregateField
>
</
Fields
>
</
telerik:RadPivotGrid
>
</
div
>
</
ContentTemplate
>
</
telerik:RadWindow
>
function
addNewTab() {
var
tabstrip = $find(
'<%=RadTabStrip1.ClientID%>'
);
tabstrip.trackChanges();
var
tab =
new
Telerik.Web.UI.RadTab();
tab.set_text(
"Root Tab 4"
);
tabstrip.get_tabs().add(tab);
tabstrip.commitChanges();
var
multiPage = $find(
"<%= RadMultiPage1.ClientID %>"
);
multiPage.trackChanges();
var
pageView =
new
Telerik.Web.UI.RadPageView();
pageView.set_id(
"Page14"
);
pageView.set_contentUrl(
"<%=this.Page.ResolveUrl("
~/page.aspx
")%>"
);
pageView.set_selected(
true
);
pageView.set_Height(
"100%"
);
// here i want to set height
multiPage.get_pageViews().add(pageView);
multiPage.commitChanges();
}