Quitter mon programme

Bonjour
Je ne parviens pas à trouver comment quitter mon programme par programmation. Je m'explique.
Dans un "dialog", je lance une procédure assez longue et quand celle-ci est finie, je voudrais que mon "dialog" se ferme "proprement" c-à-d en appelant la fonction "FormClose" comme si je le faisais manuellement par la croix de ma fenêtre. Et ensuite faire la même chose pour ma fenêtre principale et ainsi quitter mon application.
Ca ne doit pas être compliqué mais je ne suis pas habitué au Borland C++.
Merci à tous de votre aide et bon week-end
Domi

Il faut soit exécuter un Close() de la fiche principale, soit un Application->Terminate().

Bonjour Altau,
Merci de cette réponse rapide.
Close(), j'avais déjà essayé, je viens d'essayer Application->Terminate().
Les 2 ferment bien mon "appli" mais apparemment ne passent pas par mes fonctions TEventWin::FormClose() et du "dialog" ouvert et de la fenêtre principale.
Ces fonctions sauvent des données dans des fichiers, et donc dans ce cas elles sont perdues.
Merci encore
Domi

Pour être averti que le programme doit fermer, il faut gérer l'évènement "OnCloseQuery" et affecter la valeur true à CanClose après avoir exécuté le traitement requis.

Si cela intéresse qqun:
Voila ce que je constate après quelques tests.
1er test
Pour sotir de la "sous" fenêtre, j'utilise Close() et je passe bien automatiquement dans FormClose().

Code:

---

1 2 3 4

// Ici une longue procédure if(EveClosePrgm->Checked==True) { Close(); }

---

Et je sors bien de ma fenêtre.
2ème test
Ensuite pour sortir de mon appli, je fais directement après le Close() de ma sous fenêtre: MyMainWin->Close() et là je passe bien aussi dans MyMainWin->FormClose() MAIS PLUS DANS FormClose() de ma sous fenêtre ???

Code:

---

1 2 3 4 5

// Ici une longue procédure if(EveClosePrgm->Checked==True) { Close(); MyMainWin->Close(); }

---

Et je sors bien de mon appli.
Est ce que les 2 Close() sont exécutés dans des threads différents???
Si qqun peut m'expliquer? Merci d'avance