Declare Function AppendMenu Lib "user32" _ Alias "AppendMenuA" _ ByVal hMenu As Long, _ ByVal wFlags As Long, _ ByVal wIDNewItem As Long, _ ByVal lpNewItem As Any) As Long
AppendMenu добавляет новый пункт в конец заданного меню. Данную функцию можно заменить функцией InsertMenuItem, обладающей большими возможностями.
MF_BITMAP | Пункт меню является растром. Параметр wIDNewItem содержит описатель этого изображения |
MF_CHECKED | Устанавливает галочку |
MF_DISABLED | Блокирует пункт меню |
MF_ENABLED | Снимает блокировку пункта меню |
MF_GRAYED | Блокирует пункт меню, затемняя серым цветом |
MF_MENUBREAK | Новый столбец |
MF_OWNERDRAW | Прорисовка меню выполняется самим приложением |
MF_POPUP | Заданный пункт связывается со всплывающим меню или подменю |
MF_SEPARATOR = &H800& | Разделительная черта |
MF_STRING = &H0& | Текст для пункта меню. Указатель на текст содержится в lpNewItem |
MF_UNCHECKED | Снимает галочку с пункта меню |
wFlags | Значения |
---|---|
MF_BITMAP | Переменная типа Long содержит описатель растра |
MF_OWNERDRAW | Значение параметра включается в структуры меню |
MF_STRING | Переменная типа String содержит текст нового пункта |
Скачать пример menu.zip
CreateMenu, InsertMenuItem, ModifyMenu