TOTVSTEC

Árvore de páginas

Retorna um array com o nome da classe e das classes herdadas por ordem de herança.

Sintaxe

GetParentTree( < oObjeto > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

oObjeto

objeto

Indica o objeto o qual deseja saber o nome da classe e sua herança

X

 

Retorno

Nome

Tipo

Descrição

aRet

vetor

Um array de caracteres com os nomes das classes herdadas

Exemplos

Class ClasseVo From LongNameClass
  Method New()
  Method Fala()
EndClass

Method New() Class ClasseVo
Return

Method Fala() Class ClasseVo
  conout("Oi")
Return

Class ClassePai From ClasseVo
  Method New()
EndClass

Method New() Class ClassePai
Return

Class ClasseFilho From ClassePai
  Method New()
EndClass

Method New() Class ClasseFilho
Return

User Function heranca()
  local oObj := ClasseFilho():New()
  local ret := GetParentTree(oObj)
  conout( ret[1] )
  conout( ret[2] )

  ret := GetParentTree("ClasseFilho")
  conout( ret[1] )
  conout( ret[2] )

  ret := GetParentTree("ClassePai")
  conout( ret[1] )

  ret := GetParentTree("ClasseVo")
  conout( len(ret) )
  conout(FindFunction("GetParentTree") )
Return

Abrangência

Totvstec 2.0, a partir de julho de 2015.

  • Sem rótulos