Árvore de páginas

Indica se uma propriedade informada através de uma string por parâmetro existe na classe.

Sintaxe

AttIsMemberOf( < oObj >, < cAttName >, [ lRecursive ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

oObj

objeto

Indica o objeto que representa a instância da classe a ser pesquisada.

X

 

cAttName

caractere

Indica o nome da propriedade a ser pesquisada.

X

 

lRecursive

lógico

*Indica se as classes superiores também devem ser pesquisada, caso a instância atual possua herança. ( Default = .F. )

 

 

Retorno

Nome

Tipo

Descrição

lRet

lógico

Retorna verdadeiro (.T.), se a propriedade for encontrada; caso contrário, falso (.F.).

Observações

  • A função AttlsMemberOf() procura dentro da instância da classe informada por parâmetros, se a propriedade é declarada (existe) dentro da classe.
  • Função disponível, na linguagem AdvPL, para build superior a 090818P.
    *Parâmetro novo, disponibilizado a partir da Build 7.00.131227A, com data de geração superior a 11/11/2014.

Exemplos

Exemplo 1
Class classA from LONGNAMECLASS 
  data fcA1 
  data fnA2 
  data flA3 
  data fdA4 
  data faA5 
  method new(c,n,l,d,a) constructor 
  method exibeA() 
  method exibeB() 
endclass

Method new(c,n,l,d, a) class classA 
  fcA1 := c 
  fnA2 := n 
  flA3 := l 
  fdA4 := d 
  faA5 := a
Return

Method exibeA() class classA 
  varinfo("fcA1", fcA1) 
  varinfo("fnA2", fnA2) 
  varinfo("flA3", flA3) 
  varinfo("fdA4", fdA4) 
  varinfo("faA5", faA5)
Return

Method exibeB() class classA 
  conout("fcA1", fcA1) 
  conout("fnA2", fnA2) 
  conout("flA3", flA3) 
  conout("fdA4", fdA4)
Return

User Function tstcls()
  Local oObj := classA():New() 
  varinfo( "1", AttIsMemberOf(oObj , "xuxu") ) // false
  varinfo( "2", AttIsMemberOf(oObj , "FDA4") ) // true
  varinfo( "3", MethIsMemberOf(oObj , "exibeA") ) //true
  varinfo( "4", MethIsMemberOf(oObj , "exibeB") ) //true
  varinfo( "5", MethIsMemberOf(oObj , "exibeC") ) //false
Return
  • Sem rótulos