Impresion de imagen al tamaño de la hoja

Post Reply
User avatar
noe aburto
Posts: 420
Joined: Wed Nov 26, 2008 6:33 pm
Location: Morelia, Mich. Mexico.

Impresion de imagen al tamaño de la hoja

Post by noe aburto »

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
cmsoft
Posts: 653
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina

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

Post by cmsoft »

Code: Select all

PRINT oPrn NAME "Factura" PREVIEW MODAL
   PAGE
   oPrn:SayImage(0,0, "fondo.jpg", oPrn:nHorzRes(), oPrn:nVertRes() ,   nil, .t. )
   ENDPAGE
ENDPRINT
Post Reply