TOTVSTEC

Árvore de páginas

Indica se o método informado através de uma string por parâmetro existe na classe

Sintaxe

MethIsMemberOf( < oObj >, < cMethName >, [ 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


cMethName

caractere

Indica o nome do método declarado na classe a ser pesquisado.

X


lRecursive

lógico

*Informa se a busca pelo método deve ser realizado nas classes pai, no caso de instância de classe com herança. (Default = .F.)



Retorno

Nome

Tipo

Descrição

lRet

lógico

Retorna verdadeiro (.T.), se o método for encontrado; caso contrário, falso (.F.).

Observações

  • A função procura dentro da classe informada por parâmetro se o método é declarado 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