Página 1 de 1

Listar variáveis

Enviado: 12 Dez 2017 08:52
por rubens
Bom dia...

Alguém sabe como eu posso listar as variáveis na memória?
No debug eu consigo visualizar as variáveis existentes. Tem alguma função para ver estas variáveis?

Obrigado
Rubens

Listar variáveis

Enviado: 12 Dez 2017 09:06
por cl@udio
Estes tempos criei esta função.
Pode mudar o parâmetro para ver private ou public.

Código: Selecionar todos

#include "hbdebug.ch"
#include "hbmemvar.ch"

FUNCTION Ver_Variavel_Public()

   LOCAL nCount
   LOCAL n
   LOCAL xValue
   LOCAL cName
   LOCAL aBVars := {}

   nCount := __mvDbgInfo( HB_MV_PUBLIC )
   FOR n := nCount TO 1 STEP -1
      xValue := __mvDbgInfo( HB_MV_PUBLIC, n, @cName )
      AAdd( aBVars, { cName, xValue, "Public" } )
   NEXT
   ASort( aBVars,,, {| x, y | x[ 1 ] < y[ 1 ] } )

   RETURN NIL

Listar variáveis

Enviado: 12 Dez 2017 09:41
por rubens
Funcionou belezinha...
Obrigado Claudio...