Nesse vídeo demonstraremos em como extrair a informações classe instanciada em um objeto através da função ClassDataArr.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas #Include "TOTVS.ch" /*/{Protheus.doc} User Function zExe083 Exemplo de como extrair informações de um objeto para uma variável @type Function @author Atilio @since 09/12/2022 @obs Função ClassDataArr Parâmetros + Recebe um objeto instanciado Retorno + Retorna um array com todos os atributos **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao **** /*/ User Function zExe083() Local aArea := FWGetArea() Local aInfo Local oObjeto //Instancia uma classe oObjeto := TFont():New("Tahoma", , -12) //Extrai a informação para um Array aInfo := ClassDataArr(oObjeto) //Exibe uma mensagem com o tamannho do array FWAlertInfo("O array aInfo tem " + cValToChar(Len(aInfo)) + " elemento(s)", "Teste de ClassDataArr") FWRestArea(aArea) Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.