Enviar imagen atrás en report
Posted: Mon Sep 18, 2023 8:37 pm
Hola buenas tardes para todos, estamos generando un report (printer) pero estamos colocando una imagen de fondo, que ocupa toda la página, la imagen esta en formato .png
En la previsualización se mira bien, pero al momento de imprimir solo se imprime la imagen que esta de fondo en toda la página. Lo que se ve en la miniatura.
De antemano gracias
En la previsualización se mira bien, pero al momento de imprimir solo se imprime la imagen que esta de fondo en toda la página. Lo que se ve en la miniatura.
Code: Select all | Expand
***********************************
*PROCESO IMPRESION DE LAS GARANTIAS
***********************************
FUNCTION impGarantias()
Local cRutaLogo := ".\report\Imagen1.png"
Local cRutaLogo2 := ".\report\Imagen2.png"
Local aPgSize := {}
EASYREPORT oVRD NAME ".\report\garantias.vrd" PREVIEW (.T.) MODAL
IF oVRD:lDialogCancel = .T.
RETURN( .F. )
ENDIF
aPgSize := oVRD:oPrn:GetPhySize
PRINTAREA 1 OF oVRD
oVRD:oPrn:PrintImage( 1, 10, cRutaLogo, aPgSize[1] - 3 , aPgSize[2] , .T. , , , ,"MM" )
PAGEBREAK oVRD
PRINTAREA 2 OF oVRD
oVRD:oPrn:PrintImage( 4, 10, cRutaLogo2, aPgSize[1] - 13 , aPgSize[2] - 3 , .T. , , , ,"MM" )
END EASYREPORT oVRD
Return nil
