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


56 - Crear esquinas redondeadas en un formulario

<Volver> - Anterior - Siguiente



 

 

Ejemplo que usa las funciones del Api SetWindowRgn y CreateRoundRectRgn para aplicar un borde redondeado a las esquinas de un formulario o ventana

 

En el código fuente hay una función llamada Redondear_Formulario.

En el primer parámetro de la función hay que pasarle como parámetro, el formulario que queremos aplicar el esquinado, y en el otro parámetro el valor del radio, mientras mas grande sea el valor que le pasemos, el formulario mas redondo será.

 

Por ejemplo para usarlo con el form actual con un valor de 150

Call Redondear_Formulario(Me, 150)

 

Nota: Se debe quitar los bordes al formulario mediante la propiedad BorderStyle con el valor 0


Otro detalle a tener en cuenta es que, si le sacamos la barra de titulo, ya no podemos mover el formulario. Esto lo podemos solucionar con la función Api RelaseCapture y SendMessage para poder hacer un Drag o arrastre sobre el mismo. Este ejemplo para arrastrar controles y formularios mediante el Api lo podés ver en la página siguiente a esta.


ejemplo de formulario con esquinas redondeadas

 

 

Código fuente en el formulario

 


Recursos vb6 - Enlaces relacionados



Buscar en Recursos vb