Ejemplos usando el Api de windows para Visual basic

203 - Hacer un picturebox redimensionable

<Volver> - Anterior - Siguiente



 

 

Ejemplo que usa el api de windows para poder hacer que un picturebox sea redimensionable, por ejemplo para usarlo como barra de herramientas flotante

 

El ejemplo utiliza las funciones GetWindowLong y SetWindowLong para cambiar el estilo del control Picture. Al cambiar el estilo, este se puede redimensionar desde los laterales como una ventana común en windows o formulario. Este ejemplo puede servir para implementar barra de herramientas flotantes, solo haría falta agregarle un titlebar a los controles Picture

También se usa la función del api SetWindowPos, que entre otroas cosas lo que hace, es una ves aplicado el nuevo estilo al control, poder redibujar el mismo, ya que si no ejecutamos dicha api, el control no se visualizará. ( No sirve anular dicha función y usar solo el método refresh )

A la función cambiar_estilo declarada en el código, pasarle como parámetro el control Picturebox al cual aplicarle el nuevo estilo que le permite redimensionarse

Nota: Este código también se puede utilizar con otros controles a parte de un picturebox, por ejemplo un ListBox, un ListView un FlexGrid etc.. ( debe poseer hwnd ) . Si se utiliza con otro control, cambiar en la declaración del parámetro por el tipo de control, ya que si no dará error por que no coinciden los tipos, o declarar la variable como de tipo Object, por ejemplo ( Cambiar_Estilo ( ElObjeto As Object) )

 

Código fuente en el formulario

 


Relacionados



Buscar en Recursos vb