FiveTech Software tech support forums • Ayuda DLL

Ayuda DLL

Posted: Tue Aug 22, 2017 7:17 pm

by ricardog

Tengo una .DLL, que me devuelve un OBJETO, como hago para que el .EXE lo tome ?


hDll := LoadLibrary( "kept5.dll" )

        La funcion que "REGRESA" el OBJETO es "MainGdo", pero no se "COMO" decirle que me regrese el OBJETO desde la dll/*
        HbDLLEntry2( "MainGdo",hItem1, hItem2, hItem3, hItem4, hItem5 )
         */

Gracias

Re: Ayuda DLL

Posted: Tue Aug 22, 2017 7:56 pm

by karinha

Mira se ayuda:

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=14863&start=90

Saludos.

Re: Ayuda DLL

Posted: Wed Aug 23, 2017 3:38 am

by ricardog

karinha, Gracias por la ayuda.
Pero lo que necesito es:

function main()
oObjeto := MainGdo(a,b,c,d,e) //

Msginfo( oObjeto:a )
Msginfo( oObjeto:b )
Msginfo( oObjeto:c )
Msginfo( oObjeto:d )
Msginfo( oObjeto:e )
return Nil

***********************************************************************
//Esto esta en la DLL

function MainGdo(a,b,c,d,e)

local oRegreso := TSeguro():New(a,b,c,d,e)

return oRegreso

CLASS TSeguro

DATA a,b,c,d

METHOD New( a,b,c,d,e)

ENDCLASS

METHOD New( a,b,c,d,e) CONSTRUCTOR
::a := a + 25
::b := b += "un texto x"
::c := c
::d := d
::e := e
RETURN self

Gracias

Re: Ayuda DLL

Posted: Wed Aug 23, 2017 5:24 am

by Antonio Linares

Ricardo,

Eso solo puedes hacerlo con una DLL de pcode, no con una DLL autocontenida. La DLL de pcode
usa la misma máquina virtual del EXE.

Y en la DLL tienes que cambiar esto:

static oRegreso

function MainGdo(a,b,c,d,e)

oRegreso := TSeguro():New(a,b,c,d,e)

return oRegreso

Re: Ayuda DLL

Posted: Thu Aug 24, 2017 2:05 am

by ricardog

Gracias Antonio, he intentado compilar mi dll (pcode), por motivos de actualización y simplemente no he podido corregir este error:

ULONG hb_snprintf( char * buffer, size_t nSize, const char * format, ... )

Gracias

Re: Ayuda DLL

Posted: Thu Aug 24, 2017 10:45 am

by Antonio Linares

cambia ULONG por unsigned long y añade un ; al final de la línea

Re: Ayuda DLL

Posted: Thu Aug 24, 2017 6:56 pm

by ricardog

Antonio, Gracias

Esta es la funcion en el MAINDLLP.C

Y estos los errores

Gracias por la ayuda

Re: Ayuda DLL

Posted: Fri Aug 25, 2017 6:28 am

by Antonio Linares

El compilador te indica que hb_snprintf está declarado en hbapi.h y que su declaración (en hbapi.h):

int hb_snprintf( char * buffer, size_t bufsize, const char * format, ... )

No coincide con la tuya. Por lo que tienes que declararla de la misma forma que en hbapi.h

Re: Ayuda DLL

Posted: Fri Aug 25, 2017 5:39 pm

by ricardog

Gracias Antonio, solo que ahora no me manda errores de compilación pero NO me genera el .OBJ

Porque será?, la carpeta tiene permisos.

Saludos

Re: Ayuda DLL

Posted: Sat Aug 26, 2017 7:06 pm

by Antonio Linares

Igual lo está generando con otra extensión ?

Comprueba los ficheros que hay en esa carpeta antés y después

Re: Ayuda DLL

Posted: Tue Aug 29, 2017 7:34 pm

by ricardog

Buenas tardes Antonio, tienes razón me lo genera en donde esta el fuente, solo que me manda estos errores:

http://harbour-project.org/

Como siempre, me puedes apoyar de nuevo ??
Gracias

Re: Ayuda DLL

Posted: Wed Aug 30, 2017 8:28 am

by Antonio Linares

Estás compilando con Harbour pero estás enlazando FWH para xHarbour ( FIVEHX.LIB )

Estás usando ficheros de cabecera de Harbour ( P:\32bits\harbour\include ) y ficheros de cabecera de xHarbour ( P:\Fuentes\xharbour\Comun\include )

No puedes mezclarlos. Si usas Harbour, todo de Harbour. Si usas xHarbour, todo de xHarbour :-)

Re: Ayuda DLL

Posted: Wed Aug 30, 2017 5:07 pm

by ricardog

Buenos días Antonio, ahoro me presenta estos errores.

Gracias

Re: Ayuda DLL

Posted: Thu Aug 31, 2017 5:24 am

by Antonio Linares

Te falta enlazar hbvm.lib en el caso de usar Harbour, ó vm.lib en el caso de usar xHarbour

Re: Ayuda DLL

Posted: Thu Aug 31, 2017 2:56 pm

by ricardog

Antonio buenos dias, gracias por la ayuda
Agrego la VM.LIB (xharbour), y me manda estos errorres

http://www.xharbour.org

http://www.harbour-project.org/

http://www.xharbour.org

http://www.harbour-project.org/

Primera Parte de la lista de errores

Gracias por la ayuda.