topic-20454

Board index FiveWin para Harbour/xHarbour Impresion a Pdf

Posts: 196

Joined: Fri May 15, 2009 01:25 AM

Impresion a Pdf
Posted: Wed Dec 08, 2010 07:34 PM

Por favor necesito la ayuda del foro

Tengo configurada mi aplicacion para imprimir con TPrinter y USER PREVIEW

Se trata de imprimir una factura que lleva una imagen (logo)

Al momento de que me aparece el cuadro de diálogo de imprimir, yo selecciono una impresora virtual ( en este caso uso DOPDF), pulso imprimir y cuando veo mi factura, la imagen del logo está más grande.

Sin embargo cuando mando imprimir la factura directamente a la impresora todo sale normal, la cuestión es que requiero primeramente crear el pdf

Anexo el link de imagenes

Saludos

Juan Arroyo
México
FWH 7.12 VERCE 5.3 xHarbour 1.1.0
juan_arroyo_t@hotmail.com

QAZWSX2K

Posts: 364

Joined: Tue Oct 25, 2005 07:06 PM

Re: Impresion a Pdf
Posted: Thu Dec 09, 2010 02:02 AM

yo te recomendaria que reduzcas el tamaño en pixel de la imagen ya que en fivewin probablemente usas adjust en un espacio predeterminado y al pasar a pdf no lo haga, esto como solucion rapida claro

Software especializado para oficinas contables con grandes volumenes de Informacion
Impresion de todos los formularios del Seniat, Dian

alex_patino74@hotmail.com
whatsapp 57+3214777217

juan_arroyo_t

Posts: 196

Joined: Fri May 15, 2009 01:25 AM

Re: Impresion a Pdf
Posted: Thu Dec 09, 2010 03:32 AM

QAZWSX2K

Gracias por tu respuesta

Estoy usando el adjust en en otros módulos de mi aplicacion por ejemplo :

Code (fw): Select all Collapse

STATIC FUNCTION barra(oDlg, oLbx)
    DEFINE BUTTONBAR oBar SIZE 32,32 3DLOOK OF oDlg

    DEFINE BUTTON OF oBar ;
        FILENAME ".\bmps\ag.bmp" ;
        ADJUST ;
        NOBORDER TOOLTIP "Agregar" ;
        ACTION AltCli(oDlg, oLbx)
    
    DEFINE BUTTON OF oBar ;
        FILENAME ".\bmps\mod.bmp" ;
        ADJUST ;
        NOBORDER TOOLTIP "Modificar" ;
        ACTION ModCli(oLbx)

Si yo reduzco los pixeles va a suceder lo mismo no ?

Yo tengo este fragmento en mi modulo donde imprimo el logo

Code (fw): Select all Collapse

STATIC FUNCTION Cabeceras( oPrn, oFontD, oFontC, oPen, nHojaImp, nPosLin, ;
                           oXmlNodo, oXmlFact )
    LOCAL aFrom, aTo
    
    * Encabezado de datos de factura emitida
    
    aFrom :=oPrn:Cmtr2Pix( 1.0, 0.7 )
   aTo   :=oPrn:Cmtr2Pix( 8.0, 1.1 )
   
      oPrn:SayBitmap(aFrom[1],aFrom[2],".\bmps\TitSer.Bmp",aTo[1],aTo[2])
    
   
   // Caja de partidas

Saludos

Juan Arroyo
México
FWH 7.12 VERCE 5.3 xHarbour 1.1.0
juan_arroyo_t@hotmail.com

FiveTech Support Forums

Continue the discussion