Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Pagetitle
Reflection.isAnnotationObjectPresent
Reflection.isAnnotationObjectPresent

Procura Efetua a busca de uma Annotation em um objeto.

Sintaxe

Bloco de código
collapsefalse
Reflection.isAnnotationObjectPresent( oObjxParam, cAnnotationName )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

oObj
xParam

objeto

Indica o objeto

/caracter**

Objeto instância da classe/nome da classe** onde será procurado/a a Annotation.

X


cAnnotationName 

caractere

Indica o nome

Nome da Annotation que será procurada.

X


Informações
titleImplementação de comportamento

A partir do build 24.3.0.0, também haverá a opção de passar simplesmente o nome da classe em xParam, conforme exemplo 2. Mas continua valendo a passagem da instância do objeto (exemplo 1). 

Retorno

Nome

Tipo

Descrição

lRet

numéricologico

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

...

Bloco de código
languagecpp
themeEclipse
titleExemplo 1exemplo1.tlpp
linenumberstrue
collapsefalse
@interface AnnotationExemplo
    #include "tlpp-core.th"

@annotation AnnotationIsAnnotationObjectPresent
nickname as char
@end

@AnnotationExemplo@AnnotationIsAnnotationObjectPresent(nickname = "Company")
classClass MeuObjetoIsAnnotationObjectPresent
	publicPublic data data1
	public method newMethod New()
EndClass


main function usoDeAnnotation()
	localMethod New() class IsAnnotationObjectPresent
Return Self

Function u_testIsAnnotationObjectPresent(aResult)

	Local oObj := MeuObjetoIsAnnotationObjectPresent():New()
	
	conoutConout(Reflection.isAnnotationObjectPresent(oObj, "AnnotationExemploAnnotationIsAnnotationObjectPresent"))
	conoutConout(Reflection.isAnnotationObjectPresent(oObj,"Teste "NoExist"))
Return
Bloco de código
languagecpp
themeEclipse
titleexemplo2.tlpp
linenumberstrue
#include "tlpp-core.th"

@annotation AnnotationIsAnnotationObjectPresent
nickname as char
@end

@AnnotationIsAnnotationObjectPresent(nickname = "Company")
Class IsAnnotationObjectPresent
	Public Method New()
EndClass

Method New() class IsAnnotationObjectPresent
Return Self

Function u_testIsAnnotationObjectPresent(aResult)

	Conout(Reflection.isAnnotationObjectPresent("IsAnnotationObjectPresent", "AnnotationIsAnnotationObjectPresent"))
	Conout(Reflection.isAnnotationObjectPresent("IsAnnotationObjectPresent", "NoExist"))
returnReturn

Resultado

...

dos Exemplos

.T.

.F.

Abrangência

17.3.0.3

...