import.css=/download/attachments/6062824/tecnologia.css |
Indica se o método informado através de uma string por parâmetro existe na classe
MethIsMemberOf( < oObj >, < cMethName >, [ lRecursive ] ) |
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.) |
Nome | Tipo | Descrição |
---|---|---|
lRet | lógico | Retorna verdadeiro (.T.), se o método for encontrado; caso contrário, falso (.F.). |
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 |