Context menu Windows - icone pour un item

Version imprimable

07/03/2003, 09h11
Cameleon45

Context menu Windows - icone pour un item

Re-Bjr à tous

J' aurais juste une derniere question au sujet du context menu Windows : comment peut-on attribuer une icone à un item que l' on aurait créé ?

:arrow: merci d' avance ;)
07/03/2003, 09h15
gibet_b

Dans un PopUp Menu ? Rassure-moi, tu n'as pas cherche... :-) Il te faut mettre une TImageList sur ta form et choisir ensuite dans liste deroulante de la propriete ImageIndex de ton TMenuItem l'image que tu veux lui associer.

Voila un exemple à moi :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
   //.Modification du menu système.
   SystemMenu := GetSystemMenu(Handle, False);
   DeleteMenu(SystemMenu, SC_RESTORE, MF_BYCOMMAND);
   DeleteMenu(SystemMenu, SC_SIZE, MF_BYCOMMAND);
   DeleteMenu(SystemMenu, SC_MINIMIZE, MF_BYCOMMAND);
   DeleteMenu(SystemMenu, SC_MAXIMIZE, MF_BYCOMMAND);
   Application.ProcessMessages;
   InsertMenu(SystemMenu, 0, MF_BYPOSITION + MF_STRING, IDConnexionMenu, '&Connexion ...');
   InsertMenu(SystemMenu, 1, MF_BYPOSITION + MF_SEPARATOR, IDSeparateur, '');
   InsertMenu(SystemMenu, 2, MF_BYPOSITION + MF_STRING, IDRepertoire, '&Définir répertoire ...');
   InsertMenu(SystemMenu, 3, MF_BYPOSITION + MF_STRING, IDActionsMenu, '&Actions');
   InsertMenu(SystemMenu, 4, MF_BYPOSITION + MF_STRING, IDReduireMenu, '&Réduire');
   _BitmapsPopup[1] := TBitmap.Create;
   _BitmapsPopup[1].Height:= ImageConnection.Height;
   _BitmapsPopup[1].Width:= ImageConnection.Width;
   _BitmapsPopup[1].Canvas.Draw(-1, -1, ImageConnection.Picture.Graphic);
   SetMenuItemBitmaps(SystemMenu, 0, MF_BYPOSITION, _BitmapsPopup[1].Handle, _BitmapsPopup[1].Handle);
   Application.OnMessage := OnMessage;

Si ca peut t'aider ...

:wink:

07/03/2003, 09h38
Cameleon45

Je parlais du Context Menu de Windows, Gibet_B :mrgreen:

Hélas, cette simple méthode ne s' applique évidemment pas pour ce popupmenu.
Dans ce cas-là, il faut passer par la BDR... et écrire l' adresse pointant vers la DLL qui contient l' icone à utliser, suivit de son index. Mais une fois de plus, j' ignore comment écrire cette info dans la BDR. :?
07/03/2003, 09h39
Cameleon45

merci lung je regarde ça de suite ;)
07/03/2003, 09h45
gibet_b

:-) Je me disais aussi...

Je me suis permis de douter, une personne ayant poster un message tres confu a ce sujet il n'y a pas longtemps. Et peu de gens utilisant l'aide ou la fonction de recherche... :-(

Désolé :-)
07/03/2003, 10h15
Cameleon45

:arrow: Gibet_B

Citation:

une personne ayant poster un message tres confu a ce sujet il n'y a pas longtemps. Et peu de gens utilisant l'aide ou la fonction de recherche...

Et cette tendance ne cesse de prendre de l' ampleur avec le temps... Il est bien dommage que les forums de Developpez n' y échappe pas.

Citation:

Désolé

Il n' y a pas de quoi l' être. Surtout lorsque l' on essaye de donné un coup de main! ;)

:arrow: Lung
Edit de mon post : j' ai dit des c******. :mrgreen:
Ca marche nickel-chrome pour ce que je veux. Merci Lung.

@++ all et merci
07/03/2003, 13h48
Lung

De rien.

:wink: