Como imprimi una imagen .jpg

Como imprimi una imagen .jpg

Postby Ruben Fernandez » Wed Feb 14, 2007 2:54 am

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
 
Posts: 366
Joined: Wed Aug 30, 2006 5:25 pm
Location: Uruguay

Re: Como imprimi una imagen .jpg

Postby Manuel Aranda » Wed Feb 14, 2007 4:45 pm

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.
User avatar
Manuel Aranda
 
Posts: 604
Joined: Wed Oct 19, 2005 8:20 pm
Location: España

Postby Ruben Fernandez » Wed Feb 14, 2007 7:41 pm

Gracias Manuel:

Solucionado.

Saludos

Ruben Fernandez.
Ruben Fernandez
 
Posts: 366
Joined: Wed Aug 30, 2006 5:25 pm
Location: Uruguay


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 26 guests