TPRINTER + PNG + BMP + JPG

TPRINTER + PNG + BMP + JPG

Postby jbrita » Sat Sep 28, 2013 8:26 pm

Amigo puedo puedo poner una imagen con estas extenciones, se que con bmp se puede pero con png no he podido hacerlo
alguna ayuda

saludos
jbrita
 
Posts: 486
Joined: Mon Jan 16, 2006 3:42 pm

Re: TPRINTER + PNG + BMP + JPG

Postby jbrita » Wed Oct 02, 2013 12:43 pm

Amigo nadien lo ha echo con jpg o png

Saludos
jbrita
 
Posts: 486
Joined: Mon Jan 16, 2006 3:42 pm

Re: TPRINTER + PNG + BMP + JPG

Postby sysctrl2 » Wed Oct 02, 2013 10:59 pm

Con .jpg

SayImg( "img.jpg", oPrn,3,10, 6, 3 )

function SayImg( cImage, oPrn, nRen, nCol, nAncho, nAlto )
local oImg := TImage():Define( , cImage )
local aTam := oPrn:Cmtr2Pix(nAncho,nAlto)
oPrn:SayImage(nRen,nCol,oImg,aTam[1], aTam[2])
oImg:end()
return nil

saludos.

cesar.SysCtrl.Soft.
Cesar Cortes Cruz
SysCtrl Software
Mexico

' Sin +- FWH es mejor "
User avatar
sysctrl2
 
Posts: 951
Joined: Mon Feb 05, 2007 7:15 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 80 guests