POPMENU.RC: Translation to XDS Modula-2

Last updated: 19.10.1997, 12:31

/*----------------------------
   POPMENU.RC resource script
  ----------------------------*/

#include "popmenu.h"

PopMenu MENU
     BEGIN
     POPUP ""
          BEGIN
          POPUP "&File"
               BEGIN
               MENUITEM "&New",               IDM_NEW
               MENUITEM "&Open...",           IDM_OPEN
               MENUITEM "&Save",              IDM_SAVE
               MENUITEM "Save &As...",        IDM_SAVEAS
               MENUITEM SEPARATOR
               MENUITEM "E&xit",              IDM_EXIT
               END
          POPUP "&Edit"
               BEGIN
               MENUITEM "&Undo",              IDM_UNDO
               MENUITEM SEPARATOR
               MENUITEM "Cu&t",               IDM_CUT
               MENUITEM "&Copy",              IDM_COPY
               MENUITEM "&Paste",             IDM_PASTE
               MENUITEM "De&lete",            IDM_DEL
               END
          POPUP "&Background"
               BEGIN
               MENUITEM "&White",             IDM_WHITE, CHECKED
               MENUITEM "&Lt Gray",           IDM_LTGRAY
               MENUITEM "&Gray",              IDM_GRAY
               MENUITEM "&Dk Gray",           IDM_DKGRAY
               MENUITEM "&Black",             IDM_BLACK
               END
          POPUP "&Help"
               BEGIN
               MENUITEM "&Help...",           IDM_HELP
               MENUITEM "&About PopMenu...",  IDM_ABOUT
               END
          END
     END