Blog alskare

.Net y lo que surja

Redimensionar una imagen

Posted by alskare en 24/02/2009

Cuando se trata de subir fotografías a una página Web, casi siempre nos encontramos que, la cámara más barata hace unas fotos de miedo. De miedo por calidad y por el tamaño.

Una solución es redimensionar la imagen, de tal manera que ocupe lo mínimo posible y tenga una calidad aceptable para mostrarse por Internet. Un tamaño que se está convirtiendo en estándar para fotos de productos en Internet es 640×480.

En el código que acompaña al post,  incluyo un ejemplo de cómo cambiar el tamaño y la resolución de una imagen

VB.NET
''' <summary>Cambia la resolución de una imagen a 640x480</summary>
''' <param name="FicheroOrigen">Fichero con la foto original</param>
''' <param name="FicheroDestino">Fichero en el que se guardará la foto redimensionada</param>
Public Shared Sub Redimensiona(ByVal FicheroOrigen As String, ByVal FicheroDestino As String)
    Dim FotoOriginal As New Bitmap(FicheroOrigen)
    Dim FotoRetocada As New Bitmap(FotoOriginal, 640, 480)
    FotoRetocada.SetResolution(72, 72)

    FotoRetocada.Save(FicheroDestino, Imaging.ImageFormat.Jpeg)

    FotoOriginal = Nothing
    FotoRetocada = Nothing
End Sub
C#
/// <summary>Cambia la resolución de una imagen a 640x480</summary>
/// <param name="FicheroOrigen">Fichero con la foto original</param>
/// <param name="FicheroDestino">Fichero en el que se guardará la foto redimensionada</param>
public static void  Redimesiona(string FicheroOrigen, string FicheroDestino)
{
    Bitmap FotoOriginal = new Bitmap(FicheroOrigen);
    Bitmap FotoDestino = new Bitmap(FotoOriginal, new Size(640, 480));

    FotoDestino.SetResolution(72, 72);

    FotoDestino.Save(FicheroDestino, System.Drawing.Imaging.ImageFormat.Jpeg);

    FotoOriginal = null;
    FotoDestino = null;
}

Sorry, the comment form is closed at this time.

 
A %d blogueros les gusta esto: