Ejemplos usando el Api de windows para Visual basic

187 - Formulario maximizado sin borde

Una forma para poder maximizar un formulario sin bordes y que la barra de tareas de windows siga visible

Si se quiere usar un formulario en modo maximizado o Fullscreen, pero a su ves que el taskbar de windows también siga visible, este ejemplo muestra una forma de hacerlo

El código lo que hace es , eliminar la barra de título del formulario en tiempo de ejecución, mediante las funciones del Api GetWindowLong y SetWindowLong. ( El estilo o constante es Ws_Caption )

Nota: Esto puede servir por ejemplo para hacer un Form con una barra de título propia, donde el mismo se debe maximizar en el Form Load

Al formulario colocarle la propiedad WindowSate en 2 , o sea Maximized

Código fuente en el formulario

Option Explicit ' Declaraciones API Private Declare Function GetWindowLong _ Lib "user32" _ Alias "GetWindowLongA" ( _ ByVal hwnd As Long, _ ByVal nIndex As Long) As Long Private Declare Function SetWindowLong _ Lib "user32" _ Alias "SetWindowLongA" ( _ ByVal hwnd As Long, _ ByVal nIndex As Long, _ ByVal dwNewLong As Long) As Long ' Constantes Private Const GWL_STYLE = (-16) ' Constante para el tipo de estilo, en este caso para quitar la barra Private Const WS_CAPTION = &HC00000 Private Sub Form_Initialize() 'Comprueba que el form no esté sin bordes por que si no no funciona If Me.BorderStyle = 0 Then MsgBox " El borderStyle del formulario no debe ser 0", vbCritical '.. sale End End If End Sub Private Sub Form_Load() ' Aplica el estilo .. quitando la barra de titulo del formulario SetWindowLong hwnd, GWL_STYLE, _ GetWindowLong(Me.hwnd, GWL_STYLE) And Not WS_CAPTION End Sub

Nota: otra forma posible de posicionar el formulario maximizado sin bordes, y que tenga las dimensiones del área de trabajo sin contar el taskBar de windows, es mediante la función SystemParametersInfo : Recuperar área de trabajo sin contar la barra de tareas

Buscar en Recursos vb