Sección de códigos , trucos y ejemplos para visual basic


62 - Redimensionar imágenes en un PictureBox al estilo Vista previa de imagen

<Volver> - Anterior - Siguiente



 

 

Este ejemplo lo hice con alguna ayudita de algunos amigos del foro del canal visual basic

Nota: Seguramente hay una forma mas óptima de hacer una vista previa de una imagen al estilo Thumbnail , y además se puede optimizar un poco el código , pero funciona :).

 

Lo que hace el código fuente, es cargar una imagen en una variable de tipo IpictureDisp , luego calcular el ancho y alto de la imagen con respecto a el tamaño del picturebox, para de esta manera poder escalarla y también centrarla. Por último, una ves con los valores , se dibuja en el PictureBox con la función PaintPicture

 

ElPicturebox.PaintPicture LaImagen, Posx, Posy, Ancho, Alto

 

Pasos para el ejemplo

Colocar los controles en un formulario como muestra la imagen:

 

thumbnail de imágenes en visual basic

 

Código fuente en el form

 

Nota : A la función se le puede pasar como parámetro además de un picturebox, un formulario, ya que está declarada como de tipo Object , es decir :

Call Establecer_Imagen(Me, Dir1 & "\" & File1.FileName)

 

 


Recursos vb 6.0 - Enlaces relacionados

Recursos visual basic.NET - Relacionados



Buscar en Recursos vb