FiveTech Software tech support forums

... 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, int iDefValue ) { return hb_parl( iParam, iDefValue ); } #pragma ENDDUMP

Dear Marc,

FWH provides function GetTextWidth( hDC, szText [,hFont], [@nHeight] ) --> nPixelsWidth

... #include <hbapi.h> #include <hbapierr.h> HB_FUNC( GENEROERROR ) { hb_xfree( 0 ); } void hb_errInternal (ULONG ulIntCode, const char * szText, const char * szPar1, const char * szPar2) { hb_errRT_BASE( 0, 0, "intentando resolver un error interno", "probando", 0 ); ...

Antonio, que direfencia hay entre estas dos funciones? extern HB_EXPORT HB_BOOL hb_arraySetC( PHB_ITEM pArray, HB_SIZE nIndex, const char * szText ); extern HB_EXPORT HB_BOOL hb_arraySetCL( PHB_ITEM pArray, HB_SIZE nIndex, const char * szText, HB_SIZE nLen ); asi esta quedando la funcion, ya ...

Rolando,

Con xHarbour tienes que cambiar esta línea asi:

void hb_errInternal( ULONG ulIntCode, const char * szText, const char * szPar1, const char * szPar2 )

Antonio,el propotipo de hb_retclen es este: hb_retclen( const char * szText, HB_SIZE nLen ); Por tanto no sería así?     #pragma BEGINDUMP    #include "hbapi.h"    #include "windows.h"    #include ...

... in function HB_FUNC_INTERNETFINDNEXTFILE - en la línea: hb_storclen( 2, ( char * ) fd, sizeof( WIN32_FIND_DATA ) ) Type mismatch in parameter 'szText' wanted 'signed char *', got int. in function HB_FUNC_INTERNETFINDNEXTFILE

hm,

Comprueba si la definición que tienes en hbapi.h es esta:

extern HB_EXPORT void hb_storc( const char * szText, int iParam, ... );

y asegurate que hayas cambiado los paths a otra carpeta y estes usando otro fichero hbapi.h

... 3, 1 ); revisando hbapi.h, veo que ahora la funcion lleva un solo parámetro. Existe tambien otra función parecida, hb_storvc( const char * szText, int iParam, ... ); /* stores a szString on a variable by reference */ que parece tener el mismo uso pero con más parámetros. ¿Es correcto reemplazar ...

Rafa,

Prueba con:

void hb_retclen_const( const char * szText, HB_SIZE nLen );

... iLogical, iParam, n ); } void hb_storvni( int iValue, int iParam, int n ) { hb_storni( iValue, iParam, n ); } void hb_storvc( const char * szText, int iParam, int n ) { hb_storc( szText, iParam, n ); }

... := c ENDIF ::oTimer:End() RETURN( .T. ) // Windows API that extracts the icon handle of file DLL32 Function DLL32GetExtractIcon(hWnd as LONG, szText as LPSTR, nIconIndex as LONG); AS LONG PASCAL FROM "ExtractIconA" LIB "SHELL32.DLL" METHOD AnimateIcon() CLASS TTrayIcon ::nIndIco := ::nIndIco ...

... los valores por referencia :lol: hb_stornl( long lValue, int iParam, ... ); /* stores a long on a variable by reference */ hb_storc( char * szText, int iParam, ... ); /* stores a szString on a variable by reference */ Tambien había visto hb_reta( ULONG ulLen ); /* returns an array with a ...

... must point struct/union ********* LA FUNCION ****************************** #include "hbapi.h" HB_FUNC ( CQUITACEROS ) { PHB_ITEM pItem; char *szText; int i; int n; char * szResult; pItem = hb_param(1, HB_IT_STRING); if( pItem ) { szText = pItem->item.asString.value; i = (int) pItem->item.asString.length ...

... arquivo MENU.C #define OEMRESOURCE #include <WinTen.h> #include <Windows.h> #include <ClipApi.h> BOOL bStrAt( BYTE bChar, LPSTR szText ); LPSTR StrToken( LPSTR szText, WORD wOcurrence, BYTE bSeparator, LPWORD pwLen ); void WindowBoxIn( HDC hDC, RECT * pRect ); void WndDrawBox( ...