FiveTech Software tech support forums

antonio o erro não acontece mais, inclui: #ifndef HB_LONGLONG #define HB_LONGLONG long #define hb_storvnll hb_stornl #endif agora o erro eh outro ao clicar em start DLL FUNCTION Llama( cModel AS LPSTR, cPrompt AS LPSTR, pFunc AS PTR ) AS VOID PASCAL LIB "llama64.dll" https://uploaddeim...

James,

Please add these lines to have support for xHarbour:

#pragma BEGINDUMP

#include <Windows.h>
#include <hbapi.h>

#ifndef HB_LONGLONG
#define HB_LONGLONG long
#define hb_storvnll hb_stornl
#endif

Hello. I have a problem trying to compile the testtool.prg I'm receiving some errors from the xharbor.com compiler inside the c source. Someone knows how can I make ? Thanks a lot. Massimo // Testing Windows ToolHelp.dll #include "FiveWin.ch" //---------------------------------------------...

Rick, if you want to rewrite the regopenkey() function you can try to add the folowing code to your system: #pragma BEGINDUMP HB_FUNC( REGOPENKEY ) // ( nkey, cSubKey, @nHandle ) --> nResult { HKEY hKey = ( HKEY ) hb_parnl( 1 ); HKEY hResult; #ifndef UNICODE hb_retnl( RegOpenKey( hKey, hb_parc( 2...

* Fix: functions ReGetCharFormat() and RegGetSelection() incorrectly used hb_storvnl() instead of hb_stornl() * Fix: functions RegEnumKey() and RegEnumValue() incorrectly used hb_storvc() and hb_storvnl() instead of hb_storc() and hb_stornl() * Fix: functions RegQueryValueEx() and RegCreateKey() inc...

... GETFIRSTIN Warning W8065 unzip.c 74: Call to function 'STORC' with no prototype in function GETFIRSTIN Warning W8065 unzip.c 76: Call to function 'STORNL' with no prototype in function GETFIRSTIN Warning W8065 unzip.c 77: Call to function 'STORNL' with no prototype in function GETFIRSTIN Warning ...

Enrico, this api no exist in xharbour. int hb_parvni( int iParam, int n ) { return hb_parni( iParam, n ); } LONG hb_parvnl( int iParam, int n ) { return hb_parnl( iParam, n ); } const char * hb_parvc( int iParam, int n ) { return hb_parc( iParam, n ); } void hb_storvnl( LONG lValue, int iParam, int ...

Hua,

Please check how hb_stornl() is defined in your used hbapi.h and copy it here, thanks

Gracias...!!! y perdon, maestro... pero a mi me sacas de los IF / Case, Do While, y soy boleta... ¿alguna idea de que es esto que pego abajo? (lo que hice fue pegar el código que pusiste arriba en un notepado, guardarlo como strucinf.h, ponerlo en INCLUDE y tratar de compilar nuevamente. Gracias...!...

Jeff,

please try to use hb_stornl instead of hb_storvnl .

Perdonar pero no he visto vuestros mensajes, aqui teneis el codigo para mostrar los dispositivos a tu alcance: function main() WSAStartup() nWsaError:=WSALookupServiceBegin(@lphLookup) if nWsaError<>0 // Tenemos un error localizado en wsaError.h do case case nWsaError = WSASERVICE_NOT_FOUND ms...

Antonio, This is what I get now: testgif.prg(24): error: Redeclaration of 'hb_stornl' previously declared at C:\xHB\include\hbapi.h(539): found 'void __cdecl function(long int, int, int)' expected 'void __cdecl function(long int, int, ...)'. I tried commenting out "void hb_stornl( long, int, in...

Saludos...


Teoricamente igual...

deberias pasar un segundo parametro

_stornl( nHandle, 2 ) // el 2 sigifica el segundo parametro que lo deberias pasar a la funcion

How cal this function ? HB_FUNC (MEMINFO) { MEMORYSTATUS st; GlobalMemoryStatus (&st); hb_reta (4); hb_stornl ((ULONG) st.dwMemoryLoad, -1, 1); hb_stornl ((ULONG) st.dwTotalPhys, -1, 2); hb_stornl ((ULONG) st.dwTotalVirtual, -1, 3); hb_stornl ((ULONG) st.dwAvailVirtual, -1, 4); } HB_FUNC (DISKIN...

Hola a todos, Estas son notas para los que como yo no tenemos ni idea de 'C' y precisamos llamar a una función 'C' de una .Lib de terceros, desde FiveWin/Harbour. Gracias a este foro, sobre todo a Antonio Linares lo he conseguido. La .lib de terceros en mi caso era: ter16bc.lib --->>> ATENC...