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.

Combit List Label

Foro de Xailer profesional en español
Responder
miguel
Mensajes: 364
Registrado: Jue Jul 02, 2009 1:09 pm

Combit List Label

Mensaje por miguel »

Hola:
Hace tiempo que Compré este programa, lo he usado con mi anterior
herramienta de programación (Alaska Xbase++) con muy buenos resultados.
Se trata de una DLL. Dispone de varios ejemplos para su implantación,
entre ellos Borland C++ Builder ademas de Xbase++. Tengo los DLL's y los
LIB's. Para probar también he creado los LIB's con IMPLIB.EXE de BCC55.
No lo consigo.
Si yo pusiera aquí­ algún ejemplo, podrí­as ayudarme a utilizarlo con Xailer.
Gracias de antemano.
--
Saludos.
Miguel A. Torrellas
Telf.: 976642728
Movil: 610316131
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Combit List Label

Mensaje por jfgimenez »

Miguel,
> Hace tiempo que Compré este programa, lo he usado con mi anterior
> herramienta de programación (Alaska Xbase++) con muy buenos resultados.
>
> Se trata de una DLL. Dispone de varios ejemplos para su implantación,
> entre ellos Borland C++ Builder ademas de Xbase++. Tengo los DLL's y los
> LIB's. Para probar también he creado los LIB's con IMPLIB.EXE de BCC55. No
> lo consigo.
>
> Si yo pusiera aquí algún ejemplo, podrías ayudarme a utilizarlo con
> Xailer.
Vamos a intentarlo ;-) Si no es muy complicado quizás se podría hacer.
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
miguel
Mensajes: 364
Registrado: Jue Jul 02, 2009 1:09 pm

Combit List Label

Mensaje por miguel »

//////////////////////////////////////////////////////////// //////////
//
// DLL.CH
//
// Copyright:
// Alaska Software, (c) 1998-2003. All rights reserved.
//
// Contents:
// Constants used for DLL calling conventions
// Command to load non Xbase++ DLLs during runtime and call
// DLL functions dynamically
//
//////////////////////////////////////////////////////////// //////////
// Dll.ch is not included
#ifndef _DLL_CH
// calling convention constants
#define DLL_SYSTEM 4
#define DLL_CDECL 8
#define DLL_STDCALL 32
#define DLL_XPPCALL 128
#ifdef __OS2__
#define DLL_OSAPI DLL_SYSTEM
#else
#define DLL_OSAPI DLL_STDCALL
#endif
// calling mode constants
#define DLL_CALLMODE_NORMAL 0x0000
#define DLL_CALLMODE_COPY 0x2000
// DllInfo() #defines
#define DLL_INFO_HANDLE 1
#define DLL_INFO_NAME 2
#define DLL_INFO_PATHNAME 3
#define DLL_INFO_LOADED 4
#define DLL_INFO_TYPE 5
#define DLL_INFO_LIST 6
#define DLL_INFO_PREFIX 7
#define DLL_INFO_UNLOADABLE 8
#define DLL_INFO_USAGELIST 9
#define DLL_INFO_FUNCLIST 10
#define DLL_INFO_CLASSFUNCLIST 11
#define DLL_INFO_IMPORTS 12
#define DLL_TYPE_UNKNOWN 0
#define DLL_TYPE_GENERAL 1
#define DLL_TYPE_XPP_STATIC 2
#define DLL_TYPE_XPP_DYNAMIC 3
#define DLL_TYPE_XPP_DYNAMIC_NOUNLOAD 4
#ifdef __XPP__
// DLLFUNCTION command
#command DLLFUNCTION <Func>([<x,...>]) ;
USING <sys:CDECL,OSAPI,STDCALL,SYSTEM> ;
FROM <(Dll)> ;
=> ;
FUNCTION <Func>([<x>]);;
LOCAL nDll:=DllLoad(<(Dll)>);;
LOCAL xRet:=DllCall(nDll,__Sys(<sys>),<(Func)>[,<x>]);;
DllUnLoad(nDll);;
RETURN xRet
#xtrans __Sys( CDECL ) => DLL_CDECL
#xtrans __Sys( OSAPI ) => DLL_OSAPI
#xtrans __Sys( STDCALL ) => DLL_STDCALL
#xtrans __Sys( SYSTEM ) => DLL_SYSTEM
#xcommand FUNCTION <Func>([<x1,...>] @ [<x2,...>]) ;
=> FUNCTION <Func>([<x1>][<x2>])
#endif // __XPP__
// constants for LoadResource() - resource type
#define RES_STRING 6
#define RES_VERSION 16
#define RES_RAWSTRING 1006
#define RES_VERSIONFIXED 1016
// constants for LoadResource() - version return
#define RES_VERSION_KEY 1
#define RES_VERSION_VALUE 2
#define RES_PRODVER_LS 1
#define RES_PRODVER_MS 2
#define RES_FILEVER_LS 3
#define RES_FILEVER_MS 4
#define RES_FILETIME_LS 5
#define RES_FILETIME_MS 6
// some predefined module handles
#define XPP_MOD_EXE 0
#define XPP_MOD_NLS 0xFFFFFFFF
#define XPP_MOD_RT1 0xFFFFFFFE
#define XPP_MOD_UI1 0xFFFFFFFD
#define XPP_MOD_UI2 0xFFFFFFFC
#define _DLL_CH
#endif
--
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Combit List Label

Mensaje por jfgimenez »

Miguel,
> Para empezar adjunto el módulo que proporciona el fabricante para
> implantarlo en Xbase ++. Con añadir este modulo al proyecto ya estarian
> disponibles las funciones en ALaska.
Por lo que veo, bastaría con hacer todos los "wrappers" necesarios. P.ej.:
> FUNCTION LlJobOpen(nLanguage)
> RETURN DllExecuteCall(tplLlJobOpen, nLanguage)
XA_FUNC( LLJOBOPEN )
{
hb_retnl( LlJobOpen( hb_parnl( 1 ) ) );
}
> FUNCTION LlJobOpenLCID(nLCID)
> RETURN DllExecuteCall(tplLlJobOpenLCID, nLCID)
XA_FUNC( LLJOBOPENLCID )
{
hb_retnl( LlJobOpenLCID( hb_parnl( 1 ) ) );
}
> PROCEDURE LlJobClose(hLlJob)
> DllExecuteCall(tplLlJobClose, hLlJob)
> RETURN
XA_FUNC( LLJOBCLOSE )
{
hb_retnl( LlJobClose( hb_parnl( 1 ) ) );
}
> PROCEDURE LlSetDebug(nOnOff)
> DllExecuteCall(tplLlSetDebug, nOnOff)
> RETURN
XA_FUNC( LLSETDEBUG )
{
LlSetDebug( hb_parl( 1 ) );
}
Y así para todas. No obstante, hay que saber exactamente las funciones que
son, sus parámetros y sus valores de retorno. Y también habrá que usar la
librería de importación.
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Avatar de Usuario
jasm
Mensajes: 447
Registrado: Mar Jul 08, 2008 8:12 pm

Combit List Label

Mensaje por jasm »

Jose, Miguel,
L&L usa un control OCX, aunque creo que es solo para poder incluir el
diseñador dentro de la aplicación.
Jose, es por este motivo por lo que te decí­a que en la empresa en la que
trabajo ahora necesitan OCX en Xailer y es "indispensable" para poder
dar el salto de Alaska a Xailer.
Saludos
Jose A. Suarez
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Combit List Label

Mensaje por jfgimenez »

José Alfonso,
> L&L usa un control OCX, aunque creo que es solo para poder incluir el
> diseñador dentro de la aplicación.
>
> Jose, es por este motivo por lo que te decía que en la empresa en la que
> trabajo ahora necesitan OCX en Xailer y es "indispensable" para poder dar
> el salto de Alaska a Xailer.
Ok. Los OCX estarán listos dentro de poco.
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
miguel
Mensajes: 364
Registrado: Jue Jul 02, 2009 1:09 pm

Combit List Label

Mensaje por miguel »

Adjunto Proyecto, Salen los siguientes errores al compilar:
el fichero CM32L8.DLL no lo puedo adjuntar por tamaño si lo necesitas me
dices como te lo hago llegar.
No puedo incluir el ejemplo que trae para BCC por el mismo motivo de tamaño.
Compilando CMLL8.prg...
CMLL8.prg(14) Error E0001 Statement not allowed outside of procedure or
function
CMLL8.prg(14) Warning W0001 Ambiguous reference: 'LLJOBOPEN'
CMLL8.prg(15) Error E0020 Incomplete statement or unbalanced delimiters
CMLL8.prg(17) Error E0001 Statement not allowed outside of procedure or
function
CMLL8.prg(26) Error E0001 Statement not allowed outside of procedure or
function
CMLL8.prg(26) Warning W0001 Ambiguous reference: 'LLJOBCLOSE'
CMLL8.prg(27) Error E0020 Incomplete statement or unbalanced delimiters
CMLL8.prg(29) Error E0001 Statement not allowed outside of procedure or
function
CMLL8.prg(37) Error E0001 Statement not allowed outside of procedure or
function
CMLL8.prg(37) Warning W0001 Ambiguous reference: 'LLSETDEBUG'
CMLL8.prg(38) Error E0020 Incomplete statement or unbalanced delimiters
CMLL8.prg(40) Error E0001 Statement not allowed outside of procedure or
function
Enlazando prueba.exe...
Fatal: Unable to open file 'CMLL8.OBJ'
3 Warnings, 10 Errors
Saludos.
Miguel A. Torrellas
Telf.: 976642728
Movil: 610316131
Jose F. Gimenez escribió:
> Miguel,
>
>> Para empezar adjunto el módulo que proporciona el fabricante para
>> implantarlo en Xbase ++. Con añadir este modulo al proyecto ya estarian
>> disponibles las funciones en ALaska.
>
> Por lo que veo, bastarí­a con hacer todos los "wrappers" necesarios. P.ej.:
>
>> FUNCTION LlJobOpen(nLanguage)
>> RETURN DllExecuteCall(tplLlJobOpen, nLanguage)
>
> XA_FUNC( LLJOBOPEN )
> {
> hb_retnl( LlJobOpen( hb_parnl( 1 ) ) );
> }
>
>
>> FUNCTION LlJobOpenLCID(nLCID)
>> RETURN DllExecuteCall(tplLlJobOpenLCID, nLCID)
>
> XA_FUNC( LLJOBOPENLCID )
> {
> hb_retnl( LlJobOpenLCID( hb_parnl( 1 ) ) );
> }
>
>
>> PROCEDURE LlJobClose(hLlJob)
>> DllExecuteCall(tplLlJobClose, hLlJob)
>> RETURN
>
>
> XA_FUNC( LLJOBCLOSE )
> {
> hb_retnl( LlJobClose( hb_parnl( 1 ) ) );
> }
>
>
>> PROCEDURE LlSetDebug(nOnOff)
>> DllExecuteCall(tplLlSetDebug, nOnOff)
>> RETURN
>
>
> XA_FUNC( LLSETDEBUG )
> {
> LlSetDebug( hb_parl( 1 ) );
> }
>
> Y así­ para todas. No obstante, hay que saber exactamente las funciones que
> son, sus parámetros y sus valores de retorno. Y también habrá que usar la
> librerí­a de importación.
>
--
miguel
Mensajes: 364
Registrado: Jue Jul 02, 2009 1:09 pm

Combit List Label

Mensaje por miguel »

Si conseguimos implementar L&L. Xailer quedarí­a perfecto para mis
necesidades.
No Podemos olvidar que fuimos muchos los que adquirimos este Reports
Designer. Tenemos muchos Reports creados que podrí­amos utilizar y ademas
no despreciarí­amos una inversión. Tampoco hay que ponerse a estudiar y
aprender mas cosas.
Xailer seria mucho mas potente y deseado.
Saludos.
Miguel A. Torrellas
Telf.: 976642728
Movil: 610316131
José Alfonso Suárez Moreno escribió:
> Jose, Miguel,
>
> L&L usa un control OCX, aunque creo que es solo para poder incluir el
> diseñador dentro de la aplicación.
>
> Jose, es por este motivo por lo que te decí­a que en la empresa en la que
> trabajo ahora necesitan OCX en Xailer y es "indispensable" para poder
> dar el salto de Alaska a Xailer.
>
> Saludos
>
> Jose A. Suarez
miguel
Mensajes: 364
Registrado: Jue Jul 02, 2009 1:09 pm

Combit List Label

Mensaje por miguel »

Se puede descargar la demo en http://en.combit.net/
Saludos.
Miguel A. Torrellas
Telf.: 976642728
Movil: 610316131
José Alfonso Suárez Moreno escribió:
> Jose, Miguel,
>
> L&L usa un control OCX, aunque creo que es solo para poder incluir el
> diseñador dentro de la aplicación.
>
> Jose, es por este motivo por lo que te decí­a que en la empresa en la que
> trabajo ahora necesitan OCX en Xailer y es "indispensable" para poder
> dar el salto de Alaska a Xailer.
>
> Saludos
>
> Jose A. Suarez
miguel
Mensajes: 364
Registrado: Jue Jul 02, 2009 1:09 pm

Combit List Label

Mensaje por miguel »

Adjunto proyecto y al compilar salen estos warnings
Compilando Form1.prg...
Compilando DbfTest.rc...
Compilando Form2.prg...
Compilando DbfTest.prg...
Compilando Combit.prg...
Warning W8065 Combit.prg 17: Call to function 'LlJobClose' with no
prototype in function HB_FUN_LLJOBCLOSE
Warning W8065 Combit.prg 22: Call to function 'LlSetDebug' with no
prototype in function HB_FUN_LLSETDEBUG
Enlazando DbfTest.exe...
2 Warnings, 0 Errors
si se puede me echas un mano
Saludos.
Miguel A. Torrellas
Telf.: 976642728
Movil: 610316131
Jose F. Gimenez escribió:
>> FUNCTION LlJobOpen(nLanguage)
>> RETURN DllExecuteCall(tplLlJobOpen, nLanguage)
>
> XA_FUNC( LLJOBOPEN )
> {
> hb_retnl( LlJobOpen( hb_parnl( 1 ) ) );
> }
>
>
>> FUNCTION LlJobOpenLCID(nLCID)
>> RETURN DllExecuteCall(tplLlJobOpenLCID, nLCID)
>
> XA_FUNC( LLJOBOPENLCID )
> {
> hb_retnl( LlJobOpenLCID( hb_parnl( 1 ) ) );
> }
>
>
>> PROCEDURE LlJobClose(hLlJob)
>> DllExecuteCall(tplLlJobClose, hLlJob)
>> RETURN
>
>
> XA_FUNC( LLJOBCLOSE )
> {
> hb_retnl( LlJobClose( hb_parnl( 1 ) ) );
> }
>
>
>> PROCEDURE LlSetDebug(nOnOff)
>> DllExecuteCall(tplLlSetDebug, nOnOff)
>> RETURN
>
>
> XA_FUNC( LLSETDEBUG )
> {
> LlSetDebug( hb_parl( 1 ) );
> }
>
--
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Combit List Label

Mensaje por jfgimenez »

Miguel,
> Adjunto proyecto y al compilar salen estos warnings
>
> Compilando Form1.prg...
> Compilando DbfTest.rc...
> Compilando Form2.prg...
> Compilando DbfTest.prg...
> Compilando Combit.prg...
> Warning W8065 Combit.prg 17: Call to function 'LlJobClose' with no
> prototype in function HB_FUN_LLJOBCLOSE
> Warning W8065 Combit.prg 22: Call to function 'LlSetDebug' with no
> prototype in function HB_FUN_LLSETDEBUG
> Enlazando DbfTest.exe...
> 2 Warnings, 0 Errors
>
> si se puede me echas un mano
Intentaré revisarlo cuanto antes.
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
miguel
Mensajes: 364
Registrado: Jue Jul 02, 2009 1:09 pm

Combit List Label

Mensaje por miguel »

Gracias por tu interes.
Saludos.
Miguel A. Torrellas
Telf.: 976642728
Movil: 610316131
Jose F. Gimenez escribió:
> Miguel,
>
>> Adjunto proyecto y al compilar salen estos warnings
>>
>> Compilando Form1.prg...
>> Compilando DbfTest.rc...
>> Compilando Form2.prg...
>> Compilando DbfTest.prg...
>> Compilando Combit.prg...
>> Warning W8065 Combit.prg 17: Call to function 'LlJobClose' with no
>> prototype in function HB_FUN_LLJOBCLOSE
>> Warning W8065 Combit.prg 22: Call to function 'LlSetDebug' with no
>> prototype in function HB_FUN_LLSETDEBUG
>> Enlazando DbfTest.exe...
>> 2 Warnings, 0 Errors
>>
>> si se puede me echas un mano
>
> Intentaré revisarlo cuanto antes.
>
miguel
Mensajes: 364
Registrado: Jue Jul 02, 2009 1:09 pm

Combit List Label

Mensaje por miguel »

Hola:
Jose F. Gimenez escribió:
> Vamos a intentarlo ;-) Si no es muy complicado quizás se podrí­a hacer.
>
Con la llegada de OCX en Xailer, hemos conseguido utilizar List & Label
con Xailer integra y totalmente.
Solamente destacar un problema, en el fichero .ch que se crea al
importar el control ActiveX, hay que sustituir #xTranslate pro #define,
da error al compilar.
Saludos. Miguel A. Torrellas
Responder