TabStrip and controls at runtime (CodeBehind)

[Luiz]

Hi,

I'm trying to create a page with TabStrip+Multipage+PanelBar+TextBox but it isn't work.
Somebody can help me?

Following my code:

Imports Telerik.Web.UI

Partial Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        'Multipage
        Dim myMultipage As New RadMultiPage
        myMultipage.ID = "myMultipage"
        myMultipage.ScrollBars = MultiPageScrollBars.Auto

        'Tabs
        Dim tabProduto As New RadTab
        tabProduto.Text = "Produtos"
        tabProduto.PageViewID = tabProduto.Text
        Dim tabCliente As New RadTab
        tabCliente.Text = "Clientes"
        tabCliente.PageViewID = tabCliente.Text
        Dim tabCondPag As New RadTab
        tabCondPag.Text = "Condições de Pagamento"
        tabCondPag.PageViewID = tabCondPag.Text
        Dim tabfornecedor As New RadTab
        tabfornecedor.Text = "Fornecedores"
        tabfornecedor.PageViewID = tabfornecedor.Text

        'TabStrip
        Dim myTabStrip As New RadTabStrip
        myTabStrip.MultiPageID = "myMultipage"
        myTabStrip.Tabs.Add(tabProduto)
        myTabStrip.Tabs.Add(tabCliente)
        myTabStrip.Tabs.Add(tabCondPag)
        myTabStrip.Tabs.Add(tabfornecedor)

        'PageView
        Dim pagviewProduto As New RadPageView
        pagviewProduto.ID = tabProduto.Text
        Dim pagviewCliente As New RadPageView
        pagviewCliente.ID = tabCliente.Text
        Dim pagviewCondPag As New RadPageView
        pagviewCondPag.ID = tabCondPag.Text
        Dim pagviewFornecedor As New RadPageView
        pagviewFornecedor.ID = tabfornecedor.Text

        'Controles da TabCliente (My classes inherited from Textboxes)
        Dim myTextBox As New gInputText("Nome", 80)
        Dim myTextBox2 As New gInputText("Endereço", 80)
        Dim myTextBox3 As New gInputText("Bairro", 50)
        Dim myTextBox4 As New gInputText("Cidade", 50)

        'Painel Principal da aba TabCliente
        Dim myGroupParent As New RadPanelBar
        myGroupParent.Width = 900
        myGroupParent.ExpandMode = PanelBarExpandMode.FullExpandedItem
        myGroupParent.Skin = "Office2007"

        'Grupo Dados Gerais do cliente
        Dim myGroup As New RadPanelItem
        myGroup.Expanded = True
        myGroup.Text = "Dados Gerais do Cliente"
        myGroup.Selected = True
        myGroup.Controls.Add(myTextBox)
        myGroup.Controls.Add(myTextBox2)
        myGroup.Controls.Add(myTextBox3)
        myGroup.Controls.Add(myTextBox4)
        myGroupParent.Items.Add(myGroup)

        tabCliente.Controls.Add(myGroupParent)
        Panel1.Controls.Add(myTabStrip)

    End Sub

End Class

Tks

Luiz

[Princy]

Hello Luiz,

Form this demo,I found there is a better approach for adding the controls in the PageViewCreated  event other than from PageLoad event. .please try with that method and check whether that works.

Thanks,
Princy.

[Luiz]

Princy,

I know this demo but my problem is:

I can´t add TextBoxes under RadPanel under TabStrip under TabStrip/Pageview.
If you run my project you see that RadPanel will not be under Pageview  :-(

Can you help me?

Tks

Luiz

[Dimitar Terziev]

Hello Luiz,

I've prepared a small example based on your code showing what you need.

Best wishes,
Dimitar Terziev
the Telerik team

[Luiz]

Dimitar 

Tks for your support.
I wil test this code and implement on my system.

PS: Can I add javascript on my ASPX at runtime also?

Tks

Luiz

[Dimitar Terziev]

Hello Luiz,

For adding javascript into your page during runtime you could check this post here.

All the best,
Dimitar Terziev
the Telerik team

[Luiz]

Dimitar 

This page doesn´t open!

Tks

Luiz

[Yana]

Hi Luiz,

Please try it again here.

Regards,
Yana
the Telerik team

[Luiz]

Yana 

Fantastic! I think this is solve my problem.
I will try, if I have problems, I ask for help

Tks

Luiz