Discussion :

[momofr]

Pour afficher mon PopupMenu, il faut cliquer droit dans une ligne de ListBox.
Pour cela j'ai renseigné le nom du menu PopupMenu dans la propriété "PopupMenu" de ma ListBox.
Quand on clique droit sur une ligne de la ListBox le PopupMenu s'affiche bien, mais le déplacement du curseur sur les lignes de choix du Popup modifie l'aspect du choix en l'entourant d'un trait alors qu'elles devraient logiquement s'afficher avec un fond bleu.

Je veux que le choix survolé par le curseur de souris s'affiche avec un fond bleu comme c'est le cas par défaut pour les choix de mon TMainMenu et aussi pour les lignes sélectionnées dans mes TListBox.
Je ne comprend pas pourquoi c'est différent pour le Popup, car c'est pourtant cette couleur bleue qui s'affiche quand on édite le Popup dans l'environnement de développement Delphi et que l'on déplace le curseur de souris sur les différents choix.

Quelqu'un a-t-il une idée pour résoudre ce problème ?

Merci d'avance pour votre aide

[ShaiLeTroll]

Aurais-tu OwnerDraw à true, et fait un dessin dans OnMeasureItem ?

Ce que tu décrits, ressemblerait un effet HotTrack, mais ça n'existe pas pour un TMenuItem

Cela impacte TOUS les TPopupMenu de ton application ?
Comment se comporte les Menus dans les autres applications ? Peut-être un effet de bord sur la gestion des Themes

Delphi 7 par exemple, n'affiche pas les thèmes en Design Time mais pourtant les supporte en RunTime si tu as inclu le Manifest XP !

EDIT : Est-ce un cadre plein ? ou un trait pointillé ?

[momofr]

OwnerDraw est à false et je n'utilise pas de OnMeasureItem.
Je n'ai qu'un seul TPopupMenu dans mon application.

Les applications suivantes affichent des choix de PopupMenu de couleur ocre :
- Word,
- Wordpad.

Les applications suivantes affichent des choix de PopupMenu d'aspect identique à mon application :
- Environnement de développement Delphi,
- Explorateur Windows,
- Bloc-notes,
- Corbeille,
- Calculatrice.

Je suis sous "Windows 7" avec "Delphi 5" et ne connais pas "Manifest XP".

Qu'est-ce que EDIT ?

[ShaiLeTroll]

Les applications suivantes affichent des choix de PopupMenu d'aspect identique à mon application :...

En gros, tes Menus ont le même comportement que partout ailleurs, ça sent le thème

Je suis sous "Windows 7" avec "Delphi 5" et ne connais pas "Manifest XP".

Effectivement, on doit pouvoir l'ajouter comme ressource, c'est juste un XML décrivant la version des controls windows
La version "composant" est apparu en D7 !
Semble que seul les TPopupMenu soit impactés ! Etrange !
N'ayant pas Seven, je ne pourrais pas plus t'aider !
A Mon avis, c'est peine perdue !

Qu'est-ce que EDIT ?

C'est une mention, pour dire que j'ai édité ma réponse !
Rien de plus !
C'est une habitude assez répandu sur le Forum, vois-le comme un PS (Post Scriptum)

[momofr]

Je crois que pour le moment je vais me contenter de l'affichage actuel.

Je prend note de la date de cette discussion et viendrai ici régulièrement pour le cas où quelqu'un aurait une solution simple à proposer pour résoudre ce problème.

Merci

[momofr]

Pour résoudre mon problème, il suffit simplement de définir la propriété "OwnerDraw" du PopupMenu à "True", sans avoir à déclarer pour cela de gestionnaire d'événement supplémentaire (ni "OnDrawItem" ni "OnMeasureItem").
Cela fonctionne en tout cas chez moi : les choix de PopupMenu survolés prennent maintenant la couleur bleue.
Ce serait bien que d'autres développeurs testent chez eux et fassent part ici du résultat (j'ai l'intention de fermer cette discussion à la fin de la semaine).

Merci d'avance pour votre coopération

[Lung]

Ce serait bien que d'autres développeurs testent chez eux et fassent part ici du résultat (j'ai l'intention de fermer cette discussion à la fin de la semaine).

J'ai testé sous D6 et D2010.
J'ai la sélection des éléments de menu en bleu, avec ou sans OwnerDraw.