Error compilando TsBrowse9 con HB 3 y BCC582

[Adolfo]

Eso amigos

Es en el TsbFuncs.c
Ya cambie los _parXX por hb_parxx y los isXXXX por hb_isxxx
Inclui
#define _HB_API_INTERNAL_

y el resto de las cabeceras asi
#include <hbApi.h> /* set your own path if needed */
//#include <WinTen.h> /* set your own path if needed */
#include <Windows.h>
//#include <ClipApi.h> /* set your own path if needed */
#include <shellapi.h>
#include <StdLib.h>
#include <hbstack.h>
#include <hbvm.h>


pero me surgen estos errores

c:\fwhlibs\tsbrowse9\source\function\TSBFUNCS.C:
Warning W8065 TSBFUNCS.C 69: Call to function 'HB_ISLOGICAL' with no prototype in function HB_FUN_TSDRAWCELL
Warning W8065 TSBFUNCS.C 70: Call to function 'HB_ISLOGICAL' with no prototype in function HB_FUN_TSDRAWCELL
Warning W8057 TSBFUNCS.C 309: Parameter 'PARAMS' is never used in function HB_FUN_TSDRAWCELL
Warning W8057 TSBFUNCS.C 400: Parameter 'PARAMS' is never used in function HB_FUN_TSBRWSCROLL
Warning W8057 TSBFUNCS.C 429: Parameter 'PARAMS' is never used in function HB_FUN_TSBRWHSCROLL
Warning W8057 TSBFUNCS.C 465: Parameter 'PARAMS' is never used in function HB_FUN_ROWFROMPIX
Warning W8057 TSBFUNCS.C 504: Parameter 'PARAMS' is never used in function HB_FUN_SBGETHEIGHT
Warning W8057 TSBFUNCS.C 530: Parameter 'PARAMS' is never used in function HB_FUN_COUNTROWS
Warning W8057 TSBFUNCS.C 546: Parameter 'PARAMS' is never used in function HB_FUN_SBMPHEIGHT
Warning W8057 TSBFUNCS.C 562: Parameter 'PARAMS' is never used in function HB_FUN_SBMPWIDTH
Error E2227 TSBFUNCS.C 790: Extra parameter in call to hb_parni in function HB_FUN_CHANGESYSCOLORS
Error E2227 TSBFUNCS.C 791: Extra parameter in call to hb_parnl in function HB_FUN_CHANGESYSCOLORS
Warning W8057 TSBFUNCS.C 795: Parameter 'PARAMS' is never used in function HB_FUN_CHANGESYSCOLORS

Alguien con alguna ayuda por ahi.
Me comunique con MMercado, pero dice estar alejado de la programacion y dedicado a funciones mas bien administrativas, que no compilo con BCC582 en su momento y lo dejo hasta ahi.

Es la ultima lib que me falta para pasar de xharbour 1.2.1 a HARBOUR 3.1

Gracias de antemano

[Antonio Linares]

Adolfo,

Cambia HB_LOGICAL() por HB_LOG() y borra todos los PARAMS

[Adolfo]

Gracias Antonio

Funciono Perfecto.. seguimos en la migracion...

[Patricio Avalos Aguirre]

Hola

hice todo pero igual me sale error

me sale este errror al compilar,

Code: Select all  Expand view

Borland C++ 5.82 for Win32 Copyright (c) 1993, 2005 Borland
..\source\function\TSBFUNCS.C:
Warning W8065 ..\source\function\TSBFUNCS.C 71: Call to function 'HB_LOG' with no prototype in function HB_FUN_TSDRAWCELL
Warning W8065 ..\source\function\TSBFUNCS.C 72: Call to function 'HB_LOG' with no prototype in function HB_FUN_TSDRAWCELL

//ORIGINAL XHARBOUR
   BOOL b3DInv      = ( ISLOGICAL( 27 ) ? ! _parl( 27 ) : FALSE ) ;
   BOOL b3D         = ( ISLOGICAL( 27 ) ? TRUE : FALSE ) ;

//CAMBIADA PARA HARBOUR
   BOOL b3DInv      = ( HB_LOG( 27 ) ? ! hb_parl( 27 ) : FALSE ) ;
   BOOL b3D         = ( HB_LOG( 27 ) ? TRUE : FALSE ) ;

ESTE ES EL INICIO

Code: Select all  Expand view

/***************************************************************

This file contains the special painting routines used by TSBrowse Class
Last update: November 30th, 2009

***************************************************************/

#define _HB_API_INTERNAL

#include <hbApi.h> /* set your own path if needed */
//#include <WinTen.h> /* set your own path if needed */
#include <Windows.h>
//#include <ClipApi.h> /* set your own path if needed */
#include <shellapi.h>
#include <StdLib.h>
#include <hbstack.h>
#include <hbvm.h>
void WndBoxDraw( HDC, LPRECT, HPEN, HPEN, int, BOOL ) ;
void cDrawCursor( HWND, LPRECT, long, COLORREF ) ;
void DrawCheck( HDC, LPRECT, HPEN, int, BOOL ) ;
DWORD GetTextExtent( HDC, LPCSTR, int ) ;
extern void DrawBitmap( HDC, HBITMAP, WORD wCol, WORD wRow, WORD wWidth, WORD wHeight, DWORD dwRaster ) ;
extern void DrawMasked( HDC hdc, HBITMAP hbm, WORD y, WORD x ) ;
extern void MaskRegion( HDC hDC, RECT * rct, COLORREF cTransparent, COLORREF cBackground ) ;
static void GoToPoint( HDC, int, int ) ;
static void DegradColor( HDC, RECT *, COLORREF, signed long ) ;

//---------------------------------------------------------------------------//