import.css=/download/attachments/6062824/tecnologia.css

Procura uma Annotation em uma propriedade de um objeto.

Sintaxe

Reflection.isAnnotationMethodPresent( oObj, cMethodName, cAnnotationName )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

oObj

objeto

Indica o objeto onde será procurado a Annotation.

X


cMethodName

caractere

Indica o nome do método onde será procurada a Annotation.

X


cAnnotationName
caractereIndica o nome da Annotation que será procurada. X

Retorno

Nome

Tipo

Descrição

lRet

numérico

Retorna .T. caso encontre a Annotation e .F. caso não encontre.

Exemplos

@interface AnnotationExemplo
    nickname as char
@end
 
 
class MeuObjeto
    public data data1
    public method new()
    @AnnotationExemplo(nickname = "Company")
	public method exemplo()
EndClass
 
 
main function usoDeAnnotation()
    local oObj := MeuObjeto():New()
    conout(Reflection.isAnnotationMethodPresent(oObj, "exemplo", "AnnotationExemplo"))
    conout(Reflection.isAnnotationMethodPresent(oObj, "exemplo", "Teste"))
return

Resultado do Exemplo

.T.

.F.

Abrangência

17.3.0.3

Veja também