Errro ao carregar valor no objeto TreeView

Bom dia,
Estou tentando carregar descrições no objeto TreeView toda vez que a tela (Xcontrol) será aberta mas esta esta dando erro.

2021-06-09_090821

script para carregar os dados

2021-06-09_091747

Bom dia @jeferson1,

Use o AppBrowser para achar a correta referência para o objeto Treeview.

Acredito que a referência que você utilizou está incorreta:

Set treeview = Screen.Item(“treeview1”)

Provavelmente a sintaxe correta será:

Set treeview = Item(“treeview1”)

Realmente era referência.

outra duvida é, como eu aplico um comando sobre item selecionado ?

tt

@jeferson1,

O mais coerente é fazer isso em 2 etapas.

Primeiro, você deve usar o evento nodeclick do objeto treeview para armazenar as informações do nó selecionado.

Em seguida, usando um CommandButton você define o que fazer com a informação obtida anteriormente.

Ex.:

1 - Criei um tag Interno com o nome de Selecao.

2 - Usei o seguinte Script no Evento NodeClick:

Sub TreeView1_NodeClick(Node)
    Screen.Item("Selecao").Value = Node.Key
End Sub

3 - Criei um botão e coloquei o comando desejado:

Sub CommandButton1_Click()
	 MsgBox "A chave do objeto selecionado é: " & Screen.Item("Selecao").Value
End Sub
2 Likes