afficher une page à la fermeture d'une application

Comment faire pour afficher une page qui demande si l'on veut enregistrer ou pas les modification, quand on ferme une application.
Merci.

Tu peux gérer cela avec une variable publique, de type booléen... Par exemple pour une variable "Sauve", tu la met à True quand le document a été enregistré, et à False, dès qu'il y a une modification...
Enfin, tu utilises l'évènement OnCloseQuery de ta form principale :

procedure TForm1.FormCloseQuery(...); begin If Sauve then Exit; Case MessageDlg('Voulez-vous sauvegarder le document ?', mtConfirmation, [mbYes, mbNo, mbCancel], 0) Of mrYes: MaProcDeSauvegarde; mrCancel: Canclose := False; End; end;

L'utilisateur aura le choix entre sauvegarder le document puis quitter, quitter sans sauvegarder et annuler sa sortie...

Bonne prog' !
Bestiol.


-------------------------------
Réponse au message :
-------------------------------

> Comment faire pour afficher une page qui demande si l'on veut enregistrer ou pas les modification, quand on ferme une application.
> Merci.

Il faut faire la demande dans l'évènement OnCloseQuery de la fiche principale. Par exemple :

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); Var Retour:Integer; begin [mbYes,mbNo],0)=mrYes; Retour:=MessageDlg('Voulez-vous enregistrer les modifications ?',mtConfirmation,[mbYes,mbCancel,mbNo],0); CanClose:=Retour In [mrYes,mrNo]; If Retour=mrYes Then Enregistrement; end;

Avec ce code, le bouton Yes, enregistre et ferme l'application. Le bouton No n'enregistre pas et ferme l'application. Le bouton Annuler n'enregistre pas et ne ferme pas l'application

--- Nono40@fr.st ---
Nouveau ---> Nono40.fr.st


-------------------------------
Réponse au message :
-------------------------------

> Comment faire pour afficher une page qui demande si l'on veut enregistrer ou pas les modification, quand on ferme une application.
> Merci.

Intéressant merci
ca va m'aider
----------------------------
Remixtech
Webmaster
www.remixtech.com
----------------------------



-------------------------------
Réponse au message :
-------------------------------

> Tu peux gérer cela avec une variable publique, de type booléen... Par exemple pour une variable "Sauve", tu la met à True quand le document a été enregistré, et à False, dès qu'il y a une modification...
> Enfin, tu utilises l'évènement OnCloseQuery de ta form principale :
>

> procedure TForm1.FormCloseQuery(...); > begin > > If Sauve then Exit; > > Case MessageDlg('Voulez-vous sauvegarder le document ?', mtConfirmation, [mbYes, mbNo, mbCancel], 0) Of > mrYes: MaProcDeSauvegarde; > mrCancel: Canclose := False; > End; > > end; >

>
> L'utilisateur aura le choix entre sauvegarder le document puis quitter, quitter sans sauvegarder et annuler sa sortie...
>
> Bonne prog' !
> Bestiol.
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Comment faire pour afficher une page qui demande si l'on veut enregistrer ou pas les modification, quand on ferme une application.
> > Merci.
>

Merci beaucoup !!!!



-------------------------------
Réponse au message :
-------------------------------

> Intéressant merci
> ca va m'aider
> ----------------------------
> Remixtech
> Webmaster
> www.remixtech.com
> ----------------------------
>
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Tu peux gérer cela avec une variable publique, de type booléen... Par exemple pour une variable "Sauve", tu la met à True quand le document a été enregistré, et à False, dès qu'il y a une modification...
> > Enfin, tu utilises l'évènement OnCloseQuery de ta form principale :
> >

> > procedure TForm1.FormCloseQuery(...); > > begin > > > > If Sauve then Exit; > > > > Case MessageDlg('Voulez-vous sauvegarder le document ?', mtConfirmation, [mbYes, mbNo, mbCancel], 0) Of > > mrYes: MaProcDeSauvegarde; > > mrCancel: Canclose := False; > > End; > > > > end; > >

> >
> > L'utilisateur aura le choix entre sauvegarder le document puis quitter, quitter sans sauvegarder et annuler sa sortie...
> >
> > Bonne prog' !
> > Bestiol.
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > Comment faire pour afficher une page qui demande si l'on veut enregistrer ou pas les modification, quand on ferme une application.
> > > Merci.
> >
>