ESSE ESTA COMPLICADO....

GERMANO 26/09/2009 00:12:08
#323692
Por favor abram o projeto [Ô]TESTE AQUI.vbg[Ô], e vejam se conseguem descobrir o erro.
LLAIA 26/09/2009 01:01:00
#323695
aqui tá travando quando tento rodar. é isso que ocorre aí?
GERMANO 26/09/2009 07:24:51
#323699
Ops, desculpem:
Registrem antes de rodar o sistema, tem um instala.bat
ASHKATCHUP 26/09/2009 11:36:03
#323710 Resposta escolhida
Deleta os dois treeview e cria eles novamente. Ficaram iguais.
GERMANO 26/09/2009 12:48:15
#323720


Citação:

ASHKATCHUP escreveu:
Deleta os dois treeview e cria eles novamente. Ficaram iguais.



Ok. mais quero com as Checkbox = true
ASHKATCHUP 26/09/2009 13:17:12
#323724
Deleta os dois cTreeview. Cria eles denovo e executa esse código: 


Option Explicit

Private Sub preenche(cTree As cTreeView)
    Dim cat1                            As cTreeViewNode
    Dim cat2                            As cTreeViewNode
    [ô]
    Set cat1 = cTree.Nodes.Add(, , [Ô]teste[Ô], [Ô]teste[Ô])
    Set cat2 = cTree.Nodes.Add(cat1, , [Ô]111[Ô], [Ô]111[Ô])
    cat2.Checked = True
    Set cat2 = cTree.Nodes.Add(cat1, , [Ô]222[Ô], [Ô]222[Ô])
    cat2.Checked = True
    Set cat2 = cTree.Nodes.Add(cat1, , [Ô]333[Ô], [Ô]333[Ô])
    cat2.Checked = True
    [ô]
    cat1.Expanded = True
End Sub

Private Sub Command1_Click()
    preenche cTreeView2
End Sub

Private Sub Form_Load()
    [ô]
    cTreeView1.CheckBoxes = True
    cTreeView2.CheckBoxes = True
    [ô]
    preenche cTreeView1
End Sub
GERMANO 26/09/2009 14:10:58
#323735

Valeu mesmo !!!!

ASHKATCHUP
Tópico encerrado , respostas não são mais permitidas
Voltar