Скачать: CL | DM;

Не срабатывает wm_DrawItem и wm_MeasureItem   Найти похожие ветки 

← →
half_litre   (2004-10-25 11:23) [0]

Есть :  samePopup : TPopupMenu
procedure WMDrawItem(var Msg:TWMDrawItem);
          message wm_DrawItem
procedure WMMeasureItem(var Msg:TWMMeasureItem);message                     wm_MeasureItem;

На OnShow :
for i:=0 to samePopup.Items.Count-1 do begin
     ModifyMenu(samePopup.Handle,i,MF_BYPOSITION +MF_OWNERDRAW,  
     GetMenuItemID(samePopup.Handle,i),
     PChar(samePopup.Items[I].Caption));
end;
Трабл :
Не срабатывают wm_DrawItem и wm_MeasureItem
Зарание thx за помощь

---

← →
DVM ©   (2004-10-25 11:28) [1]

стиль OwnerDraw присутствует?

---

← →
half_litre   (2004-10-25 11:31) [2]

Дык : ModifyMenu(...MF_OWNERDRAW...)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.043 c