Hi
I'd like to find out if there's to disable resize for MDI parent form and to disable the maximum control button on the MDI form.
Please advice
Printable View
Hi
I'd like to find out if there's to disable resize for MDI parent form and to disable the maximum control button on the MDI form.
Please advice
Sure, try this:
------------------Code: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
Private Const GWL_STYLE = (-16)
Private Const WS_MAXIMIZEBOX = &H10000
Private Const WS_THICKFRAME = &H40000
Private Sub MDIForm_Load()
Call SetWindowLong(hwnd, GWL_STYLE, _
GetWindowLong(hwnd, GWL_STYLE) _
Xor WS_THICKFRAME Xor WS_MAXIMIZEBOX)
End Sub
Aaron Young
Analyst Programmer
[email protected]
[email protected]