Changing the functionality of Close button

[sajee]

Hi everybody,
This is my first post in this forum, and i hope that this will help me out of my problems.

I have an application which i put in the system tray. Now i want this application to have just the Close(X) button. And on close i want to put the application back to system tray. I know that i can disable the Minimixe and Maximixe buttons. But on close how do i put it to system tray. So far what i have achieved is, I'm able to disable the Maximixe button, and with a little of code i've been able to diable the close(X) button too. And now i have just the Minimize(-) button, which on click will put the application into system tray. I want to chiave this in close(X) button instead.
Please help me out. Code examples will be very helpful

[Kaverin]

This is one way to do it:

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
   'see if the person used the X, pressed Alt+F4, or selected Close from the control menu
   If UnloadMode = vbFormControlMenu Then
      'if so, do your things here that you need to do
 
      'stop the unloading by giving Cancel a nonzero value
      Cancel = True
   End If
End Sub

[AIS_DK]

As fare as I recall, the close button fires the Query_Unload event for the form, and in this event you can cancel the close procedure. You can also but code here, that places the form in the sys-tray.

[c@lle]

use this in your form queryunload event:

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If UnloadMode = vbFormControlMenu Then '
    'The user chose the Close command from the Control menu on the form.
        pMinimizeToTray
        Cancel = True
    End If
End Sub

for the function pMinimizeToTray you can find examples on this site.

hth.
calle

[Kaverin]

Why did you just repeat exactly what I said?

[c@lle]

he kaverin,
i opened this threat in a new window and after a while i answered the question.


so it was not refreshed!

sorry for saying the same,
but now i think 'sajee' will believe that this is a good solution