Histórico da Página
...
Bloco de código | ||||
---|---|---|---|---|
| ||||
// Deficoes do treeview {utp/ut-4gltreeview.i} PROCEDURE afterDisplayFields : RUN carregaTreeView. RUN criaTreeView. END PROCEDURE. // Carregando o componente treeview PROCEDURE carregaTreeView : IF NOT VALID-HANDLE(h-4gltreeview) THEN DO: // Instancia o treeview RUN utp/ut-4gltreeview.w PERSISTENT SET h-4gltreeview. // Indica a Frame "Pai" do componente RUN setParentFrame IN h-4gltreeview (INPUT FRAME fPage0:HANDLE). // Inicializa o treeview RUN initializeObject IN h-4gltreeview. // Faz a subscricao dos eventos do treeview SUBSCRIBE TO "tvNodeEvent" IN h-4gltreeview. // Reposiciona o treeview RUN repositionObject IN h-4gltreeview (6.35, 2.00). // Ajusta o tamanho do treeview RUN resizeObject IN h-4gltreeview (10.70, 28.00). END. END PROCEDURE. // Cria os nodes no treeview PROCEDURE criaTreeView : // Limpa o treeview RUN emptyTree IN h-4gltreeview. ASSIGN c-codigo-node = "". // Logica para criar nos nodes do treeview ... RUN pi-create-node (cNodeId, cNodeIdPai, cDescNode, cImage, cOptn). ... // Faz o refresh do treeview RUN pi-atualizaTreeview. END PROCEDURE. // Procedure executada toda vez que ocorrer um evento de click em um node PROCEDURE pi-ClickTreeView : MESSAGE c-codigo-node VIEW_AS ALERT-BOX. END PROCEDURE. // Retira o treeview da memoria PROCEDURE beforeDestroyInterface : IF VALID-HANDLE(h-4gltreeview) THEN DO: RUN destroyObject IN h-4gltreeview. DELETE PROCEDURE h-4gltreeview. END. RETURN "OK". END PROCEDURE. |
Programas de exemplo no produto que estão utilizando este componente:
$/EMS2/Fontes_Doc/Sustentacao/V11/V11/progress/src/wmp/wm0370.w
$/EMS2/Fontes_Doc/Sustentacao/V11/V11/progress/src/wmp/wm0430.w
$/EMS2/Fontes_Doc/Sustentacao/V11/V11/progress/src/wmp/wm0510.w
05. DICAS DE CONVERSÃO DO OCX PARA O 4GLTREEVIEW Âncoradicas dicas
dicas | |
dicas |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas