IMPRESION ARCHIVOS PDF

[karinha]

Muchas Gracias Estimado Joao

Y no hay otro?

Mi estimado Adhemar, siempre HAY:

https://libharu.sourceforge.net/fonts.html

Code: Select all | Expand

The Base14 Fonts:
Courie
Courier-Bold
Courier-Oblique
Courier-BoldOblique
Helvetica
Helvetica-Bold
Helvetica-Oblique
Helvetica-BoldOblique
Times-Roman
Times-Bold
Times-Italic
Times-BoldItalic
Symbol
ZapfDingbats
 

Code: Select all | Expand

   Font1 := HPDF_LoadTTFontFromFile( oPdf, 'C:\Windows\Fonts\Verdana.ttf', HPDF_TRUE )
   Font2 := HPDF_LoadTTFontFromFile( oPdf, 'C:\Windows\Fonts\Lucon.ttf', HPDF_TRUE )

 

https://stackoverflow.com/questions/591 ... in-libharu

http://www.pctoledo.com.br/forum/viewto ... 99#p124216

Show:

https://codeberg.org/seigakaku/libharu/ ... _demo_jp.c

Regards, saludos.

[pedroluis]

Hola de nuevo !

Mr. Rao:

Siguiendo co el tema de la impresión de los PDF...
Les conté que tengo fwh2307

Pero cuando le pongo la línea TPrinter():lUseHaruPDF:= .t.
(ya está puesto el REQUEST FWHARU al comienzo del programa)

TPrinter():lUseHaruPDF:= .t.
xnum:=99->numero
cPdfFile := m->xpath+"\PDF\"+strzero(99->cliente,6)+".pdf"
PRINTER oprn FILE cPdfFile

Me sale el siguiente error:

Called from: source\rtl\tobject.prg => FWPDF:ERROR( 0 )
Called from: source\rtl\tobject.prg => FWPDF:MSGNOTFOUND( 0 )
Called from: source\rtl\tobject.prg => FWPDF:SETSIZE( 0 )
Called from: vta1214.prg => VTA1100PE( 242 )

Parece un problema del SIZE. ¿ Como se arregla ?

Gracias !!!

[acuellar]

Gracias Estimado Joao, Haré pruebas


Estimado Pedroluis

Debe enlazar libhpdf32.lib y hbhpdf32.lib

[nageswaragunupudi]

As of now the FWPDF class does not support the method SetSize( nWidth, nHeight )
This class supports only SetPage( nPageType ), same as TPrinter class.
The permitted page sizes are:

Code: Select all | Expand

   { {  DMPAPER_LETTER,      HPDF_PAGE_SIZE_LETTER,   8.5*25.4, 11*25.4 } ;
   , {  DMPAPER_LETTERSMALL, HPDF_PAGE_SIZE_LETTER,   8.5*25.4, 11*25.4 } ;
   , {  DMPAPER_LEGAL,       HPDF_PAGE_SIZE_LEGAL,    8.5*25.4, 14*25.4 } ;
   , {  DMPAPER_A3,          HPDF_PAGE_SIZE_A3,       297.0, 420.0 } ;
   , {  DMPAPER_A4,          HPDF_PAGE_SIZE_A4,       210.0, 297.0 } ;
   , {  DMPAPER_A4SMALL,     HPDF_PAGE_SIZE_A4,       210.0, 297.0 } ;
   , {  DMPAPER_A5,          HPDF_PAGE_SIZE_A5,       148.0, 210.0 } ;
   , {  DMPAPER_B4,          HPDF_PAGE_SIZE_B4,       250.0, 354.0 } ;
   , {  DMPAPER_B5,          HPDF_PAGE_SIZE_B5,       182.0, 257.0 } ;
   , {  DMPAPER_EXECUTIVE,   HPDF_PAGE_SIZE_EXECUTIVE,7.25*15.4, 10.5*25.4 } ;
 

Code: Select all | Expand

#define DMPAPER_LETTER    1       // Letter 8 1/2 x 11 in
#define DMPAPER_LETTERSMALL 2       // Letter Small 8 1/2 x 11 in
#define DMPAPER_LEGAL     5       // Legal 8 1/2 x 14 in
#define DMPAPER_EXECUTIVE   7       // Executive 7 1/4 x 10 1/2 in
#define DMPAPER_A3      8       // A3 297 x 420 mm
#define DMPAPER_A4      9       // A4 210 x 297 mm
#define DMPAPER_A4SMALL   10      // A4 Small 210 x 297 mm
#define DMPAPER_A5      11      // A5 148 x 210 mm
#define DMPAPER_B4      12      // B4 250 x 354
#define DMPAPER_B5      13      // B5 182 x 257 mm
 

If paper size you want matches one of these, please use the suitable constant and use SetPage( nSize )

If you want a totally different size, please let us know the size you want (milli-metres)

[karinha]

Gracias Estimado Joao, Haré pruebas


Estimado Pedroluis

Debe enlazar libhpdf32.lib y hbhpdf32.lib

Estimado Adhemar esto és el correcto:

Code: Select all | Expand

echo %hdirl%\hbhpdf.lib + >> b32.bc
echo %hdirl%\libharu.lib + >> b32.bc
 

Regards, saludos.

[acuellar]

Estimado Joao

Estas son de FWH libhpdf32.lib hbhpdf32.lib

Estas son de Harbour libhpdf.lib hbhpdf.lib

Enlazando cualquiera, funciona

libharu.lib no tengo

[karinha]

Estimado Joao

Estas son de FWH libhpdf32.lib hbhpdf32.lib

Estas son de Harbour libhpdf.lib hbhpdf.lib

Enlazando cualquiera, funciona

libharu.lib no tengo

Estimado:

Code: Select all | Expand

 \xharbour\lib\libharu.lib
 

Creo que tú version del FWH no tenga necesidad de la .LIB: LIBHARU.LIB.

Regards, saludos.

[acuellar]

Estimado

No uso xHarbour

Deberías cambiarte a Harbour es mas poderoso

y con MSVS 2022 Lo mejor

[karinha]

Estimado

No uso xHarbour

Deberías cambiarte a Harbour es mas poderoso

y con MSVS 2022 Lo mejor

Dices eso porque mi querido amigo no conoce el NUEVO COMPILADOR BCC7.60 para xHarbour. ¡¡Simplemente maravilloso!! jajajajajajajaja.

Regards, saludos.

[acuellar]

Estimado Joao

De donde se puede descargar BCC7.60 ?

[karinha]

Estimado Joao

De donde se puede descargar BCC7.60 ?

Mira que fantástico fué Master Enrico aqui:


https://forums.fivetechsupport.com/view ... 36#p263687

Regards, saludos.

[Enrico Maria Giordano]

Estimado Joao

De donde se puede descargar BCC7.60 ?

http://xharbour.org/index.asp?page=down ... quired_win

[acuellar]

Gracias estimado Joao

Thank you Dear Enrico

I will try it