создаю меню
| Код |
MainMenu := CreateMenu;
N21:= CreatePopupMenu;
CreateMenuItem(MainMenu,N21,'Размер',0,100,false);
CreateMenuItem(N21,0, '1 Мб',0,104,false);
CreateMenuItem(N21,0, '5 Мб',0,105,false);
CreateMenuItem(N21,0, '15 Мб',0,106,false);
|
помечаю пункт:
| Код |
begin
CheckMenuItem( N21, 105, MF_CHECKED );
|
а как проверить, отмечен ли пункт?
| Код |
if Sendmessage(N21, bm_getcheck,0,0)=0 then ... else...
|
- но тут проверяется раздел меню, а не пункт..
| Код |
if Sendmessage(105, bm_getcheck,0,0)=0 then ... else...
|
|
)