Cómo: Crear imágenes en miniatura
Una imagen en miniatura es la versión reducida de una imagen. Se pueden crear imágenes en miniatura llamando al método GetThumbnailImage de un objeto Image.
Ejemplo
En el siguiente ejemplo se crea un objeto Image a partir de un archivo JPG. La imagen original tiene un ancho de 640 píxeles y un alto de 479 píxeles. Con este código se crea una imagen en miniatura con un ancho de 100 píxeles y un alto de 100 píxeles.
En la siguiente ilustración se muestra la imagen en miniatura.
.png "Imagen en miniatura")
Nota
En este ejemplo, se declara un método de devolución de llamada se declara, pero nunca se utiliza. Esto admite todas las versiones de GDI+.
Public Function ThumbnailCallback() As Boolean
Return True
End Function
Private Sub GetThumbnail(ByVal e As PaintEventArgs)
Dim callback As New Image.GetThumbnailImageAbort(AddressOf ThumbnailCallback)
Dim image As Image = New Bitmap("c:\FakePhoto.jpg")
Dim pThumbnail As Image = image.GetThumbnailImage(100, 100, callback, New IntPtr())
e.Graphics.DrawImage(pThumbnail, 10, 10, pThumbnail.Width, pThumbnail.Height)
End Sub
public bool ThumbnailCallback() {
return true;
}
private void GetThumbnail(PaintEventArgs e)
{
Image.GetThumbnailImageAbort callback =
new Image.GetThumbnailImageAbort(ThumbnailCallback);
Image image = new Bitmap(@"c:\FakePhoto.jpg");
Image pThumbnail = image.GetThumbnailImage(100, 100, callback, new
IntPtr());
e.Graphics.DrawImage(
pThumbnail,
10,
10,
pThumbnail.Width,
pThumbnail.Height);
}
Compilar el código
El ejemplo anterior está diseñado para Windows Forms y requiere PaintEventArgs e, que es un parámetro del controlador de eventos Paint. Para ejecutar el ejemplo, siga estos pasos:
Cree una nueva aplicación de Windows Forms.
Agregue el código de ejemplo al formulario.
Cree un controlador para el evento Paint del formulario.
En el controlador Paint, llame al método GetThumbnail y pase e para PaintEventArgs.
Encuentre un archivo de imagen del que desea realizar una miniatura.
En el método GetThumbnail, especifique la ruta de acceso y el nombre de archivo de su imagen.
Presione F5 para ejecutar el ejemplo.
Aparece una imagen en miniatura 100 por 100 en el formulario.