TsButton 6.2

TsButton 6.2

Postby Armando Picon » Tue May 20, 2008 6:48 pm

Manuel

Deseo generar la lib de tu clase (tsbutton.lib). He bajado las fuentes que indicas y utilizando Ajmake intento generar la lib correspondiente. El caso es que, a pesar de usar el flag -D__HARBOUR__, en el obj que forma bpaint, hay tres métodos que se forman con menos caracteres de lo que está señalado en los archivos fuente. El principal de ellos es GetFontHeight que se trunca en GetFontHei. cosa similar pasa con color..., etc. ¿Alguna recomendación para superar este problemilla?
FWH + BCC582 + WorkShop 4.5 + Resource Hacker + Mingw
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com
User avatar
Armando Picon
 
Posts: 446
Joined: Mon Dec 26, 2005 9:11 pm
Location: Lima, Peru

Re: TsButton 6.2

Postby mmercado » Wed May 21, 2008 1:45 am

Armando Picon wrote:Deseo generar la lib de tu clase (tsbutton.lib). He bajado las fuentes que indicas y utilizando Ajmake intento generar la lib correspondiente. El caso es que, a pesar de usar el flag -D__HARBOUR__, en el obj que forma bpaint, hay tres métodos que se forman con menos caracteres de lo que está señalado en los archivos fuente. El principal de ellos es GetFontHeight que se trunca en GetFontHei. cosa similar pasa con color..., etc. ¿Alguna recomendación para superar este problemilla?

Hola Armando:

Desconozco el uso de ajmake pero podrás construír la lib con RMake usando SButtonx.rmk cuyo código te describo a continuación.
Code: Select all  Expand view  RUN
// SButtonx.rmk
Def ="__HARBOUR__"

// defining paths
BC ="c:\bcc55"
FW ="c:\FWH"
HB ="c:\xHarbour"
makepath[.prg] ="..\source\classes"
makepath[.c] =".\;..\source\function"

.prg.c:
   $(HB)\bin\harbour $< /n  /i..\include;$(FW)\include;$(HB)\include > comp.log

.c.obj:
   $(BC)\bin\bcc32 -D$(Def) -O2 -c -I$(HB)\include;$(FW)\include $<  >> comp.log

TSButton.c     : TSButton.prg
TSBar.c        : TSBar.prg
TSLines.c      : TSLines.prg
TSRadio.c      : TSRadio.prg
TSTSay.c       : TSTSay.prg
TSButton.obj   : TSButton.c
TSBar.obj      : TSBar.c
TSLines.obj    : TSLines.c
TSRadio.obj    : TSRadio.c
TSTSay.obj     : TSTSay.c
BPaint.obj     : BPaint.c
TSButton.exe   : BPaint.obj TSButton.obj TSBar.obj TSLines.obj TSRadio.obj TSTSay.obj
                 Del SButtonX.lib
                 $(BC)\bin\Tlib SButtonX +TSButton  > Lib.log
                 $(BC)\bin\Tlib SButtonX +BPaint   >> Lib.log
                 $(BC)\bin\Tlib SButtonX +TSBar    >> Lib.log
                 $(BC)\bin\Tlib SButtonX +TSLines  >> Lib.log
                 $(BC)\bin\Tlib SButtonX +TSRadio  >> Lib.log
                 $(BC)\bin\Tlib SButtonX +TSTSay   >> Lib.log
                 Del *.c
                 Del *.obj
                 Del *.log
                 Del *.bak

Usa este código, porque el que va con el paquete creo que no funciona.

Desde \TSButton\Lib ejecuta: RMake SButtonx

Saludos.

Manuel Mercado
User avatar
mmercado
 
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Re: TsButton 6.2

Postby Armando Picon » Wed May 21, 2008 12:38 pm

Manuel

Este Rmake es el mismo que usábamos en Clipper?... Y otra... Hay también el flag __FLAT__ que recomiendan Los gurús del xHarbour ¿Donde lo escribo?

mmercado wrote:
Armando Picon wrote:Deseo generar la lib de tu clase (tsbutton.lib). He bajado las fuentes que indicas y utilizando Ajmake intento generar la lib correspondiente. El caso es que, a pesar de usar el flag -D__HARBOUR__, en el obj que forma bpaint, hay tres métodos que se forman con menos caracteres de lo que está señalado en los archivos fuente. El principal de ellos es GetFontHeight que se trunca en GetFontHei. cosa similar pasa con color..., etc. ¿Alguna recomendación para superar este problemilla?

Hola Armando:

Desconozco el uso de ajmake pero podrás construír la lib con RMake usando SButtonx.rmk cuyo código te describo a continuación.
Code: Select all  Expand view  RUN
// SButtonx.rmk
Def ="__HARBOUR__"  --->>; __FLAT__ ???

// defining paths
BC ="c:\bcc55"
FW ="c:\FWH"
HB ="c:\xHarbour"
makepath[.prg] ="..\source\classes"
makepath[.c] =".\;..\source\function"

.prg.c:
   $(HB)\bin\harbour $< /n  /i..\include;$(FW)\include;$(HB)\include > comp.log

.c.obj:
   $(BC)\bin\bcc32 -D$(Def) -O2 -c -I$(HB)\include;$(FW)\include $<  >> comp.log

TSButton.c     : TSButton.prg
TSBar.c        : TSBar.prg
TSLines.c      : TSLines.prg
TSRadio.c      : TSRadio.prg
TSTSay.c       : TSTSay.prg
TSButton.obj   : TSButton.c
TSBar.obj      : TSBar.c
TSLines.obj    : TSLines.c
TSRadio.obj    : TSRadio.c
TSTSay.obj     : TSTSay.c
BPaint.obj     : BPaint.c
TSButton.exe   : BPaint.obj TSButton.obj TSBar.obj TSLines.obj TSRadio.obj TSTSay.obj
                 Del SButtonX.lib
                 $(BC)\bin\Tlib SButtonX +TSButton  > Lib.log
                 $(BC)\bin\Tlib SButtonX +BPaint   >> Lib.log
                 $(BC)\bin\Tlib SButtonX +TSBar    >> Lib.log
                 $(BC)\bin\Tlib SButtonX +TSLines  >> Lib.log
                 $(BC)\bin\Tlib SButtonX +TSRadio  >> Lib.log
                 $(BC)\bin\Tlib SButtonX +TSTSay   >> Lib.log
                 Del *.c
                 Del *.obj
                 Del *.log
                 Del *.bak

Usa este código, porque el que va con el paquete creo que no funciona.

Desde \TSButton\Lib ejecuta: RMake SButtonx

Saludos.

Manuel Mercado
FWH + BCC582 + WorkShop 4.5 + Resource Hacker + Mingw
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com
User avatar
Armando Picon
 
Posts: 446
Joined: Mon Dec 26, 2005 9:11 pm
Location: Lima, Peru

Re: TsButton 6.2

Postby mmercado » Wed May 21, 2008 4:37 pm

Armando Picon wrote:Este Rmake es el mismo que usábamos en Clipper?...
Exactamente el mismo, espero que todavía tengas Clipper instalado.

Armando Picon wrote: Y otra... Hay también el flag __FLAT__ que recomiendan Los gurús del xHarbour ¿Donde lo escribo?
Nunca he usado ese flag y no he tenido ningún problema, pero si lo quieres poner hazlo tal como lo muestras.

Saludos.

Manuel Mercado
User avatar
mmercado
 
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Postby Armando Picon » Wed May 21, 2008 6:36 pm

Manuel

Voy a probarlo...

Se me ocurrió utilizar el Verce 5.3 y se pudo crear la lib, pero.... la compilación de bPaint.c finaliza con el mensaje que existe un valor asignado, en la rutina, que nunca es utilizado ( No he podido establecer qué valor es para corregir la rutina :roll: )
FWH + BCC582 + WorkShop 4.5 + Resource Hacker + Mingw
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com
User avatar
Armando Picon
 
Posts: 446
Joined: Mon Dec 26, 2005 9:11 pm
Location: Lima, Peru

Postby mmercado » Thu May 22, 2008 12:08 am

Armando Picon wrote:la compilación de bPaint.c finaliza con el mensaje que existe un valor asignado, en la rutina, que nunca es utilizado ( No he podido establecer qué valor es para corregir la rutina :roll: )
Corresponde a una variable que usaba anteriormente y todavía pienso volver a utilizar , por eso no la he quitado, pero ese mensaje de advertencia no afecta en nada la funcionalidad de la librería.

Saludos.

Manuel Mercado
User avatar
mmercado
 
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Postby Armando Picon » Thu May 22, 2008 12:49 am

Ok, Manuel

También voy a probar el de generar la librería Sbrowse... ¿alguna recomendación?
FWH + BCC582 + WorkShop 4.5 + Resource Hacker + Mingw
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com
User avatar
Armando Picon
 
Posts: 446
Joined: Mon Dec 26, 2005 9:11 pm
Location: Lima, Peru


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 36 guests