Fermeture d'une Form
Résolu
catmldrd
Messages postés
11
Date d'inscription
jeudi 21 octobre 2004
Statut
Membre
Dernière intervention
27 février 2006
-
16 déc. 2004 à 02:05
cs_valval Messages postés 13 Date d'inscription mercredi 20 octobre 2004 Statut Membre Dernière intervention 1 janvier 2005 - 16 déc. 2004 à 15:00
cs_valval Messages postés 13 Date d'inscription mercredi 20 octobre 2004 Statut Membre Dernière intervention 1 janvier 2005 - 16 déc. 2004 à 15:00
4 réponses
MoveX
Messages postés
230
Date d'inscription
vendredi 9 mai 2003
Statut
Membre
Dernière intervention
16 juillet 2005
1
16 déc. 2004 à 07:32
16 déc. 2004 à 07:32
form.hide, ca ne te convient pas?
cs_zmc
Messages postés
147
Date d'inscription
vendredi 26 avril 2002
Statut
Membre
Dernière intervention
26 avril 2008
1
16 déc. 2004 à 07:42
16 déc. 2004 à 07:42
Salut,
Je vois pas trop ce que tu veux faire, pourquoi ne pas executer ta condition avant d'ouvrir ton form du style
Sachant que else ne sera pas executé tant que ton form sera ouvert (à vérifier quand meme).
Sinon ecrire simplement dans OnActivate (plutot OnCreate en fait)
Form.Close ou pour fermer l'application entière Halt(0).
A+
Je vois pas trop ce que tu veux faire, pourquoi ne pas executer ta condition avant d'ouvrir ton form du style
if True then
Form.ShowModal
else
...
Sachant que else ne sera pas executé tant que ton form sera ouvert (à vérifier quand meme).
Sinon ecrire simplement dans OnActivate (plutot OnCreate en fait)
Form.Close ou pour fermer l'application entière Halt(0).
A+
cs_valval
Messages postés
13
Date d'inscription
mercredi 20 octobre 2004
Statut
Membre
Dernière intervention
1 janvier 2005
1
16 déc. 2004 à 15:00
16 déc. 2004 à 15:00
Salut!
Je ne te conseille de ne pas d'introduire du code de fermetture de la Form dans l'évènement OnActivate.
Dans une Unité, crée une fonction booléenne "FermerForm(<liste des paramètres éventuels...>)" qui sera chargée de tester la(les) condition(s) de non lancement de la Form(Il faudra la déclarer dans la partie Interface).
Si la Form est lancée suite à un clic de bouton par exemple:
Procedure Tform1.Button1Click(Sender:Tobject);
Begin
... //instructions
If FermerForm(...)=False Then //condition favorable à l'ouverture
Form2.showModal
Else //condition défavorable (facultatif)
...
... //autres instructions
End;
J'attends moi aussi des critiques; nul ne détient le monopole du savoir.
Je ne te conseille de ne pas d'introduire du code de fermetture de la Form dans l'évènement OnActivate.
Dans une Unité, crée une fonction booléenne "FermerForm(<liste des paramètres éventuels...>)" qui sera chargée de tester la(les) condition(s) de non lancement de la Form(Il faudra la déclarer dans la partie Interface).
Si la Form est lancée suite à un clic de bouton par exemple:
Procedure Tform1.Button1Click(Sender:Tobject);
Begin
... //instructions
If FermerForm(...)=False Then //condition favorable à l'ouverture
Form2.showModal
Else //condition défavorable (facultatif)
...
... //autres instructions
End;
J'attends moi aussi des critiques; nul ne détient le monopole du savoir.
jmp77
Messages postés
1119
Date d'inscription
lundi 4 février 2002
Statut
Membre
Dernière intervention
4 octobre 2006
7
16 déc. 2004 à 08:52
16 déc. 2004 à 08:52
hello,
Bentu fais Form.close et dans le OnClose de la fenetre tu fais Action := CaFree;
Bonne prog,
JMP77.
N'oubliez pas de cliquer sur réponse acceptée.
Bentu fais Form.close et dans le OnClose de la fenetre tu fais Action := CaFree;
Bonne prog,
JMP77.
N'oubliez pas de cliquer sur réponse acceptée.
