[VB.NET][PB FAQ] Comment annuler la fermeture de la session

Version imprimable

Voir 40 message(s) de cette discussion en une page

Bonjour

http://faqvbnet.developpez.com/?page...ueryendsession

code original :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
'Message Windows QueryEndSession
Private Const WM_QUERYENDSESSION As Integer= &H11;
 
'flag indiquant si la session est en cours de fermeture
Private _systemShutdown As Boolean= false;
 
'Redéfinition de la fonction virtuelle WndProc
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
 
    'Mise dans systemShutdown la présence du message fermeture Windows
    If m.Msg = WM_QUERYENDSESSION Then
    _systemShutdown = true
    base.WndProc(m)
End If
 
End Sub
 
'Handler evenement closing
Private Sub Form1_Closing(object sender, System.ComponentModel.CancelEventArgs e) Handles Form1.Closing
 
    'Si le message fermeture Windows a été envoyé, on l'annule !
    If _systemShutdown Then
 
        e.Cancel = true
        _systemShutdown = false
        MessageBox.Show("Fermeture de session windows annulée")
 
    End If
 
End Sub

Il y a quelque problème dans ce code... j'en suis arrivé là :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
     'Message Windows QueryEndSession
    Private Const WM_QUERYENDSESSION As Integer = &H11
 
    'flag indiquant si la session est en cours de fermeture
    Private _systemShutdown As Boolean = False
 
 
    'Redéfinition de la fonction virtuelle WndProc
    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
 
        'Mise dans systemShutdown la présence du message fermeture Windows
        If m.Msg = WM_QUERYENDSESSION Then
            _systemShutdown = True
            MyBase.WndProc(m)
        End If
 
    End Sub
 
    'Handler evenement closing
    Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        'Si le message fermeture Windows a été envoyé, on l'annule !
        If _systemShutdown Then
 
            e.Cancel = True
            _systemShutdown = False
            MessageBox.Show("Fermeture de session windows annulée")
 
        End If
 
    End Sub

mais il doit encore en rester ... mon application plante quand j'utilise ce code

Merci
Sébastien

11/04/2006, 16h36
Ditch

Que se passe-t-il exactement?

:merci: pour ton intervention
11/04/2006, 16h38
6su7

un message :

Une exception non gérée du type 'System.ComponentModel.Win32Exception' s'est produite dans system.windows.forms.dll

Informations supplémentaires : Erreur lors de la création d'un handle de fenêtre.

et il me surligne :

Application.Run(Form1) dans mon module principale
11/04/2006, 16h43
Ditch

Merci, c'est noté et ce sera corrigé lors de la prochaine mise à jour de la FAQ :wink:

Il faut sortir le MyBase.WndProc du If

Code:

1
2
3
4
5
      'Mise dans systemShutdown la présence du message fermeture Windows
        If m.Msg = WM_QUERYENDSESSION Then
            _systemShutdown = True
        End If 
        MyBase.WndProc(m)

Citation:

Envoyé par abelman

Il faut sortir le MyBase.WndProc du If

Code:

1
2
3
4
5
      'Mise dans systemShutdown la présence du message fermeture Windows
        If m.Msg = WM_QUERYENDSESSION Then
            _systemShutdown = True
        End If 
        MyBase.WndProc(m)

ca fonctionne :)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
   'Message Windows QueryEndSession
    Private Const WM_QUERYENDSESSION As Integer = &H11
 
    'flag indiquant si la session est en cours de fermeture
    Private _systemShutdown As Boolean = False
 
 
    'Redéfinition de la fonction virtuelle WndProc
    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
 
        'Mise dans systemShutdown la présence du message fermeture Windows
        If m.Msg = WM_QUERYENDSESSION Then
            _systemShutdown = True
 
        End If
        MyBase.WndProc(m)
    End Sub
 
    'Handler evenement closing
    Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        'Si le message fermeture Windows a été envoyé, on l'annule !
        If _systemShutdown Then
 
            e.Cancel = True
            _systemShutdown = False
            MessageBox.Show("Fermeture de session windows annulée")
 
        End If
 
    End Sub

Merci :wink:

24/04/2006, 14h04
6su7

Autre probleme

Si on ne clique pas tout de suite sur OK lors du message, on a un

Fin du programme - WindowsFromsParkingWindow
25/04/2006, 12h19
6su7

Bonjour

En fait il faut sortir le message de l'évenement closing ...

mais je ne vois pas comment :(

y a pas un evenement after try closing ? :lol:

Merci
26/04/2006, 14h00
lou87

Je suis désolée mais je ne vois pas de solution...

Mais peut-être quelqu'un en a une idée ? ;)
26/04/2006, 14h08
abelman

Si on sort le code du closing on ne peut pas annuler la fermeture de windows.
Windows donne un temps limite aux applications pour se fermer lors de la fermeture de session. Si ce temps est atteint et qu'il n'y a pas d'annulation alors Windows tue le process
27/04/2006, 11h48
6su7

Bonjour

En fait je veux juste sortir le message indiquant à l'utilisateur que la session a été annulé
27/04/2006, 14h20
lou87

up :aie:
27/04/2006, 14h26
abelman

Citation:

Envoyé par 6su7

Bonjour

En fait je veux juste sortir le message indiquant à l'utilisateur que la session a été annulé

Désolé c'est le seul moyen que je connaisse pour annuler la fermeture de session: annuler le closing.
27/04/2006, 16h47
6su7

MessageBox.Show("Fermeture de session windows annulée")

c'est ca que je veux sortir ... rien d'autre
27/04/2006, 16h53
abelman

Citation:

Envoyé par 6su7

MessageBox.Show("Fermeture de session windows annulée")

c'est ca que je veux sortir ... rien d'autre

Ahhhh
Et ben tu crée un evenement perso :)
http://freddyboy.developpez.com/dotnet/articles/events/
28/04/2006, 02h35
Torkan

Eumm, juste une petite suggestion. Une foie que tu à détecter la fermeture de session, tu peux essailler d'exécuter shutdown -a qui annule la fermeture de l'ordi (je ne sais pas si sa marche pour la session mais, c'est une piste a envisager)
28/04/2006, 08h16
6su7

Citation:

Envoyé par Torkan

Eumm, juste une petite suggestion. Une foie que tu à détecter la fermeture de session, tu peux essailler d'exécuter shutdown -a qui annule la fermeture de l'ordi (je ne sais pas si sa marche pour la session mais, c'est une piste a envisager)

Salut, merci de ta proposition :)

ha oui comme avec blaster :mouarf:

C'est une solution de rechange, mais ca aura le même effet s'il y a un msg box dans le closing

Sans le message, ca fonctionne tres bien, mais il faut tout de même informer l'utilisateur que le shutdown a été annulé, pourquoi, par qui ..
28/04/2006, 08h48
6su7
le shutdown -a me fait penser à quelque chose..

le -a est un parametre ... est ce qu'il existe une liste de paremetre utilisable pour les application ?

par ex je veux lancer une application mais minimisé ou caché...

ici, ca se rejouterait où ?
Code:

1 2 3 4 Dim vixwin As New Process vixwin.StartInfo.FileName = txt_gendex_exe.Text vixwin.Start()
merci
28/04/2006, 09h19
abelman

Citation:

Envoyé par abelman

Ahhhh
Et ben tu crée un evenement perso :)
http://freddyboy.developpez.com/dotnet/articles/events/

Ce n'est peut être pas une si bonne idée ... :?

et si utilise BeginInvoke en lui passant l'adresse d'une fonction où le messageBox est codé?
28/04/2006, 09h28
6su7

Citation:

Envoyé par abelman

Ce n'est peut être pas une si bonne idée ... :?

et si utilise BeginInvoke en lui passant l'adresse d'une fonction où le messageBox est codé?

salut, merci de ton intervention mais .. j'ai rien compris :cry: :oops:

Voir 40 message(s) de cette discussion en une page