In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Xailer 2.7

Foro público de Xailer en español
User avatar
ignacio
Site Admin
Posts: 8574
Joined: Mon Apr 06, 2015 8:00 pm
Location: Madrid, Spain
Contact:

Xailer 2.7

Postby ignacio » Tue Oct 09, 2012 7:47 pm

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
Cassiano de Oliveira
Posts: 475
Joined: Tue Jul 24, 2012 10:21 pm

Xailer 2.7

Postby Cassiano de Oliveira » Tue Oct 09, 2012 10:25 pm

Parabens....
"Ignacio Ortiz de Zúñiga" wrote in message
news:50746318$1@svctag-j7w3v3j....
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
User avatar
Carlos Ortiz
Posts: 846
Joined: Wed Jul 01, 2009 5:44 pm
Location: Argentina - Córdoba
Contact:

Xailer 2.7

Postby Carlos Ortiz » Wed Oct 10, 2012 1:35 am

Excelente, felicitaciones y gracias!
Pregunta: Podremos usar los multihilos de harbour en serio desde la
versión Profesional?
@dbfarma
www.dbfarma.com.ar
Gabo
Posts: 104
Joined: Wed Oct 27, 2010 1:36 am

Xailer 2.7

Postby Gabo » Wed Oct 10, 2012 3:05 am

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
Cassiano de Oliveira
Posts: 475
Joined: Tue Jul 24, 2012 10:21 pm

Xailer 2.7

Postby Cassiano de Oliveira » Wed Oct 10, 2012 4:45 am

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$1@svctag-j7w3v3j....
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
User avatar
jfgimenez
Site Admin
Posts: 5620
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Xailer 2.7

Postby jfgimenez » Wed Oct 10, 2012 10:21 am

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
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Xailer 2.7

Postby XeviCOMAS » Wed Oct 10, 2012 8:19 pm

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.
Un Saludo,
Xevi.
User avatar
jfgimenez
Site Admin
Posts: 5620
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Xailer 2.7

Postby jfgimenez » Wed Oct 10, 2012 8:40 pm

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
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
User avatar
emeasoft
Posts: 1062
Joined: Wed Apr 01, 2009 4:12 pm
Location: emeasoft
Contact:

Xailer 2.7

Postby emeasoft » Wed Oct 10, 2012 8:41 pm

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
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Xailer 2.7

Postby XeviCOMAS » Wed Oct 10, 2012 8:51 pm

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.
Un Saludo,
Xevi.
User avatar
emeasoft
Posts: 1062
Joined: Wed Apr 01, 2009 4:12 pm
Location: emeasoft
Contact:

Xailer 2.7

Postby emeasoft » Wed Oct 10, 2012 8:54 pm

No se si me puede surgir alguna complicación al utilizar en red... 

Utilizamos en red sin problemas;
Mário
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Xailer 2.7

Postby XeviCOMAS » Wed Oct 10, 2012 8:56 pm

José,
Correcto,... HB_CurDrive() y funciona correctamente.
Entiendo y lo sabré para funciones que no encuentre de añadirles HB_
Gracias.
Un Saludo,
Xevi.
Un Saludo,
Xevi.
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Xailer 2.7

Postby XeviCOMAS » Thu Oct 11, 2012 10:19 am

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.
Un Saludo,
Xevi.
User avatar
jfgimenez
Site Admin
Posts: 5620
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Xailer 2.7

Postby jfgimenez » Thu Oct 11, 2012 10:52 am

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?id=migrar.de.xharbou r.a.harbour
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Xailer 2.7

Postby XeviCOMAS » Thu Oct 11, 2012 11:00 am

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.
Un Saludo,
Xevi.
User avatar
jfgimenez
Site Admin
Posts: 5620
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Xailer 2.7

Postby jfgimenez » Thu Oct 11, 2012 11:05 am

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
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Xailer 2.7

Postby XeviCOMAS » Thu Oct 11, 2012 11:51 am

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.
Un Saludo,
Xevi.
vgest
Posts: 32
Joined: Mon Jul 30, 2012 5:06 pm

Xailer 2.7

Postby vgest » Thu Oct 11, 2012 2:21 pm


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
User avatar
ignacio
Site Admin
Posts: 8574
Joined: Mon Apr 06, 2015 8:00 pm
Location: Madrid, Spain
Contact:

Xailer 2.7

Postby ignacio » Thu Oct 11, 2012 3:54 pm

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
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
vgest
Posts: 32
Joined: Mon Jul 30, 2012 5:06 pm

Xailer 2.7

Postby vgest » Thu Oct 11, 2012 6:22 pm


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?
User avatar
jfgimenez
Site Admin
Posts: 5620
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Xailer 2.7

Postby jfgimenez » Fri Oct 12, 2012 12:35 pm

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
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
User avatar
jfgimenez
Site Admin
Posts: 5620
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Xailer 2.7

Postby jfgimenez » Fri Oct 12, 2012 12:40 pm

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
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Xailer 2.7

Postby XeviCOMAS » Fri Oct 12, 2012 7:40 pm

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

Return to “Spanish”