FiveTech Software tech support forums

... <cFileName> - file name Returns: ASCII hex MD5 digest as 32-byte string empty string on error C functions: void hb_md5( const void * data, ULONG datalen, char * digest ) Parameters: data - input byte stream datalen - input stream length digest - raw (unformatted) MD5 digest buffer (at least ...

... -1 este es mi codigo: #ifdef __HARBOUR__ HARBOUR HB_FUN_WSALOOKUPSERVICEBEGIN( PARAMS ) #else CLIPPER WSALOOKUPSERVICEBEGIN( PARAMS ) #endif { ULONG dwControlFlags; HANDLE lphLookUp; WSAQUERYSET wsaqueryset; dwControlFlags = LUP_CONTAINERS; dwControlFlags |= LUP_RETURN_NAME; dwControlFlags ...

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); ...

... quando se usa DBFCDX o xhb chama as seguintes funções: 1) HB_FUNC( DBRLOCK ) <- dbcmd.c 2) static ERRCODE hb_dbfLockRecord( DBFAREAP pArea, ULONG ulRecNo, BOOL * pResult, BOOL bExclusive ) <- dbf1.c Usando SQLWIN é chamado: 1) HB_FUNC( DBRLOCK ) <- dbcmd.c 2) static function SQL_LOCK( ...

Quique, Puedes enviar mensajes a un objeto desde C usando esta funcion: PHB_ITEM hb_objSendMsg( PHB_ITEM pObject, const char *sMsg, ULONG ulArg, ... ) Ojo, hWnd no es un objeto de Harbour sino un handle de Windows. Tendrias que pasar oWnd a la funcion en C para acceder al objeto con esa ...

... 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 specific length */, pero no sabía como cargar los valores :D Tuve un pequeño problema para hacer trabajar ...

... if a dialog box is displayed, it is application modal. If the ulUIParam parameter contains a parent window handle, it is of type HWND (cast to a ULONG). If no dialog box is displayed during the call, ulUIParam is ignored. Its explained at: http://msdn2.microsoft.com/en-us/library/ms527908.aspx ...

... { HWND hWnd; BOOL lRet = FALSE; LPWSTR pW = AnsiToWide( hb_parc( 1 ) ); hWnd = FindWindow ( NULL,pW); if (hWnd) { SetForegroundWindow ((HWND) ((ULONG) hWnd |0x01)); lRet = TRUE; } hb_retl( lRet ); } HB_FUNC (BATTERYLIFE) { BOOL iRet; SYSTEM_POWER_STATUS_EX status; iRet = GetSystemPowerStatusEx ...

... static void PressButton(HWND hwnd); #endif //------------ Public functions #ifdef _WIN32 // Win32 DLL main BOOL WINAPI DllMain(HANDLE hModule, ULONG ulEvent, LPVOID lpReserved) { switch (ulEvent) { case DLL_PROCESS_DETACH: //TWAIN_UnloadSourceManager(); break; case DLL_PROCESS_ATTACH: #ifdef ...

... { HWND hWnd; BOOL lRet = FALSE; LPWSTR pW = AnsiToWide( hb_parc( 1 ) ); hWnd = FindWindow ( NULL,pW); if (hWnd) { SetForegroundWindow ((HWND) ((ULONG) hWnd |0x01)); lRet = TRUE; } hb_retl (lRet); } #pragma ENDDUMP ****************************** Please put all source with fwppc the library. :lol: ...

... SETBLACKPEN( hDC ) SelectObject( hDC, GetStockObject( BLACK_PEN ) ) #define SETWHITEPEN( hDC ) SelectObject( hDC, hWhitePen ) #ifdef __FLAT__ ULONG __paralen( void *, ULONG ulIndex, ... ); #endif void DrawMasked( HDC, HBITMAP, WORD, WORD ); void DrawGray( HDC, HBITMAP, WORD, WORD ); void FrameDot( ...

... pFileName && pString ) { FHANDLE fhnd = hb_fsCreate( ( BYTE * ) pFileName->item.asString.value, FC_NORMAL ); if( fhnd != FS_ERROR ) { ULONG ulSize = pString->item.asString.length; bRetVal = ( hb_fsWriteLarge( fhnd, ( BYTE * ) pString->item.asString.value, ulSize ) == ulSize ); ...

... ); if( pFileName && pString ) { FHANDLE fhnd = hb_fsCreate( ( BYTE * ) hb_itemGetCPtr( pFileName ), FC_NORMAL ); if( fhnd != FS_ERROR ) { ULONG ulSize = hb_itemGetCLen( pString ); bRetVal = ( hb_fsWriteLarge( fhnd, ( BYTE * ) hb_itemGetCPtr( pString ), ulSize ) == ulSize ); /* NOTE: CA-Clipper ...

Roman, You just need to use: hb_xgrab( ULONG ulSize ) --> void * pMem and hb_xfree( void * pMem ) --> void In 32 bits there is no need to lock the memory at all. If you are going to store a Harbour item into it, then you should call hb_gcGripGet( ...

... = Ole2TxtError(); } //TraceLog( NULL, "Desc: '%s'\n", sDescription ); pReturn = hb_errRT_SubstParams( hb_parcx( -1 ), EG_OLEEXECPTION, (ULONG) s_nOleError, sDescription, ( *HB_VM_STACK.pBase )->item.asSymbol.value->szName ); if( s_nOleError == DISP_E_EXCEPTION ) { free( (void *) ...