SALUDOS
TENGO PROBLEMAS AL IMPRIMIR POR SEGUNDA VEZ
UNA IMAGEN, UTILIZO EL SIGUIENTE CODIGO
*
FUNCTION REPORTE
PRINT oPrn NAME 'MANTENIMIENTO' PREVIEW
oprn:SETportrait()
oIMG:=TIMAGE():NEW()
oImg:LoadBmp('IMAGEN.BMP' )
PAGE
aTam := oPrn:Cmtr2Pix(21.25,27.5)
oPrn:SayImage(0,0,oIMG,aTam[1],aTam[2])
ENDPAGE
ENDPRINT
oIMG:END()
oFONT1:END()
oFONT2:END()
oFONT3:END()
RETURN NIL
FUNCIONA PERFECTO, PERO CUANDO UTILIZO LA RUTINA
POR SEGUNDA VEZ ME ENVIA EL SIGUIENTE MENSAJE DE ERROR
Error description: Error BASE/1004 Class: 'NIL' has no exported method: HWND
Args:
Stack Calls
===========
Called from: => HWND(0)
Called from: BITMAP.PRG => TBITMAP:NEW(0)
Called from: IMAGE.PRG => TIMAGE:NEW(0)
Called from: cmov.prg => REPORTE(796)
Called from: cmov.prg => (b)MANTENIMIENTO(80)
Called from: TOOLBAR.PRG => TTOOLBAR:COMMAND(0)
Called from: WINDOW.PRG => TMDICHILD:COMMAND(0)
Called from: WINDOW.PRG => TWINDOW:HANDLEEVENT(0)
Called from: MDICHILD.PRG => TMDICHILD:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(0)
Called from: => WINRUN(0)
Called from: WINDOW.PRG => TMDIFRAME:ACTIVATE(0)
Called from: WMANTE.prg => MAIN(97)
ALGUIEN ME PODRIA AYUDAR?
GRACIAS