Imaging.CreateImageFromFile(MyFile)
Dim nClonedImage As Long = Imaging.CreateClonedImageI(Imaging.GetNativeImage)
ImagingCloseNativeImage()
Imaging.SetNativeImage(nClonedImage)
GdPicture.SetNativeImage(nClonedImage)
GdPicture.Rotate90()
Imaging.SaveAsJPEG(MyFile, 100)
Return to GdPicture [Pro] ActiveX
Users browsing this forum: No registered users and 1 guest