Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

paulo silva

Treeview

Mensagens Recomendadas

paulo silva

Boas pessoal estou com uma dúvida. tenho uma treeview dinâmica ligada à base de dados.

Consigo o url dependências etc.. agora queria saber se é possível alterar o tipo de letra, cor e tamanho de cada node lendo na base de dados do mesmo modo?

Cumprimentos Paulo Silva

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
ribeiro55

Do mesmo modo, como? Com os databinds ?

Penso que para alterar os nodes a esse nível precises de pós-processamento, depois de lá teres os dados ou carregando-os sem databinds.

Com sorte, talvez alguém me diga que estou errado.


Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
paulo silva

É assim que carrego a treeview

 Private Sub MtCarregarTreeView(ByVal ID As Integer, ByVal tvParentNode As TreeNode)
        If Session("PerfilAdmin") = Nothing Then
        Else
            Dim Codigo_sql As String = "SELECT * FROM Menu_vw WHERE MenuAntecedente=@MenuAntecedente and PerfilID = " & Session("PerfilAdmin") & " and MenuVisivel = 'true' order by MenuNr;"
            Dim conexao As New SqlConnection()
            conexao.ConnectionString = WebConfigurationManager.ConnectionStrings("Drigot_db").ConnectionString
            conexao.Open()
            Dim command As New SqlCommand(Codigo_sql, conexao)

            command.Parameters.Add("@MenuAntecedente", SqlDbType.Int).Value = ID
            Dim reader As SqlDataReader = command.ExecuteReader()
            Try

                If reader.HasRows Then
                    While reader.Read()

                        Dim MenuID As Integer = reader.Item("MenuID")
                        Dim MenuDescricao As String = reader.Item("MenuNome").ToString
                        Dim MenuUrl As String = reader.Item("MenuUrl").ToString
                        Dim MenuSize As FontSize = reader.Item("MenuSize").ToString
                        Dim tvNode As TreeNode

                        If tvParentNode Is Nothing Then

                            'Dim font As New TreeNodeStyle
                            'With font
                            '    .ForeColor = Drawing.Color.Yellow
                            'End With

                            Dim node As New TreeNode
                            With node
                                .Text = MenuDescricao
                                .Value = MenuID
                                .NavigateUrl = MenuUrl
                            End With

                            'tvMenu.NodeStyle.Font.Size = MenuSize

                            tvMenu.Nodes.Add(node)
                            tvNode = node


                        Else
                            Dim node As New TreeNode
                            With node
                                .Text = MenuDescricao
                                .Value = MenuID
                                .NavigateUrl = MenuUrl
                            End With
                            tvParentNode.ChildNodes.Add(node)
                            tvNode = node
                        End If

                        Call MtCarregarTreeView(MenuID, tvNode)

                    End While
                End If
            Catch ex As Exception
                MsgBox(ex.Message)
                MsgBox("Erro no carregamento - Tente novamente", MsgBoxStyle.Critical, "Tratamento de erro")
            Finally
                conexao.Close()
                command.Dispose()
                reader.Close()
            End Try

        End If
    End Sub

Já tentei como esta a comentado mas é obvio que assim é para a tree toda.

Cumprimentos Paulo Silva

Partilhar esta mensagem


Ligação 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

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.