MyAccel ACCELERATORS
  { 
    VK_F5, IDM_LAND, VIRTKEY
    VK_F5, IDM_SEA, VIRTKEY, CONTROL
    VK_INSERT, IDM_TREES, VIRTKEY
    VK_INSERT, IDM_BLOEMEN, VIRTKEY, SHIFT, ALT
  }

MENUITEM "&Sea\aCtrl+F5", IDM_SEA

w.wndclass.lpszMenuName = "Examplemenu";
w.szAccel = "MyAccel";

int win::result()
  { 
    ...
    HACCEL hAccel = (szAccel ? LoadAccelerators(hInstance, szAccel) : 0);
    while (GetMessage(&msg, NULL, 0, 0))
      { 
        if (hDlg == 0 || !IsDialogMessage(hDlg, &msg))
          { 
            if (hAccel == 0 || !TranslateAccelerator(hWnd, hAccel, &msg))
              { 
                TranslateMessage(&msg);
                DispatchMessage(&msg);
              }
          }
      }
    return msg.wParam;
  }

//menus1.cpp: Demonstration of a menu, with add-ons
//            Links with win.obj and resource-script-file menus1.rc

#include "win.h"
#include "menus1.h"


int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, 
                   PSTR szCmdLine, int iCmdShow)
  {
    win w(hInstance, iCmdShow, "menus1", 
          "menu1: Accelerators, checked menu's,
           gray items, and a seperator");
    w.wndclass.lpszMenuName = "ExampleMenu";
    w.szAccel = "MyAccel";
    return w.result();
  }


LRESULT CALLBACK WndProc(HWND hWnd, UINT iMsg, 
                         WPARAM wParam, LPARAM lParam)
  { 
    switch (iMsg)
      { 
        case WM_COMMAND:
          { 
            HMENU hMenu = GetMenu (hWnd);
            for (UINT i=IDM_LAND; i<=IDM_INSECTS; i++)
              CheckMenuItem (hMenu, i, (i==wParam ? 
                                        MF_CHECKED: MF_UNCHECKED));
            EnableMenuItem(hMenu, IDM_INSECTS, MF_GRAYED);
      

            switch (LOWORD(wParam))
              { 
                case IDM_LAND:
                     MessageBox (hWnd, "Horse, Dog, Cat",
                                 "Land", MB_OK);
                     break;
                case IDM_SEA:
                     MessageBox (hWnd, "Fish, Shark, Alligator",
                                 "Sea", MB_OK);
                     break;
                case IDM_TREES:
                     MessageBox (hWnd, "Some trees",
                                 "Trees", MB_OK);
                     break;
                case IDM_FLOWERS:
                     MessageBox (hWnd, "Some flowers",
                                 "Flowers", MB_OK);
                     break;
             }
           return 0;
         } 
       case WM_DESTROY:
            PostQuitMessage(0); 
            return 0;
      }
    return DefWindowProc(hWnd, iMsg, wParam, lParam);
  }

//MENUS1.H

#define IDM_LAND    1001
#define IDM_SEA     1002
#define IDM_TREES   1003
#define IDM_FLOWERS 1004
#define IDM_INSECTS 1005

//MENUS1.RC:

#include <windows.h>
#include "menus1.h"

ExampleMenu MENU
  { 
    POPUP "&Animals"
      { 
        MENUITEM "&Land\aF5", IDM_LAND
        MENUITEM "&Sea\aCtrl+F5", IDM_SEA
        MENUITEM SEPARATOR
        MENUITEM "&Insects", IDM_INSECTS
      }
    POPUP "&Plants"
      { 
        MENUITEM "T&rees\aIns", IDM_TREES
        MENUITEM "Fl&owers\aShift+Alt+Ins", IDM_FLOWERS   
      }
  }


MyAccel ACCELERATORS
  { 
    VK_F5, IDM_LAND, VIRTKEY
    VK_F5, IDM_SEA, VIRTKEY, CONTROL
    VK_INSERT, IDM_TREES, VIRTKEY
    VK_INSERT, IDM_FLOWERS, VIRTKEY, SHIFT, ALT
  }

HMENU hMenu;
hMenu = GetMenu(hWnd);

CheckMenuItem(hMenu, IDM_FLOWERS, MF_CHECKED);

CheckMenuItem(hMenu, IDM_FLOWERS, MF_UNCHECKED);

UNIT i;
HMENU hMenu;

...

case WM_COMMAND:
     hMenu = GetMenu(hWnd);
     for (i=IDM_LAND; i<=IDM_INSECTS; i++)
       CheckMenuItem (hMenu, i, (i == wParam ?
                                 MF_CHECKED : MF_UNCHECKED) );

(i == wParam ? MF_CHECKED : MF_UNCHECKED)

EnableMenuItem (hMenu, IDM_INSECTS, MF_GRAYED);

EnableMenuItem (hMenu, IDM_INSECTS, MF_ENABLED);

MENUITEM SEPARATOR