Como imprimi una imagen .jpg

[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.

[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

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.

[Ruben Fernandez]

Gracias Manuel:

Solucionado.

Saludos

Ruben Fernandez.