Histórico da Página

...

Procedure

Parâmetros

Descrição

Exemplo/Utilização

addNode *

	Parâmetros	Tipo	Descrição
I	pcKe	Char	Chave do node
I	pcKePar	Char	Pai do node
I	pcLabel	Char	Label do node
I	pcIco	Char	Ícone do node
I	pcOptn	Char	Parâmetros do node

Adiciona um node no treeview.

Se o node for adicionado a um

node pai, ele será o último filho.

DO ON ERROR UNDO, LEAVE:
    RUN addNode IN h-treeview ("n1","","node1","","") NO-ERROR.
    RUN addNode IN h-treeview ("n2","","node2","","expanded") NO-ERROR.
    RUN addNode IN h-treeview ("n21","n2","node21","","") NO-ERROR.
    RUN addNode IN h-treeview ("n22","n2","node22","","expanded").
    RUN addNode IN h-treeview ("n221","n22","node221","image/book02.bmp","").
    RUN addNode IN h-treeview ("n222","n22","node222","image/book02.bmp","").
    RUN addNode IN h-treeview ("n3","","node3","present1.bmp","expanded").
    RUN addNode IN h-treeview ("n31","n3","node31","image/$.bmp","").
    RUN addNode IN h-treeview ("n4","","node4","image/smile56.bmp","").
END.

applyEntry

Passar o parâmetro vazio ("")

Faz um entry no treeview

RUN applyEntry IN h-treeview (INPUT "").

deleteNode

	Parâmetro	Tipo	Descrição
I	pcKe	Char	Chave do node
I	pcOptn	Char	Parâmetros do node

Elimina um node de uma chave especificada.

RUN deleteNode IN h-treeview (c-codigo-node, "refresh").

destroyObject

Elimina o treeview da memória.

IF  VALID-HANDLE(h-treeview) THEN DO:

    RUN destroyObject IN h-treeview.

    DELETE PROCEDURE h-treeview NO-ERROR.

END.

emptyTree

Zera o conteúdo da treeview.

RUN emptyTree IN h-treeview NO-ERROR.

enableObject

Habilita o treeview

RUN enableObject IN h-treeview NO-ERROR.

expandBranch

	Parâmetro	Tipo	Descrição
I	pcKe	Char	Chave do node

Expande o node e todos os filhos dele

RUN expandBranch IN h-treeview (c-codigo-node) NO-ERROR.
RUN pi-atualizaTreeview.
Obs: Ao fazer o expandBranch não esqueça de fazer o Refresh para atualizar o treeview na tela.

getFrameTreeview

	Parâmetro	Tipo	Descrição
O	hFrame	Handle	Handle da frame do treeview

Retorna o handle da frame do treeview

RUN getFrameTreeview IN h-treeview (OUTPUT hFrameTV).

getNodeDetails

	Parâmetro	Tipo	Descrição
I	pcKe	Char	Chave do node

Retorna detalhes de um node do treeview

RUN getNodeDetails IN h-treeview (c-codigo-node, OUTPUT hNdBf).

MESSAGE 
    "id:" hNdBf:BUFFER-FIELD("id"):BUFFER-VALUE SKIP
    "label:" hNdBf:BUFFER-FIELD("lab"):BUFFER-VALUE SKIP
    "ico:" hNdBf:BUFFER-FIELD("ico"):BUFFER-VALUE SKIP
    "level:" hNdBf:BUFFER-FIELD("level"):BUFFER-VALUE SKIP
       "paramparent:" hNdBf:BUFFER-FIELD("par"):BUFFER-VALUE SKIP
    "prev-sibling:" hNdBf:BUFFER-FIELD("pre"):BUFFER-VALUE SKIP
    "next-sibling:" hNdBf:BUFFER-FIELD("nex"):BUFFER-VALUE SKIP
    "expanded:" hNdBf:BUFFER-FIELD("expanded"):BUFFER-VALUE SKIP
    "optn:" hNdBf:BUFFER-FIELD("optn"):BUFFER-VALUE
    VIEW-AS ALERT-BOX INFO BUTTONS OK.

DELETE OBJECT hNdBf.

initializeObject

Inicializa o treeview

RUN initializeObject IN h-treeview.

moveNode

	Parâmetro	Tipo	Descrição
I	pcKe	Char	Chave do node a mover
I	pcToKe	Char	Mover para o node
I	pcMode	Char	Modos possíveis: after, before, parent
I	pcOptn	Char	Opção possível: refresh

Move um node origem como filho de outro node destino. Caso o pcMode = "parent" e o node destino seja em branco, ele jogara o node origem como o último node do nível 0.

RUN moveNode IN h-treeview 
    (c-codigo-node, c-codigo-node-pai, "after", "refresh") NO-ERROR.

updateNode *

	Parâmetro	Tipo	Descrição
I	pcKe	Char	Chave do node a mover
I	pcFieldNames	Char	List de campos, exemplo: "lab,ico"
I	pcFieldValues	Char	Lista de valores separados por chr(1)
I	pcOptn	Char	Parâmetros do node

Atualiza o label, ícone ou a lista de opções de um determinado node.

RUN updateNode IN h-treeview 
    (c-codigo-node, "", "", cFgColor) NO-ERROR.

...

Árvore de páginas

Versões comparadas

Versão antiga 18

Nova versão 19

Chave