Method:toString

Method:toString()

//Definicoes das annotation, deve estar num fonte
#include "tlpp-object.th"

@annotation metodo
@end

@annotation classeMetodo
@end

@classeMetodo()
Class NovaClasseMetodo


	@metodo()
	Public Method MetodoTeste()

	Public Method New()
endclass


Method New() class NovaClasseMetodo
	
return self

Method MetodoTeste() class NovaClasseMetodo
	
return

Main Function testeMetodo()
	local ObjMethod
	local classes
	local obj1
	
	classes := Reflection.getClassesByAnnotation("classeMetodo", "") // vazio para pegar todas as classes do repositorio
	
	obj1 := classes[1]:CreateInstance()
	
	ObjMethod := Reflection.getMethodsObjectByAnnotation(obj1, "metodo")
	conout(ObjMethod[1]:toString())
	
return