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...
Impresion de imagen al tamaño de la hoja
- 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
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
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
Re: Impresion de imagen al tamaño de la hoja
Code: Select all
PRINT oPrn NAME "Factura" PREVIEW MODAL
PAGE
oPrn:SayImage(0,0, "fondo.jpg", oPrn:nHorzRes(), oPrn:nVertRes() , nil, .t. )
ENDPAGE
ENDPRINT