problème avec Application->ProcessMessages()

Bonjour,

Afin d'éviter le bloquage de mon application dans une boucle while trés longue, j'ai intercalé dedans un

Code:

---

Application->ProcessMessages()

---

Cela fonctionne trés bien puisque je peux faire n'importe quoi d'autre dans mon appli qui n'est plus bloquée.
...SAUF le bouton quitter de la barre de menu ou la "croix" en haut a droite !

je n'ai plus moyen de quitter mon appli une fois rentré dans la boucle...je suis bien encore bloqué donc, d'une certaine manière...

:?: comment ce fait il que le bouton quitter ne soit pas opérant ?

ps: la fonction quitter est gérée par une fonction standard dans un ActionList. Mais j'ai essayé en ajoutant un Form1->close(); sur le même bouton quitter et ca fait pareil.


Merci par avance

Quand vous cliquez la croix, l'événement OnClose est appelé, vous pouvez donc à cette occasion positionner un flag.

Par exemple, vous déclarez un booléen dans la classe principale.

Code:

---

bool fin;

---

Vous mettez ce booléen à true dans l'événement OnClose.

Code:

---

1 2 3 4

void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action) { fin=true; }

---

Et dans la boucle en while, vous testez la condition de la boucle tout en vérifiant que fin ne soit pas passé à true, ce qui par exemple sur une boucle simple ne contenant qu'une incrémentation donnerait une syntaxe de ce genre.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

int i; fin=false;   i=0; while(i!=100000000 && !fin) { i++; Application->ProcessMessages(); }   ShowMessage("Terminé!");

---

Dans ces conditions, l'événement OnClose est respecté.

À bientôt
Gilles

je vais faire comme ca

Mais comment se fait il que cette fonction permet de faire toutes les taches sauf celle ci, quitter ?
Je suppose qu'il y a une bonne raison mais je ne vois pas du tout...

Merci beaucoup

Tant que l'événement n'est pas terminé, on ne peut pas quitter. Si l'événement contient une boucle, la boucle sera exécutée entièrement et ensuite seulement on quittera. C'est pourquoi, si on veut rendre prioritaire un autre événement dans une boucle, il faut d'une part, forcer les messages Windows par Application->ProcessMessages() à chaque itération et d'autre part, procéder par flag pour sortir de la boucle si l'événement prioritaire est appelé.

À bientôt
Gilles

voila une trés bonne raison :wink:

Je vais finir par ne plus savoir comment vous remercier !

Merci beaucoup !