Ejemplos usando el Api de windows para Visual basic

61 - Api StretchBlt para ampliar, reducir y copiar imágenes - mejor que PaintPicture

Volver al Listado Api - Anterior - Siguiente



 

 

 

 

Contenido

 

 

 

 

 


Ejemplo 1

Este ejemplo me lo envió Leandro Ascierto, y muestra como ajustar una imagen en un control picturebox

Esta Api, en comparación a la función PaintPicture de visual basic, no distorsiona tanto la imagen , si queremos por ejemplo ampliarla. Por lo que me comentó, en el ejemplo que está aquí , tubo que utilizar el la función PaintPicture para los archivos de iconos ya que aparentemente no los soporta, pero con los demás formatos gráficos que admite vb funciona bien.

 

Para el ejemplo colocar un control Picture1, un Command y un CommonDialog

vista del gráfico dibujado con StretchBlt en el control Picturebox

 

 

 

Código fuente en un formulario:

 


Ejemplo 2

Este es otro ejemplo que hice está basado en el ejemplo anterior de Leandro Ascierto , pero en este caso para usarlo con formularios, y poder colocar un backGround como imagen de fondo, y que al redimensionarla, se redibuje en forma proporcional al área del mismo , también usando la función del api de windows StretchBLT

Para usarlo es muy fácil y lo único que se debe hacer es indicar la ruta física de la imagen, el formulario que se usará , y también opcionalmente un margen.

Descargar

 


Recursos VB.NET - Relacionados

Recursos VB 6.0 - Relacionados



Buscar en Recursos vb