FiveTech Software tech support forums

Puedes explicarnos como lo has solucionado ? gracias Agrege a mi prg este porcion #pragma BEGINDUMP #include <hbapi.h> #undef hb_retclen_buffer #undef hb_parldef void hb_retclen_buffer( char * szText, int nLen ) { hb_retclen( szText, nLen ); } int hb_parldef( int iParam, ...

... sino que hay que usar lo que se denomina "el sistema extendido": despues de todos los includes inciales añade este: #include <hbapi.h> XPCSocket openUDP(const char *xpIP){    return aopenUDP(xpIP, 49009, 0);}HB_FUNC( OPENUDP ){   hb_retptr( ...

Dear Ari, In harbour/include/hbapi.h you find this: https://github.com/harbour/core/blob/master/include/hbapi.h typedef struct _HB_CODEBLOCK { const HB_BYTE * pCode; /* codeblock pcode */ PHB_SYMB pSymbols; /* codeblocks symbols ...

hb_par* function are to be used inside "c" functions.

Please read some *.c source files and some c code inside prg files

see hbapi.h in (x)Harbour include folder

... WEBVIEW_EVAL( hWebView AS LONG, cJavaScript AS LPSTR ) AS VOID PASCAL FROM "webview_eval" LIB hDLL #pragma BEGINDUMP #include <hbapi.h> #include <windows.h> static void test( const char * x, const char * y) //, void * t ) { MessageBox( 0, x, y, 0 ); } HB_FUNC( TEST ...

... es muy poco lo que hice .... mis conocimientos en C son totalmente nulos De hecho no sé por donde empezar. #include <Windows.h> #include <hbapi.h> HB_FUNC( Pack2Text ) { private Decimal Unpack(byte[] inp, int scale) { long lo = 0; long mid = 0; long hi = 0; bool isNegative; // this ...

... é gerado mesmo inserindo o erro.prg: ERRO.PRG function Main() GeneroError() return nil #pragma BEGINDUMP #include <windows.h> #include <hbapi.h> #include <hbapierr.h> HB_FUNC( GENEROERROR ) { hb_xfree( 0 ); } void hb_errInternal (ULONG ulIntCode, const char * szText, const char ...

Antonio Linares wrote:A better way is:

#include <windows.h>
#include <hbapi.h>

Means to look for them in the include paths

Antonio,

Solved! Thank you.

A better way is:

#include <windows.h>
#include <hbapi.h>

Means to look for them in the include paths

... ^ c:\Bcc7164\include\windows\sdk\mmsyscom.h:103:21: note: previous definition is here typedef UINT FAR *LPUINT; ^ c\Libreria.c:2:10: fatal error: 'hbapi.h' file not found #include "hbapi.h" ^ 33 warnings and 1 error generated. ** error 1 ** deleting .\obj\Libreria.obj C:\clinica64>

... -I$(BCDIR)\include\windows\crtl -oobj\$& @tmp c\$&.c    Si no agrego los includes de Harbour, no deja cargar el <hbapi> y por ende, no deja incluir el archivo escrito en .C Tambien note que el .C no se logra comvertir a .Obj Como logro corregir ambos?

... typedef unsigned int WORD; #endif Are you using #include <clipdefs.h> in your C code ? If so, please remove it and just use #include <hbapi.h> Hello, I removed <clipdefs.h> and the error messages gone. Now I can not link . c file andf getting this c:\bcc7164\bin\ilink64 -Gn ...

Please try with these changes in c:\harbour\include/clipdefs.h:

#ifndef HB_APIEXT_H_
typedef HB_VMHANDLE HANDLE;
typedef USHORT BOOL;
typedef unsigned int WORD;
#endif

Are you using #include <clipdefs.h> in your C code ? If so, please remove it and just use #include <hbapi.h>

... = "TCODEBARS" oError:SubCode = nError oError:Severity = 2 Eval( ErrorBlock(), oError ) endif RETURN nil #pragma BEGINDUMP #include <hbapi.h> #include <windows.h> HB_FUNC( CREATECOMPATIBLEBITMAP ) // hDC, nWidth, nHeight { hb_retnl( ( LONG ) CreateCompatibleBitmap( ( HDC ...