cs_ak47
Messages postés24Date d'inscriptiondimanche 28 avril 2002StatutMembreDernière intervention11 novembre 2002
-
2 juin 2002 à 19:08
JulioDelphi
Messages postés2226Date d'inscriptiondimanche 5 octobre 2003StatutMembreDernière intervention18 novembre 2010
-
28 mars 2008 à 15:04
salut,
Je voudrais ajouter une boite de dialogue a mon programme pour qu'elle demande à l'utitlisateur si il veux vraiment quitter le programme ( il repond en cliquant sur le bouton oui ou sur le bouton non).
Comment faire ?
merci d'avance.
ak47.
cs_Bestiol
Messages postés833Date d'inscriptiondimanche 6 janvier 2002StatutMembreDernière intervention 3 novembre 20051 2 juin 2002 à 19:37
Salut !
Je sais pas si t'as bien cherché dans le forum ou même dans l'aide de Delphi avant de poser cette question... Mais bon, c'est pas grave, voici la réponse :
Tu crées un évènement OnCloseQuery pour ta form principale, dans lequel tu mets :
CanClose := False; //Empêche l'appli de se fermer
If MessageDlg('Etes-vous sûr de vouloir quitter ?', mtConfirmation, [mbYes, mbNo], 0) = mrYes Then Application.Terminate;
//pose la question et ferme si on répond oui.
cs_ak47
Messages postés24Date d'inscriptiondimanche 28 avril 2002StatutMembreDernière intervention11 novembre 2002 2 juin 2002 à 20:19
-------------------------------
Réponse au message :
-------------------------------
Salut !
Je sais pas si t'as bien cherché dans le forum ou même dans l'aide de Delphi avant de poser cette question... Mais bon, c'est pas grave, voici la réponse :
Tu crées un évènement OnCloseQuery pour ta form principale, dans lequel tu mets :
CanClose := False; //Empêche l'appli de se fermer
If MessageDlg('Etes-vous sûr de vouloir quitter ?', mtConfirmation, [mbYes, mbNo], 0) = mrYes Then Application.Terminate;
//pose la question et ferme si on répond oui.
cs_Delphiprog
Messages postés4297Date d'inscriptionsamedi 19 janvier 2002StatutMembreDernière intervention 9 janvier 201332 2 juin 2002 à 23:11
Ou de façon plus concise :
CanClose :MessageDlg('Etes-vous sûr de vouloir quitter ?', mtConfirmation, [mbYes, mbNo], 0) mrYes;
Bestiol : il n'est pas utilise d'appeler Application.Terminate puisque la fermeture de la fiche principale de l'application a pour conséquence de ... terminer l'application.
CQFD
May Delphi be with you.
Delphi advanced
cs_Bestiol
Messages postés833Date d'inscriptiondimanche 6 janvier 2002StatutMembreDernière intervention 3 novembre 20051 3 juin 2002 à 18:07
Merci DelphiProg !! C'est vrai que ton code est beaucoup plus concis !! Je l'avais déjà vu qque part, mais j'ai en fait gardé l'habitude de mes premiers pas en programmation !
Bestiol.
Vous n’avez pas trouvé la réponse que vous recherchez ?
cs_tuna
Messages postés4Date d'inscriptionmardi 25 mars 2008StatutMembreDernière intervention28 mars 2008 28 mars 2008 à 13:51
bonjour,
je veut que lorsque j'appuis sur une button elle me renvoie une chaine de caractere dans un edit et lorsque j'appuis une autre fois je veut qu'elle m'affiche une message que le chaine est affiché