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