Cómo: Girar, reflejar y sesgar imágenes

Actualización: noviembre 2007

Las imágenes se pueden rotar, reflejar y sesgar especificando puntos de destino para las esquinas superior izquierda, superior derecha e inferior izquierda de la imagen original. Los tres puntos de destino determinan una transformación afín que asigna la imagen rectangular original a un paralelogramo.

Ejemplo

Por ejemplo, supongamos que la imagen original es un rectángulo con la esquina superior izquierda en (0, 0), la esquina superior derecha en (100, 0) y la esquina inferior izquierda en (0, 50). Supongamos ahora que se asignan esos tres puntos a puntos de destino de la siguiente manera:

En la ilustración siguiente se muestran la imagen original y la imagen asignada al paralelogramo. La imagen original se ha sesgado, reflejado, rotado y trasladado. El eje x situado a lo largo del borde superior de la imagen original se asigna a la línea que va de (200, 20) a (110, 100). El eje y situado a lo largo del borde izquierdo de la imagen original se asigna a la línea que va de (200, 20) a (250, 30).

La siguiente ilustración muestra una transformación similar aplicada a una imagen fotográfica.

La siguiente ilustración muestra una transformación similar aplicada a un metarchivo.

En el ejemplo siguiente se producen las imágenes mostradas en la primera ilustración.

' New Point(200, 20)  = destination for upper-left point of original
' New Point(110, 100) = destination for upper-right point of original
' New Point(250, 30)  = destination for lower-left point of original
Dim destinationPoints As Point() = { _
    New Point(200, 20), _
    New Point(110, 100), _
    New Point(250, 30)}

Dim image As New Bitmap("Stripes.bmp")

' Draw the image unaltered with its upper-left corner at (0, 0).
e.Graphics.DrawImage(image, 0, 0)

' Draw the image mapped to the parallelogram.
e.Graphics.DrawImage(image, destinationPoints)

    Point[] destinationPoints = {
new Point(200, 20),   // destination for upper-left point of 
                      // original
new Point(110, 100),  // destination for upper-right point of 
                      // original
new Point(250, 30)};  // destination for lower-left point of 
    // original

    Image image = new Bitmap("Stripes.bmp");

    // Draw the image unaltered with its upper-left corner at (0, 0).
    e.Graphics.DrawImage(image, 0, 0);

    // Draw the image mapped to the parallelogram.
    e.Graphics.DrawImage(image, destinationPoints);

Compilar el código

El ejemplo anterior está diseñado para formularios Windows Forms y requiere PaintEventArgse, que es un parámetro del controlador del evento Paint. Asegúrese de reemplazar Stripes.bmp por la ruta de acceso a una imagen que sea válida en su sistema.

Vea también

Otros recursos

Trabajar con imágenes, mapas de bits, iconos y metarchivos