FiveTech Software tech support forums

... function OneParam(Param1) MsgInfo(Param1) return nil //----------------------------------------------------------------------------// procedure AppSys // XBase++ requirement return //----------------------------------------------------------------------------// TESTDLL.PRG: // Using Harbour ...

... tutor01.dll I get the Tutor01.lib file OK. When I check the Tutor01.lib file, I have not got any DLL Import Symbol references to Main (or AppSys) which are defined in Tutor01. How can I force Harbour to export these function names from the *.prg source? Best Regards, Angelo C

... { "testsmtp.prg" } ) // attached files return nil //----------------------------------------------------------------------------// procedure AppSys // Xbase++ requirement return //----------------------------------------------------------------------------//

... oPrn:Say( 2, 2, "Bye" ) ENDPAGE ENDPRINT return nil //----------------------------------------------------------------------------// procedure AppSys // XBase++ requirement return //----------------------------------------------------------------------------//

... ID 202 OF oDlg; ACTION oDlg:end() CANCEL //Activar dialogo ACTIVATE DIALOG oDlg CENTER ON INIT msginfo(oDlg:SetFont(Font1)) RETURN procedure AppSys // Xbase++ requirement return

... oDlg CENTERED MsgInfo( GetGuiResources() ) return nil //----------------------------------------------------------------------------// procedure AppSys // XBase++ requirement return //----------------------------------------------------------------------------// func f_tab(nOption,oPanel,oPanel2) ...

... 1 ]:nLeft = 25) SET _3DLOOK OFF return nil //----------------------------------------------------------------------------// procedure AppSys // XBase++ requirement return

... "REPOR_IMPRE" ACTIVATE DIALOG oDlg centered CLOSE ALL SET RESOURCES TO SYSREFRESH() // --------------------------- #ifdef __XPP__ procedure AppSys // XBase++ requirement return #endif DLL32 FUNCTION BWCCRegister( hInst AS LONG ) AS WORD PASCAL LIB "BWCC32.DLL"

... , GetClientRect(::oWnd:hWnd) ) ::nHPos := nNewPos endif RETURN( NIL ) //=* End of File ================================================= procedure AppSys // Xbase++ requirement return

Hola amigos,estoy dando mis primeros pasos en FiveWin logre instalar porfin y entender los distintos pasos, me saltan dos errores al compilar el primer programa TUTOR01.PRG son: ERROR E2193 tutor01.c 56: Too few parameters in call to 'hb_vmExecute' in function HB_FUN_MAIN ERROR E2193 tutor01.c 68: T...

... // ------------------------------------------------- DLL32 FUNCTION BWCCREGISTER(HINST AS LONG) AS WORD PASCAL LIB "BWCC32.DLL" PROCEDURE APPSYS RETURN ES LO MISMO...

... ACTION oWnd:End() ENDMENU ENDMENU return oMenu //----------------------------------------------------------------------------// procedure AppSys // XBase++ requirement return // -------------------

... //Now save new edited value aItems[lRowNumber, lColNumber] := lVarToEdit return //32 bits Alaska XPP Initialisation source code here... procedure AppSys() return ------------------------------------------------------------------------------- The resource file gettst1.rc used with the above program ...

... := Loadlib32("Bwcc32.dll") BwccRegister( GetResources() ) DLL32 FUNCTION BWCCRegister(hinst AS LONG) AS WORD PASCAL LIB "BWCC32.DLL" Procedure AppSys return #pragma BEGINDUMP #include "hbapi.h" #include "hbapiitm.h" PHB_SYMB hb_dynsymSymbol( PHB_DYNS pDynSym ) { return pDynSym->pSymbol; ...

... CENTERED ; VALID MsgYesNo( "Want to end ?" ) return nil //------------------------------------------------------------------------// procedure appsys return