Xailer & OZ Software

Estimados usuarios de Xailer,
Xailer 2.7 con soporte de Harbour está listo. Para más información siga el siguiente enlace:
http://xailer.info/esp/?p=927
Un cordial saludo
[El equipo de Xailer]

Parabens....
"Ignacio Ortiz de Zúñiga" wrote in message
news:50746318$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Estimados usuarios de Xailer,
Xailer 2.7 con soporte de Harbour está listo. Para más
información siga el siguiente enlace:
http://xailer.info/esp/?p=927
Un cordial saludo
[El equipo de Xailer]
--
Ignacio Ortiz de Zúñiga
[Equipo de Xailer/Xailer team]
http://www.xailer.com
http://www.xailer.info

Excelente, felicitaciones y gracias!
Pregunta: Podremos usar los multihilos de harbour en serio desde la
versión Profesional?

Hola estoy tratando de compilar con harbour y me muestra el siguiente mensaje
Enlazando TpvSoftAdmin.exe...
E:BorlandBCC55Binilink32 -Gn -Tpe -x -aa @link.tmp
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Fatal: Unable to open file 'RTL.LIB'
0 Files, 0 Warnings, 1 Errors
Tiempo de compilación: 0.00s Tiempo de enlazado: 0.20s Tiempo total: 0.34s
Ya marque todas las librerias en el proyecto. y aun asi.
Un Saludo

Estou usando sem problemas... o q eu fiz foi:
Baixei a versão
baixei o harbour do site do xailer
instalei a versão
instalei o harbour
configurei os caminhos nas opçíµes do xailer
e recompilei td...
Funcionou....
[]´s
"Gabriel Ornelas" wrote in message news:5074c9ea$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Hola estoy tratando de compilar con harbour y me muestra el
siguiente mensaje
Enlazando TpvSoftAdmin.exe...
E:BorlandBCC55Binilink32 -Gn -Tpe -x -aa @link.tmp
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000
Borland
Fatal: Unable to open file 'RTL.LIB'
0 Files, 0 Warnings, 1 Errors
Tiempo de compilación: 0.00s Tiempo de enlazado: 0.20s
Tiempo total: 0.34s
Ya marque todas las librerias en el proyecto. y aun asi.
Un Saludo

Gabriel,
> Hola estoy tratando de compilar con harbour y me muestra el
> siguiente mensaje
>
> Enlazando TpvSoftAdmin.exe...
>
> E:BorlandBCC55Binilink32 -Gn -Tpe -x -aa @link.tmp
>
> Turbo Incremental Link 5.00 Copyright (c) 1997, 2000
> Borland
> Fatal: Unable to open file 'RTL.LIB'
> 0 Files, 0 Warnings, 1 Errors
> Tiempo de compilación: 0.00s Tiempo de enlazado: 0.20s Tiempo
> total: 0.34s
>
> Ya marque todas las librerias en el proyecto. y aun asi.
Revisa el directorio lib de la configuración de Harbour. Tiene que ser
hb32libwinbcc
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Estoy utilizando la demo, para ver que tal se comporta Harbour VS xHarbour...
Empiezo por módulos pequeños y así­ iré pasito a pasito.
Primer contacto y notoque Harbour és más ligero i rí pido, 10 a 25%... a ver si sigue así­, hay que probarlo más y más!!!
En otro módulo que compilo, me surge un error...
Compilant CrearPDF.prg...
Compilant Form1.prg...
Enllaçant CrearPDF.exe...
Error: Unresolved external '_HB_FUN_CURDRIVE' referenced from C:XAILER2XEVI_XAILERCREARPDFOBJFORM1.OBJ
2 Files, 0 Warnings, 1 Errors
Temps de compilació: 0.88s Temps d'enllaçat: 0.84s Temp total: 1.75s
Por lo visto la función CurDrive() no existe en Harbour.
¿Que hacer con esta función??
¿Alguna sugerencia???
¿Alguna referencia donde documentarme para las posibles funciones inexistentes en Harbour???
¿Hay que añadir alguna libreria para el menester???
Gracias.
Un Saludo,
Xevi.

Xevi,
> Estoy utilizando la demo, para ver que tal se comporta
> Harbour VS xHarbour...
> Empiezo por módulos pequeños y así­ iré pasito a pasito.
> Primer contacto y notoque Harbour és más ligero i rí pido,
> 10 a 25%... a ver si sigue así­, hay que probarlo más y
> más!!!
Me alegro de que te guste
> En otro módulo que compilo, me surge un error...
>
> Compilant CrearPDF.prg...
> Compilant Form1.prg...
> Enllaçant CrearPDF.exe...
> Error: Unresolved external '_HB_FUN_CURDRIVE' referenced
> from C:XAILER2XEVI_XAILERCREARPDFOBJFORM1.OBJ
> 2 Files, 0 Warnings, 1 Errors
> Temps de compilació: 0.88s Temps d'enllaçat: 0.84s Temp total: 1.75s
>
> Por lo visto la función CurDrive() no existe en Harbour.
> ¿Que hacer con esta función??
Cámbiala por HB_Curdrive()
> ¿Alguna sugerencia???
> ¿Alguna referencia donde documentarme para las posibles
> funciones inexistentes en Harbour???
> ¿Hay que añadir alguna libreria para el menester???
Por alguna razón que desconozco, parece que muchas funciones que
tení­amos en xHarbour han sido renombradas en Harbour añadiendo el
prefijo HB_
Cuando te falte alguna función, lo mejor es probar a añadirle HB_
delante, y es muy posible que se solucione.
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Xevi:
Tal vez esto puede resolver hasta otro solución:
SubStr(Application:cDirectory,1,1)
Ej:
CurDrive()+":TEST"
SubStr(Application:cDirectory,1,3)+"TEST"
Saludos!
Mário Angelini

Mario,
si, funciona...
No se si me puede surgir alguna complicación al utilizar en red... no se, no se. Provaré mas cosas.
Gracias.
Un Saludo,
Xevi.

No se si me puede surgir alguna complicación al utilizar en red...
Utilizamos en red sin problemas;
Mário

José,
Correcto,... HB_CurDrive() y funciona correctamente.
Entiendo y lo sabré para funciones que no encuentre de añadirles HB_
Gracias.
Un Saludo,
Xevi.

Sigo compilando con Xailer 2.7.0
Ahora me surge un warning y un error en Wrappers que funcionan correctamente en xHarbour...
Compilant Actius.prg...
Compilant Actius.rc...
Compilant ActiusMenu.prg...
Compilant ActiusAlta.prg...
Compilant ActiusConsulta.prg...
Compilant ActiusEmpresses.prg...
Compilant ActiusImprimir.prg...
Compilant ActiusUpdates.prg...
Compilant FTPFile.prg...
Compilant ASoft.prg...
Compilant Wrappers.prg...
Warning W8075 Wrappers.prg 41: Suspicious pointer conversion in function HB_FUN_WNETGETCONNECTION
Error E2227 Wrappers.prg 155: Extra parameter in call to hb_storc in function HB_FUN_GETLOCALIP
11 Files, 1 Warnings, 1 Errors
Temps de compilació: 3.80s Temps d'enllaçat: 0s Temp total: 3.84s
y estos son los wrappers...
//Nom Ordinador ------------------------------------------------------------ ----
#pragma BEGINDUMP
#include "windows.h"
#include "xailer.h"
XA_FUNC( WNETGETCONNECTION )
{
char *cLocalName = hb_parc( 1 );
char *cRemoteName;
DWORD nLen = 0, nError;
nError = WNetGetConnection( cLocalName, NULL, &nLen );
if( nLen )
{
cRemoteName = hb_xgrab( nLen );
nError = WNetGetConnection( cLocalName, cRemoteName, &nLen );
hb_storc( cRemoteName, 2 );
hb_xfree( cRemoteName );
}
hb_retnl( nError );
}
#pragma ENDDUMP
//Array IPs Locals Ordinador ---------------------------------------------------
#pragma BEGINDUMP
#include "windows.h"
#include "xailer.h"
#include "winsock2.h"
XA_FUNC( GETLOCALIP )
{
WSADATA wsa;
char cHost[256];
struct hostent *h;
int nAddr = 0, n = 0;
WSAStartup( MAKEWORD( 2, 0 ), &wsa );
if( gethostname( cHost, 256 ) == 0 )
if( ( h = gethostbyname( cHost ) ) != NULL )
while( h->h_addr_list[nAddr] )
nAddr++;
hb_reta( nAddr );
if( nAddr )
while( h->h_addr_list[n] )
{
char cAddr[256];
wsprintf( cAddr, "%d.%d.%d.%d", (BYTE) h->h_addr_list[n][0],
(BYTE) h->h_addr_list[n][1],
(BYTE) h->h_addr_list[n][2],
(BYTE) h->h_addr_list[n][3] );
hb_storc( cAddr, -1, ++n );
}
WSACleanup();
}
#pragma ENDDUMP
Ahhh... también me encuentro con una lib que no dispongo para harbour...
CaptureBitmap.lib
¿Alguna función de Xailer o Harbour para el menester?... o la libreria para Harbour.
Gracias.
Un Saludo,
Xevi.

Xevi,
> Warning W8075 Wrappers.prg 41: Suspicious pointer conversion
> in function HB_FUN_WNETGETCONNECTION
Cambia:
char *cLocalName = hb_parc( 1 );
por:
const char *cLocalName = hb_parc( 1 );
o bien:
char *cLocalName = (char*) hb_parc( 1 );
> Error E2227 Wrappers.prg 155: Extra parameter in call to
> hb_storc in function HB_FUN_GETLOCALIP
Cambia hb_storc() por hb_storvc() cuando le pases 3 parámetros. Si le
pasas 2 parámetros, déjalo como está.
Estas diferencias y cómo solucionarlas las puedes ver aquí­:
http://www.xailer.com/dokuwiki/doku.php ... de.xharbou r.a.harbour
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

José,
Gracias, el nivel C no lo entiendo, de ahí­ mis peticiones.
Otra función que no encuentro...Compilant CWin.prg...
Enllaçant CWin.exe...
Error: Unresolved external '_HB_FUN_HB_SETCODEPAGE' referenced from C:XAILER2XEVI_XAILERCWINOBJCWIN.OBJ
1 Files, 0 Warnings, 1 Errors
Temps de compilació: 0.45s Temps d'enllaçat: 1.05s Temp total: 1.66s
resulta que estoy utilizando en mi aplicación ...
//permite crear indices con el orden alfabético Español, respetando la ñ y la í‘... tambí¨ la í‡ i la ç
REQUEST HB_LANG_ES
HB_LangSelect( "ES" )
REQUEST HB_CODEPAGE_ESMWIN
HB_SetCodePage( "ESMWIN" )
Ahora, en Harbour... ¿?
Gracias por vuestro tiempo.
Un Saludo,
Xevi.

Xevi,
> HB_SetCodePage( "ESMWIN" )
Cámbiala por HB_CDPSelect( "ESMWIN" ). Esta es otra de las que han
renombrado.
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Ahhh... también me encuentro con una lib que no dispongo para harbour...
CaptureBitmap.lib
¿Alguna función de Xailer o Harbour para el menester?... o la libreria para Harbour.
He provado XA_CaptureBitmap,... pero no da el mismo resultado.
hBitmap := XA_CaptureBitmap( ::Handle, -5, -28, ::nHeight-26 , ::nWidth-1 )
oBitmap := TBitmap():CreateFromHandle( hBitmap )
...
O soy yo que no se utilizarlo bien.
No he encontrado documentación referente a esta función.
Gracias.
Un Saludo,
Xevi.

Aparece un problema al entrar en la nueva version, que indica que no se pueden descomprimir los fuentes (Error decompressing source files!).
De hecho no crea el directorio .source
muchas gracias

vgest escribió el jue, 11 octubre 2012 14:21
Aparece un problema al entrar en la nueva version, que indica que no se pueden descomprimir los fuentes (Error decompressing source files!).
De hecho no crea el directorio .source
muchas gracias

Gracias por la información. Conocemos el problema, será resuelto en una próxima actualización que incluirá todos los pequeños problemas que se vayan encontrando.
Un saludo

Una vez pasada toda la aplicacion a la nueva version compilada con Harbour, quedan solo dos funciones indefinidas:
CallDll() y GetProcAddress()
Estas son precisamente las necesarias para llamar a una funcion dentro de una dll normal (Por ejemplo, codigo c)
Cual es la substitucion de estas dos funciones?

Xevi,
> hBitmap := XA_CaptureBitmap( ::Handle, -5, -28,
> ::nHeight-26 , ::nWidth-1 )
Deberí­a ir el ancho antes que el alto.
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Viktor,
> Una vez pasada toda la aplicacion a la nueva version
> compilada con Harbour, quedan solo dos funciones
> indefinidas:
>
> CallDll() y GetProcAddress()
>
> Estas son precisamente las necesarias para llamar a una
> funcion dentro de una dll normal (Por ejemplo, codigo c)
>
> Cual es la substitucion de estas dos funciones?
De GetProcAddress() es fácil hacer un "wrapper", pero intuyo que
CallDll() va a ser más complejo. Quizás sea mejor buscar alguna
alternativa de Harbour o hacer los "wrappers" que necesites
directamente, sin usar esa función.
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Jose,
es eso, correcto.
Por lo que respecta a la ayuda.. ¿hay documentación de la función???
Gracias.
Un Saludo,
Xevi.