Page 1 of 1
Librerias linkadas
Posted: Thu May 07, 2020 10:08 pm
by FranciscoA
Amigos.
Existe alguna function que en tiempo de ejecución devuelva array con las librerías linkadas?
Saludos
Re: Librerias linkadas
Posted: Thu May 07, 2020 10:17 pm
by Antonio Linares
Así ves todos los nombres de funciones y classes que tienes enlazados en el EXE
Code: Select all
function Main()
local n
for n = __DynsCount() to 1 step -1
if __DynsIsFun( n )
? n, __DynsGetName( n )
endif
next
return nil
Re: Librerias linkadas
Posted: Fri May 08, 2020 3:13 pm
by FranciscoA
Antonio.
Gracias por tu atención. Lo pruebo y comento.
Saludos.
Re: Librerias linkadas
Posted: Fri May 08, 2020 5:31 pm
by FranciscoA
Antonio.
Tu código funciona bien. Obtengo los nombres de todas las funciones enlazadas.
Partiendo de eso, se me vino la idea de crear una funcion Dummy dentro de uno de los prgs componentes de la libreria.lib y asi puedo identificar si uso, o no, esa libreria.
Code: Select all
function FuncLink()
local n, aData:={}
for n = __DynsCount() to 1 step -1
if __DynsIsFun( n )
** ? n, __DynsGetName( n )
aadd( aData,{ __DynsIsFun( n ), __DynsGetName( n ) } )
endif
next
xBrowse(aData)
return nil
Muchas gracias.