Sortir d'une Form en mode ShowModal [Résolu]

Signaler
Messages postés
21
Date d'inscription
jeudi 22 mai 2003
Statut
Membre
Dernière intervention
8 octobre 2007
-
Cirec
Messages postés
3808
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
20 janvier 2020
-
Bonjour

Je dois modifier une source et je butte sur un problème. Une fenêtre
est activée avec la fonction Form.ShowModal, un traitement y est donc
lancé et l'on doit cliquer sur un bouton pour sortir et revenir à la
fenêtre principal. Ici tout fonctionne correctement.

Je souhaite obtenir une seconde alternative de sortie en créant une
temporisation. Une fois le traitement réalisé, au bout d'une période de
x seconde, je voudrais fermer automatiquement la fenêtre modale et
revenir sur la fiche principal sans avoir à cliquer sur un bouton et
sans intervention de l'utilisateur.

J'ai essayé de passer par une fenêtre non Modale mais le source est
trop complexe et je souhaite une solution plus simple comme une
simulation d'un clic sur le bouton ou autre

Avec mes remerciements pour une éventuelle suggestion.

Micfor

9 réponses

Messages postés
21
Date d'inscription
jeudi 22 mai 2003
Statut
Membre
Dernière intervention
8 octobre 2007

Ok cela fonctionne, apres avoir tout testé, j'ai insérer la commande close dans un composant timer et cela fonctionne.

Merci à vous

Micfor
Messages postés
139
Date d'inscription
mercredi 4 janvier 2006
Statut
Membre
Dernière intervention
7 septembre 2010

T'as essaye avec "close" ? Tu le places juste apres ta tempo
Messages postés
13
Date d'inscription
lundi 15 mars 2004
Statut
Membre
Dernière intervention
3 février 2006

salut
Je crois que la reponse de yannba est suffisante.
Rien à ajouter, je veux juste le confirmer.
Messages postés
21
Date d'inscription
jeudi 22 mai 2003
Statut
Membre
Dernière intervention
8 octobre 2007

Cela ne fonctionne pas. L'instruction Close fonctionne uniquement lorsqu'elle est placée dans un bouton.
Messages postés
3808
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
20 janvier 2020
35
Salut,
Form.Button1.Click

où Form est le nom de la form Modal
Button1 le nom du bouton qui ferme cette form
et click pour simuler un clique dessus

@+
Cirec
Messages postés
3808
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
20 janvier 2020
35
re,
où alors Form.close;
où Form est le nom de la form Modal

@+
Cirec
Messages postés
21
Date d'inscription
jeudi 22 mai 2003
Statut
Membre
Dernière intervention
8 octobre 2007

Merci à vous mais je bataille encore. Comme je l'ai dis plus haut, avec
un bouton et l'instruction close --> aucun problème mais je voudrais
fermer cette Form sans passer par un bouton, je veux placer une tempo
et sortir de la form à la fin de cette tempo.
Messages postés
3808
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
20 janvier 2020
35
dans ce cas tu mets un Timer dans la Form Modal que tu active au moment ou elle devient visible (évenement OnShow de la Form) et dans l'évenement OnTimer tu met Close

plus clairement
après avoir mis le Timer sur la Form tu cliques dessus et dans l'inspecteur d'objet tu mets Enable à False et interval à 10000 pour 10 secondes par Ex. En suite dans l'onglet évenements de l'inspecteur d'objet tu double cliques sur OnTimer et la dans le code généré tu écris :
Timer1.Enabled := False;
Close;

en suite tu cliques sur la form et dans l'inspecteur d'object onglet évenements tu double cliques sur OnShow et dans le code généré tu écris :
Timer1.Enabled := True;

@+
Cirec
Messages postés
3808
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
20 janvier 2020
35
n'oublie pas de cliquer sur réponce acceptée stp Merci

@+
Cirec