Listar variáveis

[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

[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

[rubens]

Funcionou belezinha...
Obrigado Claudio...