FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Como imprimi una imagen .jpg
Ruben Fernandez
Posts: 366
Joined: Wed Aug 30, 2006 05:25 PM
Como imprimi una imagen .jpg
Posted: Wed Feb 14, 2007 02: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.

Gracias y Saludos

Ruben Fernandez - Uruguay

FWH 11.06, Harbour, Borland 5.82
Manuel Aranda
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Re: Como imprimi una imagen .jpg
Posted: Wed Feb 14, 2007 04: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.
Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Ruben Fernandez
Posts: 366
Joined: Wed Aug 30, 2006 05:25 PM
Como imprimi una imagen .jpg
Posted: Wed Feb 14, 2007 07:41 PM

Gracias Manuel:

Solucionado.

Saludos

Ruben Fernandez.

Gracias y Saludos

Ruben Fernandez - Uruguay

FWH 11.06, Harbour, Borland 5.82

Continue the discussion

Static archive · New replies & topics via GitHub Discussions