Histórico da Página
...
Pagetitle | ||||
---|---|---|---|---|
|
Procura e retorna uma Annotation em uma propriedade de um objeto.
...
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 X | |
cAnnotationName | caractere | Indica o nome da Annotation que será procurada. | X |
Retorno
Nome | Tipo | Descrição |
---|---|---|
jRet | JsonObjectobjeto | Retorna o object Json caso encontre a um objeto do tipo Json contendo o valor da Annotation na propriedade do objeto passado indicada e NIL caso não encontre. |
Exemplos
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
@annotation AnnotationExemplo#include "tlpp-object.th" @annotation DataAnnotation nickname as char @end Class GetDataAnnotation class MeuObjeto @AnnotationExemplo @DataAnnotation(nickname = "Company") public Public data data1 public method new Public Method New() EndClass main function usoDeAnnotation() localMethod New() class GetDataAnnotation Return Self Function u_testGetDataAnnotation() Local oObj := MeuObjetoGetDataAnnotation():New() local Local jRet if If ( Reflection.isAnnotationDataPresent(oObj, "data1", "AnnotationExemploDataAnnotation") ) jRet := Reflection.getDataAnnotation(oObj, "data1", "AnnotationExemploDataAnnotation") conout Conout(jRet["NICKNAMEnickname"]) endif return EndIf Return |
Resultado do Exemplo
Company
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas