ClassDataArr [AS]
Autor: Eurai Criado: 01/01/2016 Atualizado: 27/07/2021Descrição
| Retorna um array multidimensional com todas as informações das propriedades da instância da classe contida no objeto informado como parâmetro. |
Sintaxe
| ClassDataArr( |
Parâmetros
| Par | Nome | Tipo | Descrição | Default | Obg | Ref |
| 01 |
oObj | Objeto | Indica um objeto para obter os dados / propriedades | X | ||
| 02 | lParent | Boolean | Se verdadeiro (.T.) retorna todos os parametros, inclusive os parâmetros herdados de outras classes, adiciona o nome da classe na 4ª coluna do array |
Retorno
| Retorno | Tipo | Descrição |
| aRet | Array |
Retorna um array multidimensional com todas as informações das propriedades da instância da classe contida no objeto informado como parâmetro |
Exemplo
#INCLUDE "TOTVS.CH"
User Function ClassDataArr()
Local oSay01 := TSay():New( 010,005,{|| "UA:" },GetWndDefault(),,,.F.,.F.,.F.,.T.,,,550,008)
VarInfo( 'TSay: ', ClassDataArr( oSay01 ) )
Return( Nil )
Resultado
Informações adicionais
|
(*) O número ID é meramente informativo, e mostrado apenas para classes da linguagem Advpl |
|
(**) A quarta coluna do array, correpondendo ao nome da classe de referência somente é retornado caso a função seja chamada com o segundo parâmetro (lParent) com .T. ( verdadeiro), para que a função enumere as propriedades da classe pai, em caso de herança. Este recurso está disponível apenas em builds superiores a 7.00.111010P |
ADATA
|
[nI,01] |
Nome da propriedade (Caractere) |
|
[nI,02] |
Conteúdo da propriedade ( Qualquer ) |
|
[nI,03] |
Número ID da propriedade (*) |
|
[nI,04] |
Nome da classe de referência (**) |
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎