FUNCTION ShowImage(bimage) > >RETURN CREATEOBJECT("PrintImage").refresh(bimage) >ENDFUNC > >DEFINE CLASS printimage AS image >PROCEDURE refresh(Pictureval) >this.PictureVal=m.Pictureval >RETURN m.this >ENDPROC > >ENDDEFINE >I don't know, but it's simple enough. I used this solution also.