Platforms to show: All Mac Windows Linux Cross-Platform

Back to Picture class.

Picture.SetSteganographyPictureMBS(flags as Integer, data as Picture) as boolean

Type Topic Plugin Version macOS Windows Linux iOS Targets
method Graphics & Pictures MBS Picture Plugin 16.2 ✅ Yes ✅ Yes ✅ Yes ✅ Yes All
Adds steganography to an existing picture.
Example 
const AllChannels = &h111

dim p as new Picture(500, 500, 32)
dim l as Picture = LogoMBS(500)

dim w as new window1
w.Title = "Logo"
w.Backdrop = l

// adds picture. You will normally not see the modification
if p.SetSteganographyPictureMBS(AllChannels, l) then
  
  w = new window1
  w.Title = "Logo hidden in white picture"
  w.Backdrop = p
  
  // as we store in lowest bit, this picture will look strange
  dim y as Picture = p.SteganographyPictureMBS(AllChannels)
  
  w = new window1
  w.Title = "Logo extracted"
  w.Backdrop = y
end if

Flags can be a combination of red (&h100), green (&h010) and blue (&h001).
Returns true on success or false on failure.

Function does not handle mask or alpha channel.

Blog Entries

The items on this page are in the following plugins: MBS Picture Plugin.


The biggest plugin in space...