Actualicé a fwh 24-07 y tengo algunas características en dll de otros sistemas que uso DllCall y al compilar me muestra el siguiente error:
Compiling...
Harbour 3.2.0dev (r2407221137)
Copyright (c) 1999-2021, https://harbour.github.io/
Compiling 'test.prg' and generating preprocessed output to 'test.ppo'...
Lines 5174, Functions/Procedures 3
Generating C source output to 'test.c'... Done.
Embarcadero C++ 7.70 for Win32 Copyright (c) 1993-2023 Embarcadero Technologies, Inc.
test.c:
Turbo Incremental Link 6.97 Copyright (c) 1997-2022 Embarcadero Technologies, Inc.
Error: Unresolved external '_HB_FUN_DLLLOAD' referenced from C:\FWH\SAMPLES\TEST.OBJ
Error: Unresolved external '_HB_FUN_DLLCALL' referenced from C:\FWH\SAMPLES\TEST.OBJ
Error: Unable to perform link
-Lc:\bcc77\lib;c:\bcc77\lib\psdk +
c:\bcc77\lib\c0w32.obj +
test.obj, +
test.exe, +
test.map, +
c:\fwh\lib\FiveH.lib c:\fwh\lib\FiveHC.lib c:\fwh\lib\libmysql.lib +
c:\fwh\lib\hbpgsql.lib c:\fwh\lib\libpq.lib +
c:\fwh\lib\drxlsx32_bcc.lib +
c:\harbour\lib\win\bcc\hbhpdf.lib +
c:\harbour\lib\win\bcc\libhpdf.lib +
c:\harbour\lib\win\bcc\png.lib +
c:\harbour\lib\win\bcc\hbwin.lib +
c:\harbour\lib\win\bcc\gtgui.lib +
c:\harbour\lib\win\bcc\hbrtl.lib +
c:\harbour\lib\win\bcc\hbvm.lib +
c:\harbour\lib\win\bcc\hblang.lib +
c:\harbour\lib\win\bcc\hbmacro.lib +
c:\harbour\lib\win\bcc\hbrdd.lib +
c:\harbour\lib\win\bcc\rddntx.lib +
c:\harbour\lib\win\bcc\rddcdx.lib +
c:\harbour\lib\win\bcc\rddfpt.lib +
c:\harbour\lib\win\bcc\hbsix.lib +
c:\harbour\lib\win\bcc\hbdebug.lib +
c:\harbour\lib\win\bcc\hbcommon.lib +
c:\harbour\lib\win\bcc\hbpp.lib +
c:\harbour\lib\win\bcc\hbcpage.lib +
c:\harbour\lib\win\bcc\hbcplr.lib +
c:\harbour\lib\win\bcc\hbct.lib +
c:\harbour\lib\win\bcc\hbpcre.lib +
c:\harbour\lib\win\bcc\xhb.lib +
c:\harbour\lib\win\bcc\hbziparc.lib +
c:\harbour\lib\win\bcc\hbmzip.lib +
c:\harbour\lib\win\bcc\hbzlib.lib +
c:\harbour\lib\win\bcc\minizip.lib +
c:\harbour\lib\win\bcc\hbusrrdd.lib +
c:\harbour\lib\win\bcc\hbtip.lib +
c:\harbour\lib\win\bcc\hbzebra.lib +
c:\harbour\lib\win\bcc\hbcurl.lib +
c:\harbour\lib\win\bcc\libcurl.lib +
c:\fwh\lib\dolphin.lib +
c:\bcc77\lib\cw32.lib +
c:\bcc77\lib\psdk\uuid.lib +
c:\bcc77\lib\import32.lib +
c:\bcc77\lib\psdk\ws2_32.lib +
c:\bcc77\lib\psdk\odbc32.lib +
c:\bcc77\lib\psdk\nddeapi.lib +
c:\bcc77\lib\psdk\iphlpapi.lib +
c:\bcc77\lib\psdk\msimg32.lib +
c:\bcc77\lib\psdk\psapi.lib +
c:\bcc77\lib\psdk\rasapi32.lib +
c:\bcc77\lib\psdk\gdiplus.lib +
c:\bcc77\lib\psdk\shell32.lib +
c:\bcc77\lib\psdk\uxtheme.lib ,
- Code: Select all Expand view
#include "fivewin.ch"
#include "dll.ch"
#define DLL_STDCALL 0x08
#define STR_LEN 1024
FUNCTION MAIN( eArqConfig, eChaveCrypt)
eArqConfig :=if(eArqConfig = nil, '', eArqConfig)
eChaveCrypt:=if(eChaveCrypt = nil, '', eChaveCrypt)
TRY
hHandle := DllLoad( '.\dll\ACBreSocial32.dll' )
CATCH oError
MsgInfo( oError:Description )
END
TRY
hResult := DllCall(hHandle, DLL_STDCALL, "eSocial_Inicializar", alltrim(eArqConfig), "")
CheckResult(hResult)
CATCH oError
MsgInfo( oError:Description )
END
function Clear()
local hResult
hResult := DllCall(hHandle, DLL_STDCALL, "eSocial_Finalizar()")
RETURN nil