Histórico da Página

XTree(): AddItem ( cPrompt,cCargo,cResource1,cResource2,nType,bAction,bRClick,bDblClick ) -->

DBTree(): AddTree ( [ cPrompt], [ lOpened], [ cRes1], [ cRes2], [ cFile1], [ cFile2], [ cCargo] ) -->

• A opção de múltiplas colunas definidas pelo parâmetro cHeaders do construtor New do objeto e alimentadas por valores separados por ponto e vírgula do parâmetro cPrompt deste método, está disponível somente em builds superiores à 7.00.120420A.

oTree:AddTree("Nível 02","010", "FOLDER6")

DBTree(): AddTreeItem ( [ cPrompt], [ cRes], [ cFile], [ cCargo] ) -->

• A opção de múltiplas colunas definidas pelo parâmetro cHeaders do construtor New do objeto e alimentadas por valores separados por ponto e vírgula do parâmetro cPrompt deste método, está disponível somente em builds superiores à 7.00.120420A.

oTree:AddTreeItem("Novo Item","FOLDER7",,"006")

DBTree(): BeginUpdate ( ) -->

Este método é muito importante na criação do objeto para que os ajustes de criação e performance sejam realizados corretamente.

oTree:BeginUpdate()

DBTree(): ChangeBmp ( [ cBmp1], [ cBmp2], [ cFile1], [ cFile2], [ cCargo] ) -->

oTree:ChangeBmp("LBNO","LBTIK",,,"001")

DBTree(): ChangePrompt ( [ cPrompt], [ cCargo] ) -->

• A opção de múltiplas colunas definidas pelo parâmetro cHeaders do construtor New do objeto e alimentadas por valores separados por ponto e vírgula do parâmetro cPrompt deste método, está disponível somente em builds superiores à 7.00.120420A.

oTree:ChangePrompt("Novo Texto Item 001","001")

DBTree(): DelItem ( ) -->

oTree:DelItem()

DBTree(): EndTree ( ) -->

oTree:EndTree()

DBTree(): EndUpdate ( ) -->

Este método é muito importante na criação do objeto para que os ajustes de criação e performance sejam realizados corretamente.

oTree:EndUpdate()

DBTree(): GetCargo ( ) --> cCargo

(caracter)
• Indica a chave de identificação do item selecionado na árvore.

oTree:GetCargo()

DBTree(): GetPrompt ( [ lSpace] ) --> cPrompt

(caracter)
• Retorna a descrição do item selecionado.

• A opção de múltiplas colunas definidas pelo parâmetro cHeaders do construtor New do objeto e alimentadas por valores separados por ponto e vírgula do parâmetro cPrompt deste método, está disponível somente em builds superiores à 7.00.120420A.

oTree:GetPrompt(.T.) // Result: "Subnível 01"

DBTree(): IsEmpty ( ) --> lIsEmpty

(logico)
• Retorna, verdadeiro (.T.), se a árvore estiver vazia; caso contrário, retornará falso (.F.).

oTree:IsEmpty() // Result: .F.

DBTree(): Nivel ( ) --> nNivel

()
• Retorna o nível do item selecionado, sendo que o primeiro item estará no nível 1, seus filhos no nível 2 e assim sucessivamente.

oTree:Nivel() // Result: 3

DBTree(): PTRefresh ( ) -->

oTree:PTRefresh()

DBTree(): PTSendTree ( < aNodes> ) -->

#include "TOTVS.CH"User Function PTSendTree()Local nX,nY,nZDEFINE DIALOG oDlg TITLE "Exemplo do PTSendTree" FROM 180,180 TO 550,700 PIXELaNodes := {}IMAGE1  := "" 	// Imagem quando nível estiver fechadoIMAGE2  := "" 	// Imagem quando nível estiver abertonLoop   := 690  // Quantidade de Loops - irá gerar 20010 ItensnCount	:= 0	// Simula ID dos itens da Tree//cTime1 := Time()// PRIMEIRO NÍVELfor nX := 1 to nLoop		nCount++	IMAGE1 := "FOLDER5"	aadd( aNodes, {'00', StrZero(nCount,7), "", "Primeiro Nível->ID: "+;	StrZero(nCount,7), IMAGE1, IMAGE2} )		// SEGUNDO NÍVEL	for nY := 1 to 7				nCount++		IMAGE1 := "FOLDER6"		aadd( aNodes, {'01', StrZero(nCount,7), "", "Segundo Nível->ID: "+;		StrZero(nCount,7), IMAGE1, IMAGE2} )				// TERCEIRO NÍVEL		for nZ := 1 to 3						nCount++			IMAGE1 := "FOLDER10"			aadd( aNodes, {'02',StrZero(nCount,7),"","Terceiro Nível->ID: "+;			StrZero(nCount,7), IMAGE1, IMAGE2} )					next nZ			next nY	next nX// Cria o objeto TreeoTree := DbTree():New(0,0,160,260,oDlg,,,.T.)// Método para carga dos itens da TreeoTree:PTSendTree( aNodes )ACTIVATE DIALOG oDlg CENTEREDReturn

DBTree(): PTSrvUpdatePosition ( ) -->

oTree:PTSrvUpdatePosition()

DBTree(): PTUpdateNodes ( < cNivel> ) -->

oTree:PTUpdateNodes( "005" )

DBTree(): Reset ( ) -->

oTree:Reset()

DBTree(): SetDisable ( ) -->

oTree:SetDisable()

DBTree(): SetEnable ( ) -->

oTree:SetEnable()

DBTree(): SetFlags( <nFlags> ) -->

#define TTREE_ISEDITABLE     1

oTree:SetFlags( TTREE_ISEDITABLE ) // Habilita possibilidade de edição do Prompt de cada item da árvore

DBTree(): Total ( ) --> nItens

()
• Retorna o número de itens na árvore.

oTree:Total() // Result: 8

DBTree(): TreeSeek ( < cCargo> ) --> lFind

(logico)
• Retorna, verdadeiro (.T.), se o cargo for localizado; caso contrário, retornará falso (.F.)

// Localiza o Cargo 001 e posiciona o cursor// para que o segundo nível seja criado abaixo dele// -----------------------------------------------------if oTree:TreeSeek("001")   oTree:AddItem("Segundo nível da DBTree","002", "FOLDER10",,,,2)	endif