IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Delphi Discussion :

[05] CanClose à false que si c'est windows qui le demande...


Sujet :

Langage Delphi

  1. #1
    Membre averti Avatar de dacid
    Homme Profil pro
    Inscrit en
    juin 2003
    Messages
    1 057
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : juin 2003
    Messages : 1 057
    Points : 413
    Points
    413
    Par défaut [05] CanClose à false que si c'est windows qui le demande...
    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.
    David.

  2. #2
    Membre chevronné
    Avatar de Pierre Castelain
    Inscrit en
    avril 2002
    Messages
    523
    Détails du profil
    Informations forums :
    Inscription : avril 2002
    Messages : 523
    Points : 1 909
    Points
    1 909

  3. #3
    Membre averti Avatar de dacid
    Homme Profil pro
    Inscrit en
    juin 2003
    Messages
    1 057
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : juin 2003
    Messages : 1 057
    Points : 413
    Points
    413
    Par défaut
    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;
    David.

  4. #4
    Membre averti Avatar de dacid
    Homme Profil pro
    Inscrit en
    juin 2003
    Messages
    1 057
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : juin 2003
    Messages : 1 057
    Points : 413
    Points
    413
    Par défaut
    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 ?
    David.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. "Les Beatles sont plus populaires que Jesus" : c'est Google qui le dit !
    Par Katleen Erna dans le forum Humour Informatique
    Réponses: 3
    Dernier message: 24/09/2009, 13h12
  2. Réponses: 0
    Dernier message: 23/09/2009, 03h59
  3. est ce que office arabe97 est compatible avec windows 98
    Par ghita269 dans le forum Autres Logiciels
    Réponses: 5
    Dernier message: 10/11/2005, 20h16

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo