Kan man på något sätt få (Stänga krysset) i översta högra hörnet i en form
Att bli enabled, jag har satt formen till 1=Fixed singel
Men jag vill att man inte ska kunna trycka på X krysset
Utan svara på en fråga innan man kan stänga formen
Sören

Lägg koden som frågar i Form_QueryUnload eventet.

Förklara ?

Typ en dilaog som word brukar visa.
<code>
Private Sub Form_QueryUnload(Cancel As Integer, unloadmode As Integer)
Select Case MsgBox("Vill spara dina ändringar innan du avslutar?", vbQuestion or vbYesNoCancel)
Case vbYes
'Sparar förändirngar
MySaveSub
Case vbCancel
'Användaren är inte redo att avsluta.
'Eller kanske råkade stänga av misstag
Cancel = True
End Select
End Sub
</code>
Bara bekräfta att programmet skall stängas:
<code>
Private Sub Form_QueryUnload(Cancel As Integer, unloadmode As Integer)
Select Case MsgBox("Vill avslutar min coola program?", vbQuestion or vbYesNo)
Case vbNo
'Användaren är inte redo att avsluta.
'Eller kanske råkade stänga av misstag
Cancel = True
End Select
End Sub
</code>

Precis det jag söker
Tusen tack

Hej
Det här funkar lika bra i Form_Unload, har aldrig förstått skillnaden.

Undrar
/Sven

Jag skulle använda mej av alternativet "Borderstyle:0-None" på formen.
Visserligen missar man "ramen" å .Caption å ikonen, men man kan ju
inte få "allt" varje gång, liksom... :-)

Givetvis får du ju ha en annan Off-funktion, men det var väl det,
som du var ute efter från början, om jag fattat detta "problemet"?

/ChristerGbg

Hej
Med all respekt, Dumt förslag,täcker inte frågan.
/Sven