Artículo original: Rotate and Flip images with GdiPlusX
https://vfpimaging.blogspot.com/2007/06/vfppaint-flexible-drawing-and-paint.html
Autor: Cesar Ch.
Traducido por: Ana María Bisbé York
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
https://github.com/VFPX/GDIPlusX
* 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
No hay comentarios.:
Publicar un comentario
Los comentarios son moderados, por lo que pueden demorar varias horas para su publicación.