Vb6

[Micky]

Hi,
I hava a form in which I have given the user the
TERMINATE button.
I dont want the user to click on the (CLOSE WINDOW) button
of the form ( on the top right corner) .

Can I defuse that close sign which is next to the
minimize and maximize button with the help pf form
properties.


thnks

[MartinLiss]

This question has been asked and answered many times. Please use the forum Search and you'll find the answer. You should also click the How to Get Your Questions Answered link in my signature.

[crptcblade]

This will disable the Close button.

Option Explicit
 
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, _
                                                     ByVal bRevert As Long) _
                                                     As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, _
                                                  ByVal nPosition As Long, _
                                                  ByVal wFlags As Long) _
                                                  As Long
                                                  
Private Const SC_CLOSE = &HF060&
Private Const MF_BYCOMMAND = &H0&
 
Private Sub Form_Load()
Dim hMnu As Long
 
    hMnu = GetSystemMenu(Me.hwnd, False)
    Call RemoveMenu(hMnu, SC_CLOSE, MF_BYCOMMAND)
 
End Sub

[crptcblade]

Originally posted by MartinLiss
This question has been asked and answered many times. Please use the forum Search and you'll find the answer. You should also click the How to Get Your Questions Answered link in my signature.

Yeah, that too.

[Cagez]

If you don't need the icon, min, max or close buttons showing, just put ControlBox to False in your form properties... I always use it

Edit: Err, right?