Discussion :

[Larion]

Bonjour,

J'arrive à ajouter un élèment dans un menu contextuel, mais je n'arrive pas à ajouter l'icône.
Ou est mon erreur ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
   Graphics::TBitmap *Bitmap = new Graphics::TBitmap();
   Form1->ImageList->GetBitmap(24,Bitmap);
   MENUITEMINFO MenuItemInfo;
   ZeroMemory(&MenuItemInfo, sizeof(MenuItemInfo));
   TCHAR szT[]= _T("Test");
   ZeroMemory(&MenuItemInfo, sizeof(MenuItemInfo));
   MenuItemInfo.cbSize        = sizeof(MenuItemInfo);
   MenuItemInfo.fMask         = MIIM_TYPE|MIIM_STATE|MIIM_ID|MIIM_CHECKMARKS|MIIM_DATA;
   MenuItemInfo.fType         = MFT_STRING;
   MenuItemInfo.fState        = MFS_CHECKED;
   MenuItemInfo.wID           = (UINT)MB_S;
   MenuItemInfo.hbmpChecked   = Bitmap->Handle;
   MenuItemInfo.hbmpUnchecked = 0;
   MenuItemInfo.dwTypeData    = szT;
   MenuItemInfo.cch           = sizeof(szT);
   InsertMenuItem(hSMenu,0,1,&MenuItemInfo);

[Larion]

J'ai trouvé une méthode alternative, mais j'ai le même problème :
l'icône ne s'affiche pas dans le menu contextuel de windows.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
   InsertMenu(hSMenu,0,MF_STRING,(UINT)MB_S|MF_BYCOMMAND,"&Test");
   Graphics::TBitmap *Bitmap = new Graphics::TBitmap();
   Form1->ImageList->GetBitmap(24,Bitmap);
   SetMenuItemBitmaps(hSMenu,0,MF_BYPOSITION,Bitmap->Handle,Bitmap->Handle);

[Trap D]

As-tu consulté cette adresse

[Larion]

Oui, tout à fait : je me suis inspiré de cela aussi : http://vcallies.developpez.com/delphi/astuces

[Trap D]

Perso j'ai utilisé ta deuxième méthode en chargeant le bitmap à partir de ressources :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
InsertMenu(hMenu, indexMenu, MF_STRING | MF_BYPOSITION, idCmdFirst++, tmp);
 
HBITMAP hbitmap =  LoadBitmap(Mainhinst, "mon_bitmap");
if (hbitmap != NULL)
            SetMenuItemBitmaps(hMenu, indexMenu, MF_BYPOSITION,hbitmap, hbitmap);