Tip of the day: Rotate image with CoreImage
// Rotate image with CoreImage
// load image
dim f as FolderItem = SpecialFolder.Desktop.Child("test.png")
dim image as new CIImageMBS(f)
// rotate 45 degree
dim n as new NSAffineTransformMBS
n.rotateByDegrees(45)
dim TransformFilter as new CIFilterAffineTransformMBS
TransformFilter.inputImage = image
TransformFilter.inputTransform = n
// get result
dim resultImage as CIImageMBS = TransformFilter.outputImage
// for saving to file
dim outputImage as NSImageMBS = resultImage.RenderNSImage(false)
f = SpecialFolder.Desktop.Child("output.png")
dim b as BinaryStream = BinaryStream.Create(f, true)
b.Write outputImage.PNGRepresentation
// as Real Studio picture object for display
dim pic as Picture = outputImage.CopyPictureWithMask
Backdrop = pic