Impresion de imagen al tamaño de la hoja

Impresion de imagen al tamaño de la hoja

Postby noe aburto » Tue Dec 11, 2018 10:50 am

Saludos

Para evitar impresiones de imprenta, quiero imprimir una imagen JPG al tamaño de la hoja... carta u oficio

ARCH_IMP_COT:='\FUNPAR\BITMAPS\LOGOSERVICIO.JPG'
oPrn:SayImage(1,1,ARCH_IMP_COT,PosX(21.59,oPrn),PosY(35.29,oPrn))

o bien

ARCH_IMP_COT:='\FUNPAR\BITMAPS\LOGOSERVICIO.JPG'
oPrn:Cmtr2Pix(@nR,@nC)
oPrn:Cmtr2Pix(@nX,@nY)
oImage:=TImage():Define(NIL,cArchLogo,oPrn)
oPrn:SayImage(nR,nC,oImage,nX,nY)
oImage:End()

y no me imprime, sera por el tamaño de la imagen?

sugerencias porfa...
Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
User avatar
noe aburto
 
Posts: 418
Joined: Wed Nov 26, 2008 6:33 pm
Location: Morelia, Mich. Mexico.

Re: Impresion de imagen al tamaño de la hoja

Postby cmsoft » Tue Dec 11, 2018 11:52 am

Code: Select all  Expand view
PRINT oPrn NAME "Factura" PREVIEW MODAL
   PAGE
   oPrn:SayImage(0,0, "fondo.jpg", oPrn:nHorzRes(), oPrn:nVertRes() ,   nil, .t. )
   ENDPAGE
ENDPRINT
User avatar
cmsoft
 
Posts: 1204
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Willi Quintana and 24 guests