Discussion :

[LN(a)]

Bonjour,

Je voudrai faire un traitement avant que windows se ferme. J’utilise la méthode suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
procedure WMQueryEndSession
           (var Msg : TWMQueryEndSession) ;
           message WM_QueryEndSession; 
...
procedure TForm1.WMQueryEndSession
      (var Msg : TWMQueryEndSession) ;
begin
if MessageDlg('Close Windows ?',
               mtConfirmation,
               [mbYes,mbNo], 0) = mrNo then
   Msg.Result := 0
else
   Msg.Result := 1 ;
end;

Et ca marche pas ! Mon appli reçois pas de message et windows se ferme.

[LN(a)]

Pardon, le problème est ailleurs

[Gilbert Geyer]

Je voudrai faire un traitement avant que windows se ferme.

... pour cela il faudrait que ton appli détecte que le déclenchement de la fermeture a été lancé, d'annuler cette fermeture le temps qu'il faut pour faire le traitement en question, et à l'issue de ceci que ce soit ton appli qui déclenche la fermeture de Windows.
Si tu utilises la fonction "Rechercher dans ce forum" en page 1 du Forum avec les deux mots ]fermer application[ tu trouveras toute une série de discussions qui ont tourné autour de ce sujet.