• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

ricardoantunes

[Resolvido] RadCombobox

5 mensagens neste tópico

Viva!

Depois de andar aqui a investigar para a minha futura suite de controlos, e a conselho do jpaulino, resolvi experimentar a suite da Telerik. Aquilo tem mesmo bom aspecto e à partida deve ser a que vou comprar. Mas como não há bela sem senão, não consigo fazer uma coisa básica.. não consigo adicionar itens numa combobox... recebo a mensagem:

Error 2 Value of type 'Telerik.WebControls.RadComboBoxItem' cannot be converted to 'Telerik.WinControls.RadItem'.

Já adicionei (penso eu) todos os imports.. vi dezenas de exemplos e nada.. Estou em visual basic 2008 pro. Alguém me pode ajudar?

Gracias.

Ricardo

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Olá Ricardo,

Sem código é dificil, mas parece que estás a usar um WebControls em windowsforms ou WinControls em web.

Esclarece melhor isto e mostra algum código.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

           

 Dim element As RadComboBoxItem = New RadComboBoxItem()
            Dim Teste As New RadComboBoxItem()



            mSQL = "select distinct Familia, Descricao from Familia order by familia"
            Liga1 = Ligacao.OpenSQL(mSQL)
            cmbFamilia.Items.Clear()

            If Liga1.Tables("OpenSQL").Rows.Count > 0 Then
                For i = 0 To Liga1.Tables("OpenSQL").Rows.Count - 1
                    If Not IsDBNull(Liga1.Tables("OpenSQL").Rows(i).Item("Familia")) Then
                        If Trim(Liga1.Tables("OpenSQL").Rows(i).Item("Familia")) <> "" Then
                            Familia = Space(5 - Len(Trim(Liga1.Tables("OpenSQL").Rows(i).Item("Familia")))) & Trim(Liga1.Tables("OpenSQL").Rows(i).Item("Familia") & " - " & Liga1.Tables("OpenSQL").Rows(i).Item("Descricao"))
                            cmbFamilia.Items.Add(Familia)
                            Teste.Text = Familia
                            RadComboBox1.Items.Add(element)
                        End If
                    End If
                Next i
            End If

Tenho um combo normal e queria substituir pela radcombo...

dá erro aqui:                             RadComboBox1.Items.Add(element)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Imports Telerik.WinControls.UI

    Private Sub CarregaFamilia()

        Try

            Dim Liga1 As DataSet

            Dim Ligacao As New clsLigacao

            Dim i As Long

            Dim Familia As String

            Dim element As RadComboBoxItem = New RadComboBoxItem()

            Dim Teste As New RadComboBoxItem()

            mSQL = "select distinct Familia, Descricao from Familia order by familia desc"

            Liga1 = Ligacao.OpenSQL(mSQL)

            cmbFamilia.Items.Clear()

            If Liga1.Tables("OpenSQL").Rows.Count > 0 Then

                For i = 0 To Liga1.Tables("OpenSQL").Rows.Count - 1

                    If Not IsDBNull(Liga1.Tables("OpenSQL").Rows(i).Item("Familia")) Then

                        If Trim(Liga1.Tables("OpenSQL").Rows(i).Item("Familia")) <> "" Then

                            Familia = Space(5 - Len(Trim(Liga1.Tables("OpenSQL").Rows(i).Item("Familia")))) & Trim(Liga1.Tables("OpenSQL").Rows(i).Item("Familia") & " - " & Liga1.Tables("OpenSQL").Rows(i).Item("Descricao"))                           

                            cmbFamilia.Items.Insert(0, New RadComboBoxItem(Familia))

                        End If

                    End If

                Next i

            End If

        Catch ex As Exception

            MsgBox(Err.Description, MsgBoxStyle.Critical)

        End Try

    End Sub

Aqui está a solução... Não percebi o porquê, mas com a versão Q1 não dava.. só com a versão Q2..

Mas seja lá como for, aqui está uma possível solução para quem posso ajudar...

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora