I'm not sure this will work for you, but you can set the image as the canvas
backdrop and save it out as an image very easily.

You should be able to modify the code as needed...

PushButton Action Event:
  Dim thePic as Picture
  Dim f as FolderItem
  
  f = GetSaveFolderItem("","Picture")
  If f <> Nil then
    thePic = Canvas1.Backdrop
    f.SaveAsPicture thePic
  end if


_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to