Resumen Boton Maximixar Enabled=False en MDI

Mensaje enviado por José Rubí de la Vega <jrubi@ctv.es>

At 16:31 28/02/2000 -0800, Rudy Capatinta wrote:
>Ahora estoy buscando como desaparecer o poner el boton
>de maximizar en estado de Enabled=false de un formulario MDI.

De manera similar a como poner enabled=false en el boton cerrar lo puedes hacer en el maximizar. En realidad esto que vamos a hacer hace que no funcione pero sigue viéndose "normal".

Public Const MF_BYPOSITION = &H400
Public Const MF_REMOVE = &H1000
Public Declare Function DrawMenuBar Lib "user32" _
       (ByVal hwnd As Long) As Long
Public Declare Function GetMenuItemCount Lib "user32" _
       (ByVal hMenu As Long) As Long
Public Declare Function GetSystemMenu Lib "user32" _
         (ByVal hwnd As Long, _
         ByVal bRevert As Long) As Long
Public Declare Function RemoveMenu Lib "user32" _
         (ByVal hMenu As Long, _
         ByVal nPosition As Long, _
         ByVal wFlags As Long) As Long


En el load :

'Obtenemos un handle al menú de sistema del formulario
hMenu = GetSystemMenu(Me.hwnd, 0)
If hMenu Then
     Call RemoveMenu(hMenu, 4, _
                       MF_REMOVE Or MF_BYPOSITION)
     Call DrawMenuBar(Me.hwnd)
End If


Un saludo.

_________________________________________________
José Rubí de la Vega
E-mail : jrubi@ctv.es
WWW : http://www.ctv.es/USERS/jrubi
Podrás encontrar información sobre VB, las listas
vb-esp y visualbasic-esp y un resumen de los
mensajes de las mismas



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com