Discussion :

[tintinux]

Bonjour

J'ai un petit composant, qui contient notamment un bouton. Si on clique sur ce bouton un popup est affiché. C'est une form non modale qui sert à faire une recherche.

Je ferme ce popup quand il n'est plus actif. Quand mon composant est sur une forme classique, qu'on affiche le popup et qu'on ferme la form sans fermer d'abord le popup, ce dernier est quand même bien fermé. Donc pas de problème.

Mais si ma forme mère est un volet, et que ce volet disparait simplement parce qu'on déplace la souris ailleurs, comment faire pour que le popup disparaisse aussi (s'il avait été affiché) ?

Quel événement ou notification peut me permettre de provoquer la fermeture du popup ? Il faudrait bien sûr que le composant soit autonome, donc que je ne doive pas utiliser un événement de la forme mère.

Merci pour vos suggestions éclairées.

[ShaiLeTroll]

Qu'est-ce qu'un volet ? un TTabSheet dans un TPageControl ?
Un PopupMenu se ferme si l'on clic dessous où que l'on appuye sur Echap !
Regarder si WM_MENUSELECT, te permets de détecter la sortie d'un Menu (je ne crois pas)
Tu peux à la limite dans un Timer vérifier si la souris survol le Popup (un peu comme ce sujet : Problème avec TMenuItem.Hint en utilisant WindowFromPoint), si la classe n'est pas '#32768' ce que l'on ne survole pas le Popup et dans cas tu force la fermeture avec WM_CLOSE (je n'ai jamais essayé, en théorie ça devrait passer)

[tintinux]

Bonjour et merci !

J'aurais dû préciser que j'appelle volet une forme liée à un TDockTabSet. Elle disparait notamment quand la souris clique ailleurs, mais ce n'est pas une fermeture (son événement OnClose n'est pas appelé, seulement OnHide)

Le problème est de savoir si cette disparition génère un message qui pourrait être traité par le composant qui a été posé dessus.

Par ailleurs, je ne parlais pas d'un popupmenu, mais d'une forme de type popup. Je crois ça n'a pas d'importance.

Cordialement,
Tintinux

[ShaiLeTroll]

Tout est important !
C'est l'erreur dans de nombreux sujets, on est noyé d'informations inutiles (ton premier sujet en est exemple) mais il manque le plus importants, les classes utilisées !
C'est idiot, nous ne sommes pas devins, même si je lis très bien dans la cervoise et dans le sanglier ...

Il y a des milliers de composants, plusieurs peuvent permettent des comportement similaires, on ne peut pas deviner, tu t'embêtes à écrire un sujet tout en français (volets fallait le trouver se terme !) sans préciser les composants (genre du un fichier audio mais lequel midi, wave, mp3 ..., c'est se compliquer la vie pour rien)

Du coup, ma réponse ne sert à rien, j'ai perdu du temps, tu as perdu du temps !

TDockTabSet, je ne connais pas, on dirait que c'est une variante du TTabControl, que j'ai utilisé aussi et pour ancrer des TForm, j'utilise la propriété parent

Pour la forme de type Popup, encore une fois, tu as sous-estimé l'importance, tout ma réponse était basé sur le handle d'un Popup dans Windows, si tu utilises un TForm, mets donc un Timer qui ferme la fiche, avec ControlAtPos tu pourras voir si ce qu'il y a en dessus, si cela ne correspond pas à l'objet ayant demandé le Popup, tu ferme le Popup ...

Tu pourrais aussi jouer avec OnEnter, une fois avoir survolé le speudo-Popup une première fois, tu lance TrackMouseEvent qui te permettra de récuperer un évènement LEAVE ou tu mes un boolean à true qui tu testes dans le OnLeave et tu fermes la fenêtre

Utilise le TForm.OnHide ou TDockTabSet.OnChange qui appelerait une fonction de ton composant pour fermer la fiche avec Close ou Hide

Plein de solution, la limite c'est juste l'imagination !
Mais, bon depuis hier 11h44 et ce matin 08h47, tu as du trouver tout seul la réponse, j'ai fait un truc similaire, un Menu avec l'aspect d'un Balloon Hint HTML qui fonctionne même sur les control disabled. en deux petites journées c'était fait !
par exemple, un bouton sur ce Menu permettait d'activer les disabled à la volée, ou des les désactiver, des les vider, de reprendre une valeur de l'historique (tout était mémorisé pour la traçabilité les données) il y avait un workflow assez complexe lié au métier de laboratoire.
Evidemment, j'avais mis en place un système de fermeture automatique
- tant que l'on est pas entrer dedans, il reste ouvert, si l'on le survole une première fois puis l'on le quitte sa surface, il se ferme,
- un bouton permettait aussi de le fermer (un bouton orange comme sur les ballons hint)
- le survol d'un autre control que celui à l'origine du Hint provoquait la fermeture et parfois l'ouverture d'un autre Hint ...

Tient, je t'ai noyé de réponses et d'histoires inutiles !