Problème de Showmodal

Version imprimable

10/08/2006, 13h55
portu

Problème de Showmodal

Bonjour,
j'ai remarqué chez un client qu'une fenêtre (Recherche clients) appellée par un showmodal s'affichait (rarement) derrière la fiche principale. Le problème, c'est que l'utilisateur pense que le programme à planté vu qu'il ne voit pas sa fenêtre de recherche mais juste la fenêtre principale qui ne répond plus vu qu'une autre fenêtre est en showmodal.

Si on joue à cliquer sur l'application dans la barre des tâches + cliquer sur l'icône Bureau , la fenêtre modal se raffiche en premier plan.

Pourquoi ce problème ?

PS : Ce problème n'arrive pas tout le temps mais arrive quand même ! Donc c'est assez ennuyant pour l'utilisateur. Ce problème arrive lorsque le temps d'affichage de celle-ci est long (Quelques secondes). Lorsque cette fenêtre est appellée, elle fait une serie de traitement qui peuvent dans certains cas durer 5 à 8 secondes puis cette fenêtre s'affiche.

Merci d'avance.
10/08/2006, 14h22
edam
crée ta fiche modal achaque appel pas au démarage de votre application:
Code:

1 2 3 maform:=TMaform.creat(application); maform.showmodal; maform.release;
10/08/2006, 14h30
Rayek

Est ce que ta form principale n'est pas en fsStayOnTop ?
si oui, il faut que tu le désactives avant l'appel de la form puis que tu le remettres après.
10/08/2006, 15h01
Yurck
Bonjour,

C'est de sa faute ! Et de la tienne ! Mais aussi de Windows ! Et de Delphi !

Cela arrive fréquement sous TSE et très fréquemment sous w2k3.
Tu fais un traitement et en fin de traitement tu affiche une fenetre, que ce soit un messageDlg, un showmessage ouo une fenêtre modale perso.
Oui mais pendant ton traitement l'utilisateur impatient va voir sa messagerie donc désactive l'appli et une appli désactivée qui ayant terminée le traitement affiche la fenêtre. Puis en sortant des toilettes ton utilisateurs revient voir le résultat et réactive donc l'application, et c'est là que tout va mal.
Alors pourquoi ?
Je ne sais pas. (merci Yurck :lol:)
Moi j'élève mes clients pour qu'il utilise le ALT TAB.
Je pense qu'il faudrais sur le Desactivate de l'application faire :
Code:

1 2 FenEncours := Screen.activeForm;
et sur OnActivate de l'appli
Code:

1 2 if Assigned(FenEncours) then FenEncours.show;
A voir

a+
10/08/2006, 17h27
portu
Citation:
Envoyé par Yurck

Bonjour,

C'est de sa faute ! Et de la tienne ! Mais aussi de Windows ! Et de Delphi !

Cela arrive fréquement sous TSE et très fréquemment sous w2k3.
Tu fais un traitement et en fin de traitement tu affiche une fenetre, que ce soit un messageDlg, un showmessage ouo une fenêtre modale perso.
Oui mais pendant ton traitement l'utilisateur impatient va voir sa messagerie donc désactive l'appli et une appli désactivée qui ayant terminée le traitement affiche la fenêtre. Puis en sortant des toilettes ton utilisateurs revient voir le résultat et réactive donc l'application, et c'est là que tout va mal.
Alors pourquoi ?
Je ne sais pas. (merci Yurck :lol:)
Moi j'élève mes clients pour qu'il utilise le ALT TAB.
Je pense qu'il faudrais sur le Desactivate de l'application faire :

Code:

1 2 FenEncours := Screen.activeForm;

et sur OnActivate de l'appli

Code:

1 2 if Assigned(FenEncours) then FenEncours.show;

A voir

a+
Merci Yurk, c'est bien ce que je pensais +- au départ. Donc je vais essayer de générer ce problème exprès dans une nouvelle application et appliquer tes conseils.

Merci.

PS : Est ce grave si j'utilise cette manière lors de l'appel de la fenêtre modal
Code:

1 2 3 4 5 maform:=TMaform.create(NIL); ///Traitements divers maform.showmodal; maform.release;
Je parle bien sûr du NIL
10/08/2006, 17h34
tourlourou

du moment que tu te charges de la libération de la fiche, elle n'a pas besoin de Owner : c'est toi !!!
10/08/2006, 20h22
flepron

FormStyle => fsStayOnTop

Tu peux utiliser facilement dans la fenêtre que tu ouvres en mode modal, la proriété FormStyle et la mettre en fsStayOnTop. C'est simple en tout cas sous D7.

Après, si tu es sous D5 ou D6, l'idée est de créer un Timer dans ta form modal, et ce timer aura le code suivant:

procedure TFormModal.TimerBringToFront(Sender : TObject);
begin
BringToFront;
end;

Il y a toujours, une solution. En 10 ans de Delphi, je peux dire que je n'ai jamais buté sur un obstacle, mais parfois, il faut avoir la force de le contourner.
10/08/2006, 21h05
portu

Citation:

Envoyé par flepron

Tu peux utiliser facilement dans la fenêtre que tu ouvres en mode modal, la proriété FormStyle et la mettre en fsStayOnTop. C'est simple en tout cas sous D7.

Après, si tu es sous D5 ou D6, l'idée est de créer un Timer dans ta form modal, et ce timer aura le code suivant:

procedure TFormModal.TimerBringToFront(Sender : TObject);
begin
BringToFront;
end;

Il y a toujours, une solution. En 10 ans de Delphi, je peux dire que je n'ai jamais buté sur un obstacle, mais parfois, il faut avoir la force de le contourner.

L'idée du fsStayOnTop est bien mais j'ai pas envie d'avoir cette fenêtre au dessus des autres applications. fsStayOnTop = au dessus de toutes les fenêtres du système.

Et l'idée du timer est pas top qui appelle un BringToFront n'est pas non plus top (C'est plus du rafistolage vite fait ça :aie: ).

Mais merci quand même.

Le plus dur c'est quand même de faire des tests sur un problème qui arrive que très rarement. je n'arrive bien sûr pas à recréer le problème sur une nouvelle appli. :?