Error while adding multiple Chunks

[Clatonh]

Hello everyone,

    Not sure if this has been discussed before, But I am using a code mentioned in the Help to add multiple chunks.

Dim RadRibbonBarChunk1 As RadRibbonBarChunk = New RadRibbonBarChunk()
Dim RadRibbonBarChunk2 As RadRibbonBarChunk = New RadRibbonBarChunk()
Dim RadRibbonBarChunk3 As RadRibbonBarChunk = New RadRibbonBarChunk()
RadRibbonBarChunk1.Text = "Options"
RadRibbonBarChunk2.Text = "Text"
RadRibbonBarChunk3.Text = "Alignment"
Dim RadRibbonBarCommandTab1 As RadRibbonBarCommandTab = radRibbonBar1.CommandTabs(0)
RadRibbonBarCommandTab1.Items.AddRange(New Telerik.WinControls.RadElement() { _
    RadRibbonBarChunk1, RadRibbonBarChunk2, RadRibbonBarChunk3})

Unfortunately it gives me an Error in the above statement, 
System.InvalidCastException was unhandled
  Message="Unable to cast object of type 'Telerik.WinControls.RadElement[]' to type 'Telerik.WinControls.RadItem[]'."

Can someone help me to add multiple chunks or tell me what am I doing wrong here...

Regards
Clatonh

[Dwight]

Hi Claton,

There is a typo in the documentation, which will fixed for SP2. You should be creating a collection of RadItems instead of a collection of RadElements. Change your code to look like this and you should be fine:

Dim RadRibbonBarChunk1 As RadRibbonBarChunk = New RadRibbonBarChunk()
Dim RadRibbonBarChunk2 As RadRibbonBarChunk = New RadRibbonBarChunk()
Dim RadRibbonBarChunk3 As RadRibbonBarChunk = New RadRibbonBarChunk()
RadRibbonBarChunk1.Text = "Options"
RadRibbonBarChunk2.Text = "Text"
RadRibbonBarChunk3.Text = "Alignment"
Dim RadRibbonBarCommandTab1 As RadRibbonBarCommandTab = radRibbonBar1.CommandTabs(0)
RadRibbonBarCommandTab1.Items.AddRange(New Telerik.WinControls.RadItem() { _
    RadRibbonBarChunk1, RadRibbonBarChunk2, RadRibbonBarChunk3})

Regards,
Evtim
the Telerik team

Instantly find answers to your questions at the new Telerik Support Center

[Clatonh]

Thanks a lot Evtim, this solves the prb.

Regards,
Claton