Am 09.10.2012 um 23:26 schrieb Sergio Tamborini <[email protected]>:

> Hello!
> 
> I don't understand how this two commands works. I need to open a png, show 
> the picture and save it again keeping the transparency present into my png 
> file...


It should be as easy as this:

  dim f as FolderItem = SpecialFolder.Desktop.Child("test.png")
  dim p as PNGPictureMBS = f.OpenAsPNGMBS
  
  dim g as FolderItem = SpecialFolder.Desktop.Child("output.png")
  if g.SaveAsPNGMBS(p.Pict, p.Mask) then
    MsgBox "OK"
  else
    MsgBox "Failed"
  end if
  
Or what problem do you have?  

Greetings
Christian

-- 
Read our blog about news on our plugins:

http://www.mbsplugins.de/

_______________________________________________
Mbsplugins_monkeybreadsoftware.info mailing list
[email protected]
https://ml01.ispgateway.de/mailman/listinfo/mbsplugins_monkeybreadsoftware.info

Reply via email to