Antonio
Me gusta mucha ver como se pasa de un mensaje que mem impide trabajar con FW, me falta la liberria dbfdbt.lib.. es que ua no se da soporte a dbf???.. y la funcion treedraw.c esta mal creada
Necesito una respuesta urgente
Jose Ignacio Jimenez alarcon
Jose Ignacio,
La librería DBFDBT.lib ya no se usa. Ahora Harbour/xHarbour usan estas:
echo %hdir%\lib\b32\rdd.lib + >> b32.bc
echo %hdir%\lib\b32\dbfntx.lib + >> b32.bc
echo %hdir%\lib\b32\dbfcdx.lib + >> b32.bc
echo %hdir%\lib\b32\dbffpt.lib + >> b32.bc
echo %hdir%\lib\b32\hbsix.lib + >> b32.bc
Que problema hay con treedraw.c ?
Hola
Antonio antes de nada gracias por contestar, es muy importante porque aun no he conseguido compilar la aplicacion, si no es debido a esa libreria me esta saliendo un error en la clase tdbatabase
Error description: Error BASE/44 Assigned value is wrong class: TDATABASE:BBOF
Args:
[ 1] = B {|| ... }
Called from: => TDATABASE:_BBOF(0)
Called from: => TDATABASE:NEW(0)
Called from: => TDICCIO:ACTIVATE(176)
Called from: => TAPPLICATION:NEW(231)
Called from: qc4rad32.prg => MAIN(43)
Lo muestra despues de abrir la base de datos que es una dbf con la orden
USE (fichero) ALIAS &alias VIA "DBFNTX"
y hacer
DATABASE ::oApplication
El problema con treedraw es el siguiente
Investigando un poco veo que ha cambiado la funcion treedraw de fivewin, la que esta en functions ojo
HB_FUNC( LBSETDATA ) // ( hwnd, index, data )
HB_FUNC( LBGETDATA ) // ( hwnd, index, lDelete )
cuando en a version 2.5 estaba puesta en el mismo fichero
HARBOUR HB_FUN_LBSETDATA() // ( hwnd, index, data )
HARBOUR HB_FUN_LBGETDATA() // ( hwnd, index, lDelete )
porque ha cambiado?... como puedo acceder a esas funciones?
Gracias
Jose Ignacio Jimenez
Jose Ignacio,
Modifica esta línea en la clase TDataBase y quita el AS ...
DATA bBoF, bEoF, bNetError // AS ...
Jose Ignacio,
LBSETDATA() y LBGETDATA() siguen estando en source\function\treedraw.c
Por favor revísalo
Hola
Gracias de nuevo por contestar, lo hare aunque habia conseguido pasar ese error quitando los bloques... algo que nunca me gusta hacer... lo que mas me urge es la funcion treedraw... de verdad, la aplicacion hace un uso intensivo de esa funcion... tanto que modificarlapara que use los trees de windows me resulta practicamente imposible.... es mas sera un motivo para no actualizar a esta o versiones similares ... lo siento..
Por otro lado los btnbmp siguen dando la lata cuando en el codigo action se pone un elemento de una clase... tal y como ::(lo que sea) he tenido que modificar fivewin.ch para que en lugar de |Self| uaction.... ponga |This| uaction... asi funciona perfectamente
Atentamente
Jose Ignacio Jimenez Alarcon
Antonio
Perdona... no habia visto el post...volvere a mirarlo mañana, pero te prometo que estan escritas tal y como lo digo en el post... es mas es la primera vez desde que uso harbour que las veo escritas asi... mañana lo compruebo.. por cierto en que libreria esta treedraw introdudica?
Gracias de antemano
Jose
Antonio
He vuelto a mirar el fichero c
HB_FUNC( LBSETDATA ) // ( hwnd, index, data )
{
_retni( SendMessage( (HWND) _parnl( 1 ), LB_SETITEMDATA, _parni( 2 ),
(LONG) _GetGrip( _param( 3, OBJECT ) ) ) );
}
HB_FUNC( LBGETDATA ) // ( hwnd, index, lDelete )
{
PCLIPVAR p = (PCLIPVAR) SendMessage( (HWND) _parnl( 1 ), LB_GETITEMDATA, _parni( 2 ), 0 );
#ifndef __FLAT__
_bcopy( (LPBYTE) _eval, (LPBYTE) p, sizeof(CLIPVAR) );
#else
#endif
if( (BOOL) _parl( 3 ) )
_DropGrip( p );
}
estas funciones no las coge mi programa asi definidas... puedes enviarme un fichero que funcione... llevo dos dias sin avanzar lo mas minimo
Jose Ignacio jimenez alarcon
Nota :
Si intento compilarla me dice que faltan las funciones __setgrip y __dropgrip
Atentamente
Jose Ignacio Jimenez Alarcon
Jose Ignacio,
y cambia _GetGrip() por hb_gcGripGet() y _DropGrip() por hb_gcGripDrop()