TOTVSTEC

Árvore de páginas

Procura uma Annotation em uma propriedade de um objeto.

Sintaxe

Reflection.isAnnotationDataPresent( oObj, cPropertyName, cAnnotationName )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

oObj

objeto

Indica o objeto onde será procurado a Annotation.

X


cPropertyName

caractere

Indica o nome da propriedade onde será procurada a Annotation.

X


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

Retorno

Nome

Tipo

Descrição

lRet

lógico

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

Exemplos

exemplo1.tlpp
@annotation AnnotationExemplo
    nickname as char
@end


class MeuObjeto
	@AnnotationExemplo(nickname = "Company")
	public data data1
	public method new()
EndClass


main function usoDeAnnotation()
	local oObj := MeuObjeto():New()
	conout(Reflection.isAnnotationDataPresent(oObj, "data1", "AnnotationExemplo"))
	conout(Reflection.isAnnotationDataPresent(oObj, "data1", "Teste"))
return

Resultado do Exemplo

.T.

.F.

Abrangência

17.3.0.3

Veja também

  • Sem rótulos