Code: Select all
PRINT oPrn NAME 'MANTENIMIENTO' PREVIEW
oprn:SETportrait()
oIMG:=TIMAGE():NEW()
oImg:LoadBmp('F32a.BMP' )
PAGE
aTam := oPrn:Cmtr2Pix(21.25,27.5)
oPrn:SayImage(0,0,oIMG,aTam[1],aTam[2])
ENDPAGE
ENDPRINT
oIMG:END()
RETURN NIL
Alguien Me puede Ayudar.
Saludos y Gracias