Rotar y voltear imágenes con GdiPlusX

Artículo original: Rotate and Flip images with GdiPlusX
http://weblogs.foxite.com/cesarchalom/archive/2007/06/18/4091.aspx
Autor: Cesar Chalom (http://weblogs.foxite.com/cesarchalom)
Traducido por: Ana María Bisbé York (amby@telefonica.net)
Para: PortalFox (http://www.portalfox.com)

Alguna gente ha estado preguntando sobre Rotar/ Voltear imágenes con GdiPlusX.

He aquí un código adaptado de un artículo anterior que utilizaba _GdiPlus.vcx; pero esta vez utilizando GdiPlusX.

Rotar y/o voltear imágenes es una tarea muy sencilla para Gdi+. Para ver los diferentes resultados posibles, cambie el valor de la constante en la variable lnEnumRotateFlip del código que se muestra a continuación.

IMPORTANTE

Requiere VFP9 y GdiPlusX para ejecutarse

Asegúrese por favor de que tiene la última versión

http://www.codeplex.com/VFPX/Wiki/View.aspx?title=GDIPlusX&referringTitle=Home

* Iniciar GdiPlusX
_SCREEN.AddProperty("System", NEWOBJECT("xfcSystem", LOCFILE("system.vcx","vcx")))
LOCAL loBMP as xfcBitmap
LOCAL lnEnumRotateFlip
WITH _SCREEN.System.Drawing
  loBMP = .Bitmap.FromFile(GETPICT())
  * Pruebe cambiando este valor por los que se muestran debajo 
  lnEnumRotateFlip = .RotateFlipType.Rotate90FlipNone 
  loBmp.RotateFlip(lnEnumRotateFlip)
  * Guardar la imagen como PNG 
  loBMP.Save("C:\RotateFlip.png", .Imaging.ImageFormat.Png)
ENDWITH 
RUN /N explorer.EXE RotateFlip.png 

RotateNoneFlipNone 0

RotateNoneFlipNone 1

RotateNoneFlipNone 2

RotateNoneFlipNone 3

RotateNoneFlipNone 4

RotateNoneFlipNone 5

RotateNoneFlipNone 6

RotateNoneFlipNone 7