Page 1 of 1

Como imprimi una imagen .jpg

Posted: Wed Feb 14, 2007 2:54 am
by Ruben Fernandez
Amigos.

Tengo en una base de datos
"C:\programa\foto\0080.jpg"
Esta imagen la muestro, pero al imprimirla
no lo hace.

Uso.:

oPrn:SayBitmap(aDesde[1],aDesde[2],oImage,aAncho[1],aAncho[2] )
o
oPrn:SayImage(0,0,oImage )

Ninguna de las 2 maneras lo hace.

FWH 2.7, Harbour, Borland

Agradezco alguna ayuda.

Gracias.

Ruben Fernandez.

Re: Como imprimi una imagen .jpg

Posted: Wed Feb 14, 2007 4:45 pm
by Manuel Aranda
Para un JPG,PNG,TIF, etc.
oIT = TImage():Define( , "IMAGEN.JPG" )
aTam := oPrn:Cmtr2Pix(21,29.7)
oPrn:SayImage(0,0,oIT,aTam[1], aTam[2])

Para unBMP
SayBitmap(0,0,21,29.7,"IMAGEN.BMP",oPrn)

Saludos,
Manuel Aranda
Ruben Fernandez wrote:Amigos.

Tengo en una base de datos
"C:\programa\foto\0080.jpg"
Esta imagen la muestro, pero al imprimirla
no lo hace.

Uso.:

oPrn:SayBitmap(aDesde[1],aDesde[2],oImage,aAncho[1],aAncho[2] )
o
oPrn:SayImage(0,0,oImage )

Ninguna de las 2 maneras lo hace.

FWH 2.7, Harbour, Borland

Agradezco alguna ayuda.

Gracias.

Ruben Fernandez.

Posted: Wed Feb 14, 2007 7:41 pm
by Ruben Fernandez
Gracias Manuel:

Solucionado.

Saludos

Ruben Fernandez.