Hi!
I have a difficult question and I need help!
( I have a little of english, try to understand )
How to disable resize form in VB6, user can't resize form and maximinze windows?
Have early answer!
Thankyou!

The MinButton

The MinButton return values are:


True =(Default) The form has a Minimize button.
False =The form doesn't have a Minimize button.

Set the forms BorderStyle property to "1 - Fixed Single"

Steve  

Thank you for your help!
But I want form has style border is "2 - resizeable" but user can't resize form.

I try to using this code but I may be Problem!

Private sub Form_resize()
form.height = 1200
form.width  = 1200
end sub

when windows is minimized it have error
so you can help me how to do?
Thank!

This will work

Private Sub Form_Resize()     If Me.WindowState <> vbMinimized Then              Me.Height = 1200         Me.Width = 1200          End If End Sub

Steve

Hi,
I am unsure why you wish to keep the border as resizable, but not allow resizing.. but...
To disable the actual sizing, the only real way is to subclass the form and intercept the resize message, the way listed here will allow the resize and then force the size back again.
Did you want the maximise button disabled too?
Anyway, check out http://www.vbaccelerator.com/codelib/ssubtmr/ctrlres.htm for complete control over form sizing and moving
Hope this helps,
Kieron

____________________________
Build it better, faster, quicker, easier.. then fix it (non-offical MS mission statement)

Just put on error resume next

Private sub Form_resize() on error resume next form.height = 1200 form.width  = 1200 end sub

____________________________
-fuji-