Descrição
GetClassName [AS] - Retorna o nome da classe.
|
Sintaxe
Parâmetros
| Par |
Nome |
Tipo |
Descrição |
Default |
Obg |
Ref |
01
|
oObj |
Objeto |
Indica o objeto que será utilizado para pesquisar o nome |
|
X |
|
Retorno
| Retorno |
Tipo |
Descrição |
| cRet |
Caracter
|
Retorna o nome da classe
|
Exemplo
#INCLUDE "TOTVS.CH"
User Function GetClassName()
Local oSay01 := TSay():New( 010,005,{|| "UA:" },GetWndDefault(),,,.F.,.F.,.F.,.T.,,,550,008)
MsgInfo( GetClassName( oSay01 ) )
Return( Nil )
Resultado
Informações adicionais
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎