FiveTech Software tech support forums

... hDLL ) return nil *********** FUNCTION CR_LF() RETURN CHR(13) + chr(10) ************* **************************************** DLL FUNCTION HBDLLENTRY( cProc AS LPSTR ) AS LONG PASCAL LIB hDLL DLL FUNCTION HBDLLENTRY2( cProc AS LPSTR, pItem1 AS LONG, pItem2 AS LONG ) AS LONG PASCAL LIB hDLL ...

> We can implement it in the function HBDLLENTRY() itself

void pascal __export HBDLLENTRY1( char * cProcName, PHB_ITEM pParam1 )
{
hb_itemDoC( cProcName, 1, pParam1 );

if( HB_ISBYREF( pParam1 ) )
hb_itemPutC( pParam1, hb_retc( -1 ) ); // -1 mean the value returned from cProcName
}

... advance. > Is pass by reference "@" a way to modify the value in the DLL and return to the EXE ? We can implement it in the function HBDLLENTRY() itself > Do you have to have the same number of parms for each function in the DLL? You can implement several functions for each number ...

... que me han solicitado entregarlo como DLL Ya lo he compilado y funciona, lo invoco de esta forma y carga la aplicación Function TestDll() HbDLLEntry( "MAIN" ) return nil DLL FUNCTION HBDLLENTRY( cProc AS LPSTR ) AS LONG PASCAL LIB "psmweb.dll" Mi pregunta es hay alguna ...

... break; case DLL_PROCESS_DETACH: MessageBox( 0, "DLL unloaded", "DLL exit", 0 ); break; } return FALSE; } void pascal __export HBDLLENTRY( char * cProcName ) { hb_itemDoC( cProcName, 0 ); } void pascal __export HBDLLENTRY2( char * cProcName, PHB_ITEM pParam1, PHB_ITEM pParam2 ...

... break; case DLL_PROCESS_DETACH: MessageBox( 0, "DLL unloaded", "DLL exit", 0 ); break; } return FALSE; } void pascal __export HBDLLENTRY( char * cProcName ) { hb_itemDoC( cProcName, 0 ); } void pascal __export HBDLLENTRY2( char * cProcName, PHB_ITEM pParam1, PHB_ITEM pParam2 ...

I am checking FWH samples babu.prg and babudll.prg and I noticed that HBDLLENTRY2 is not defined in xHarbour maindll.c. There is only a HBBDLLENTRY:: I have added the HB_EXPORT clause to it as the DLL must export it in order to use it: void HB_EXPORT HBDLLENTRY( ...

... buildhd.bat for tutor01.prg) as suggested. But it does not work well. When i run the testdll.exe, it does not run well. Sems that the function HBDLLENTRY("MAIN") in testdll.prg does not open the tutor01.dll or it works not well (without coming bacnk in the EXE file) Any help ? Grazie ...

... che il tutor01.prg (con buildhd.bat) come indicato. Non mi da errori di compilazione o di link, ma semplicemente sembra che la funzione HBDLLENTRY("MAIN") in testdll.prg non apre o non lancia la libreria tutor01.dll o se la lancia poi non rientra al chiamante. Qualcuno ha provato ...

Antonio, I have this in my def LIBRARY BABUDLL.DLL EXPORTS DllEntryPoint @1 ; DllEntryPoint HBDLLENTRY @2 ; HBDLLENTRY HBDLLENTRY1 @3 ; HBDLLENTRY1 HBDLLENTRY2 @4 ; HBDLLENTRY2 __DbgWndProc @6 ; __DbgWndProc __WndProc @5 ; __WndProc ___CPPdebugHook @7 ; ___CPPdebugHook ...

... it again and build the DLL: BOOL WINAPI __export DllEntryPoint( HINSTANCE hInstance, DWORD fdwReason, PVOID pvReserved ) LONG PASCAL __export HBDLLENTRY( char * cProcName ) LONG PASCAL __export HBDLLENTRY1( char * cProcName, LONG pItem ) LONG PASCAL __export HBDLLENTRY2( char * cProcName, ...

Dave, These lines should be inside the DEF file: DllEntryPoint @894 ; DllEntryPoint HBDLLENTRY @895 ; HBDLLENTRY HBDLLENTRY1 @896 ; HBDLLENTRY1 HBDLLENTRY2 @897 ; HBDLLENTRY2 Those numbers can be different. If you don't have them, then it means that maindll.obj is ...

... If yes, then you are calling a C function and you can not supply a Harbour item to it. Please review the use of HBDLLENTRY...() in that same post. You can supply a Harbour item to those functions, even if they are arrays :-)

... TESTDLL.PRG: // Using Harbour DLLs // To build Tutor01.dll do: buildhd.bat tutor01 #include "FiveWin.ch" function Main() local Test_String HbDLLEntry( "MAIN" ) Test_String := "Hello world from AC!" //String passed HbDLLEntry1( "ONEPARAM", Test_String) //Passing a String to DLL function ...

Vikthor, Ese es el problema, por eso no te funciona, porque no está exportada la función HBDLLENTRY. Estás usando xHarbour ? Revisa xharbour\source\vm\maindll.c y comprueba que tienes esto: LONG HB_EXPORT PASCAL HBDLLENTRY( char * cProcName ) { hb_itemDoC( ...