Discussion :

[dacid]

Bonjour à tous,

Voici mon problème:
J'ai un application et j'aimerais que, lorsque l'utilisateur clique sur la croix (queryClose), l'application se contente de se retrécir et non se fermer (donc, le canClose à false).
Mais vous devinez la suite... Windows, lui non plus, ne peut pas fermer l'application donc il ne peut pas se fermer.
En fait, il faudrait qq chose comme ça:

Code :

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

1
2
3
4
5
6
7
8
procedure TfrmMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if (utilisateur_clique) then begin
  CanClose := false;
  cacher();
end else if (windows_quitte) then
   canClose := true;
end;

Merci d'avance.

[Pierre Castelain]

Comme ceci : http://www.developpez.net/forums/vie...light=canclose

[dacid]

Bonjour Pierre Castelain,
ui, en fait j'avais déja essayé (mais avec un WMEndSession) mais lorsque l'on ferme windows, il quitte bien mon application mais il ne se ferme plus lui même (en s'occupant de mon application, il a du oublier sa propre tâche).

Voici mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TfrmMain.WMQueryEndSession(var Message: TWMQueryEndSession);
begin
inherited;
  peutFermer := true;
  Self.Close();
end;
 
procedure TfrmMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if (peutFermer) then begin
     sauverParams();
    //Application.Terminate; // Pas la peine car cette fonction s'en charge déjà
  end else begin
    CanClose := false;
    cacher();
  end;
end;

[dacid]

En fait, j'ai tout transféré dans le onClose au lieu du onQueryClose (comme indiqué dans le lien que tu m'as donné) et ça marche, merci.

J'aurais juste aimé comprendre ce comportement... Pourquoi le onQueryClose met un terme au traitement de l'arret windows ?