home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / utility / resc / bpmenu.rc next >
Encoding:
Text File  |  1993-07-05  |  12.1 KB  |  369 lines
  1. /*
  2.     An example how to use Windows-like Resource Scripts for Turbo-Vision :
  3.  
  4.     To Compile use :
  5.       RESC     bpmenu.res bpmenu.rc
  6.  
  7.     To Link with other Resources use :
  8.       RESLINK  myapp.res bpmenu.res
  9.  
  10.     If you've further question for tools for resource-handling,
  11.     contact me at 10023,265 on CompuServe !
  12.  
  13.                             - Mfg Stefc -
  14.  
  15.     P.S. I've use some Resources from BPW extracted via the Resource-Workshop
  16.          in this example and also a resource of my own tool RESMOVER !
  17.  
  18.     P.S.S.  The compiler itself is programed with using the YACC/LEX-Tool
  19.             for Turbo-Pascal. Unix-Tools goes TP :-)
  20. */
  21.  
  22. 1 MENU  LOADONCALL MOVEABLE DISCARDABLE
  23. BEGIN
  24.     POPUP "&File" 1000
  25.     BEGIN
  26.         MENUITEM "&New",                      1001
  27.         MENUITEM "&Open...",                  1002
  28.         MENUITEM "&Save",                     1003
  29.         MENUITEM "Save &as...",                400
  30.         MENUITEM "Save a&ll",                 1005
  31.         MENUITEM SEPARATOR
  32.         MENUITEM "&Print",                    1006
  33.         MENUITEM "P&rinter setup...",         1007
  34.         MENUITEM SEPARATOR
  35.         MENUITEM "E&xit\tAlt+F4",             1008, kbAltF4
  36.     END
  37.  
  38.     POPUP "&Edit" 2000
  39.     BEGIN
  40.         MENUITEM "&Undo\tAlt+BkSp",           2001, kbAltBkSp
  41.         MENUITEM "&Redo",                     2009
  42.         MENUITEM SEPARATOR
  43.         MENUITEM "Cu&t\tShift+Del",           2002, kbShiftDel
  44.         MENUITEM "&Copy\tCtrl+Ins",           2003, kbCtrlIns
  45.         MENUITEM "&Paste\tShift+Ins",         2004, kbShiftIns
  46.         MENUITEM "C&lear\tCtrl+Del",          2005, kbCtrlDel
  47.     END
  48.  
  49.     POPUP "&Search" 3000
  50.     BEGIN
  51.         MENUITEM "&Find...",                  3001
  52.         MENUITEM "&Replace...",               3003
  53.         MENUITEM "&Search again\tF3",         3002, kbF3
  54.         MENUITEM SEPARATOR
  55.         MENUITEM "&Go to line number...",     3004
  56.         MENUITEM "Show last &compile error",  3006
  57.         MENUITEM "Find &error...",            3007
  58.         MENUITEM SEPARATOR
  59.         MENUITEM "&Objects",                  3008
  60.         MENUITEM "&Units",                    3009
  61.         MENUITEM "G&lobals",                  3010
  62.         MENUITEM SEPARATOR
  63.         MENUITEM "S&ymbol...",                3011
  64.     END
  65.  
  66.     POPUP "&Run" 6000
  67.     BEGIN
  68.         MENUITEM "&Run\tCtrl+F9",             6000, kbCtrlF9
  69.         MENUITEM "P&arameters...",            6005
  70.     END
  71.  
  72.     POPUP "&Compile"
  73.     BEGIN
  74.         MENUITEM "&Compile\tAlt+F9",          7000, kbAltF9
  75.         MENUITEM "&Make\tF9",                 7001, kbF9
  76.         MENUITEM "&Build",                    7002
  77.         MENUITEM SEPARATOR
  78.         MENUITEM "&Target...",                7003
  79.         MENUITEM "&Primary file...",          7004
  80.         MENUITEM "C&lear primary file",       7006
  81.         MENUITEM SEPARATOR
  82.         MENUITEM "&Information...",           7005
  83.     END
  84.  
  85.     POPUP "&Tools"
  86.     BEGIN
  87.         MENUITEM "Turbo &Debugger",           8502
  88.         MENUITEM SEPARATOR
  89.                 MENUITEM "&Resource Workshop",        8500
  90.         MENUITEM "&WinSight",                 8501
  91.         MENUITEM "Turbo &Profiler",           8503
  92.     END
  93.  
  94.     POPUP "&Options"
  95.     BEGIN
  96.         MENUITEM "&Compiler...",              9002
  97.         MENUITEM "&Memory sizes...",          9004
  98.         MENUITEM "&Linker...",                9005
  99.         MENUITEM "&Directories...",           9006
  100.         MENUITEM "Bro&wser...",               9009
  101.         MENUITEM "&Tools...",                 9016
  102.         MENUITEM SEPARATOR
  103.         POPUP "&Environment"
  104.         BEGIN
  105.             MENUITEM "&Preferences...",   9007
  106.             MENUITEM "&Editor...",        9008
  107.             MENUITEM "&Mouse...",         9010
  108.             MENUITEM "&Startup...",       9011
  109.             MENUITEM "&Highlight...",     9012
  110.         END
  111.  
  112.         MENUITEM SEPARATOR
  113.         MENUITEM "&Open...",                  9014
  114.         MENUITEM "&Save",                     9013
  115.         MENUITEM "Save &as...",               9015
  116.     END
  117.  
  118.     POPUP "&Window"
  119.     BEGIN
  120.         MENUITEM "&Cascade\tShift+F5",        4002, kbShiftF5
  121.         MENUITEM "&Tile\tShift+F4",           4001, kbShiftF4
  122.         MENUITEM "Arrange &icons",            4004
  123.         MENUITEM "Close &all",                4003
  124.     END
  125.  
  126.     POPUP "&Help"
  127.     BEGIN
  128.         MENUITEM "&Contents\tShift+F1",       5001, kbShiftF1
  129.         MENUITEM "&Topic search\tCtrl+F1",    5002, kbCtrlF1
  130.         MENUITEM "Using &help",               5004
  131.         MENUITEM SEPARATOR
  132.         MENUITEM "Compiler &directives",      5005
  133.         MENUITEM "Procedures and &Functions", 5007
  134.         MENUITEM "&Reserved words",           5008
  135.         MENUITEM "Standard &units",           5009
  136.         MENUITEM "Turbo &Pascal language",    5010
  137.         MENUITEM "&Error messages",           5013
  138.         MENUITEM SEPARATOR
  139.         MENUITEM "&About...",                 5012
  140.     END
  141.  
  142. END
  143.  
  144. #define cm_About            101     /* System */
  145. #define cm_ClearDesk        111
  146. #define cm_Info             115
  147. #define cm_Register         116
  148. #define cm_ShowHistory      121
  149.  
  150. #define cm_FOpen            103     /* File */
  151. #define cm_FNew             104
  152. #define cm_FSave            105
  153. #define cm_FSaveAs          106
  154. #define cm_ChangeDir        107
  155. #define cm_DosShell         108
  156. #define cm_PackIt           117
  157. #define cm_Rename           118
  158.  
  159. #define cm_ScrLines         110     /* Options */
  160. #define cm_MouseDlg         113
  161. #define cm_Colors           109
  162. #define cm_SaveOptions      119
  163. #define cm_LoadOptions      120
  164.  
  165. #define cm_MacroStart       122     /*  Macro   */
  166. #define cm_MacroEnd         123
  167. #define cm_MacroPlay        124
  168.  
  169. #define cmTile               25     /*  Window  */
  170. #define cmCascade            26
  171. #define cmClose               4
  172. #define cmZoom                5
  173. #define cmResize              6
  174. #define cmNext                7
  175. #define cmPrev                8
  176. #define cm_WinList          112
  177.  
  178. #define cm_HelpCrossRef    4000     /* Help */
  179. #define cm_HelpPrevious    4001
  180. #define cm_HelpContents    4002
  181. #define cm_HelpIndex       4003
  182. #define cm_HelpOnHelp      4004
  183.  
  184.  
  185. "MyMenu" MENU
  186. BEGIN
  187.   POPUP "&≡" 10018
  188.   BEGIN
  189.     MENUITEM "&About...",            cm_About,       kbNoKey,   10015
  190.     MENUITEM "&Clear Desktop",       cm_ClearDesk,   kbNoKey,   10017
  191.     MENUITEM SEPARATOR
  192.     MENUITEM "&Information",         cm_Info,        kbNoKey,   10304
  193.     MENUITEM "&Registration",        cm_Register,    kbNoKey,   10305
  194.     MENUITEM "&History/Fixes",       cm_ShowHistory, kbNoKey,   10311
  195.   END
  196.  
  197.   POPUP "&File" 10019
  198.   BEGIN
  199.     MENUITEM "&Open...\tF3",         cm_FOpen,       kbF3,      10028
  200.     MENUITEM "&New",                 cm_FNew,        kbNoKey,   10029
  201.     MENUITEM "Save &as",             cm_FSaveAs,     kbNoKey,   10031
  202.     MENUITEM "&Pack It\tAlt-P",      cm_PackIt,      kbAltP,    10306
  203.     MENUITEM "&R~ename Item\tAlt-R", cm_Rename,      kbAltR,    10306
  204.     MENUITEM SEPARATOR
  205.     MENUITEM "&Change Dir",          cm_ChangeDir,   kbNoKey,   10033
  206.     MENUITEM "&DOS shell",           cm_DosShell,    kbNoKey,   10036
  207.     MENUITEM "E&xit\tAlt-X",         cmQuit,         kbAltX,    10037
  208.   END
  209.  
  210.   POPUP "&Edit" 10020
  211.   BEGIN
  212.     MENUITEM "Cu&t\tShift-Del",      cmCut,          kbShiftDel, 10039
  213.     MENUITEM "&Copy\tCtrl-Ins",      cmCopy,         kbCtrlIns,  10040
  214.     MENUITEM "&Paste\tShift-Ins",    cmPaste,        kbShiftIns, 10041
  215.     MENUITEM "C&lear\tCtrl-Del",     cmClear,        kbCtrlDel,  10044
  216.   END
  217.  
  218.   POPUP "&Options" 10025
  219.   BEGIN
  220.     MENUITEM "&Lines\t25",            cm_ScrLines,    kbNoKey,  10215
  221.     MENUITEM "&Mouse...",             cm_MouseDlg,    kbNoKey,  10080
  222.     MENUITEM "&Colors...",            cm_Colors,      kbNoKey,  10075
  223.     MENUITEM SEPARATOR
  224.     MENUITEM "&Save options...",      cm_SaveOptions, kbNoKey,  10076
  225.     MENUITEM "&Retrieve options...",  cm_LoadOptions, kbNoKey,  10077
  226.   END
  227.  
  228.   POPUP "&Macros"  10313
  229.   BEGIN
  230.     MENUITEM "&Recording",        cm_MacroStart,   kbNoKey,  10314
  231.     MENUITEM "&Stop",             cm_MacroEnd,     kbNoKey,  10315
  232.     MENUITEM "&Play",             cm_MacroPlay,    kbNoKey,  10316
  233.   END
  234.  
  235.   POPUP "&Window" 10026
  236.   BEGIN
  237.     MENUITEM "&Size/Move\tCtrl-F5",     cmResize,    kbCtrlF5,  10083
  238.     MENUITEM "&Tile",                   cmTile,      kbNoKey,   10085
  239.     MENUITEM "C&ascade",                cmCascade,   kbNoKey,   10086
  240.     MENUITEM "&Next\tF6",               cmNext,      kbF6,      10087
  241.     MENUITEM "&Previous\tShift-Tab",    cmPrev,      kbShiftF6, 10088
  242.     MENUITEM "&Close\tAlt-F3",          cmClose,     kbAltF3,   10089
  243.     MENUITEM SEPARATOR
  244.     MENUITEM "&List...\tAlt-0",         cm_WinList,  kbAlt0,    10095
  245.   END
  246.  
  247.   POPUP "&Help"  10027
  248.   BEGIN
  249.     MENUITEM "&Contents",               cm_HelpContents, kbNoKey,   10096
  250.     MENUITEM "&Index\tShift-F1",        cm_HelpIndex,    kbShiftF1, 10097
  251.     MENUITEM "&Previous Topic\tAlt-F1", cm_HelpPrevious, kbAltF1,   10099
  252.     MENUITEM "&Help on Help",           cm_HelponHelp,   kbNoKey,   10100
  253.   END
  254. END
  255.  
  256. STRINGTABLE LOADONCALL MOVEABLE DISCARDABLE
  257. BEGIN
  258.     528, "Open an empty editor window"
  259.     529, "Open an existing file or create a new file"
  260.     530, "Save the file in the active editor window"
  261.     531, "Save the file in the active window under a new name"
  262.     532, "Save all modified files"
  263.     533, "Print the contents of the active editor window"
  264.     534, "Select and set up a printer"
  265.     535, "Exit Borland Pascal"
  266. END
  267.  
  268.  
  269. STRINGTABLE LOADONCALL MOVEABLE DISCARDABLE
  270. BEGIN
  271.     544, "Undo the previous editor operation"
  272.     545, "Redo the previously undone editor operation"
  273.     546, "Remove the selected text and put it in the Clipboard"
  274.     547, "Copy the selected text to the Clipboard"
  275.     548, "Insert text from the Clipboard at the cursor position"
  276.     549, "Delete the selected text"
  277. END
  278.  
  279.  
  280. STRINGTABLE LOADONCALL MOVEABLE DISCARDABLE
  281. BEGIN
  282.     560, "Search for text"
  283.     561, "Search and Replace text"
  284.     562, "Repeat last Search or Replace"
  285.     563, "Go to a specific line"
  286.     564, "Redisplay the last compile error"
  287.     565, "Search for run-time error location"
  288.     566, "Opens the Class Browser window"
  289.     567, "Opens the Units Browser window"
  290.     568, "Opens the Globals Browser window"
  291.     569, "Browses symbol at cursor "
  292.     570, "Rewinds the Browser window"
  293.     571, "Opens the Class Browser window"
  294.     572, "Inspect item selected in Browser window"
  295.     573, "Goto item selected in Browser window"
  296.     574, "Print Class View"
  297.     575, "Display references to item selected in Browser window"
  298. END
  299.  
  300.  
  301. STRINGTABLE LOADONCALL MOVEABLE DISCARDABLE
  302. BEGIN
  303.     576, "Switch between Navigation modes"
  304.     580, "Tile windows on the desktop"
  305.     581, "Cascade windows on the desktop"
  306.     582, "Close all open windows"
  307.     583, "Arrange all iconized windows"
  308.     584, "Repaint the entire desktop"
  309.     585, "Activate the selected window"
  310.     586, "Choose an open window to activate"
  311. END
  312.  
  313.  
  314. STRINGTABLE LOADONCALL MOVEABLE DISCARDABLE
  315. BEGIN
  316.     592, "Make and run the current program"
  317.     593, "Set command line parameters to use when running a program"
  318. END
  319.  
  320.  
  321. STRINGTABLE LOADONCALL MOVEABLE DISCARDABLE 
  322. BEGIN
  323.     608, "Compile the file in the active editor window"
  324.     609, "Bring program image up-to-date by compiling and linking, as necessary"
  325.     610, "Completely rebuild program image"
  326.     611, "Deselect the primary file"
  327.     612, "Choose a primary file"
  328.     613, "Display compiler information"
  329.     614, "Select compilation target platform"
  330. END
  331.  
  332.  
  333. STRINGTABLE LOADONCALL MOVEABLE DISCARDABLE 
  334. BEGIN
  335.     624, "Set compiler options"
  336.     625, "Specify stack and heap sizes"
  337.     626, "Set linker options"
  338.     627, "Set directory paths used to access program files"
  339.     628, "Specify environment settings"
  340.     629, "Save the configuration"
  341.     630, "Save the configuration under a new name"
  342.     631, "Load a new configuration"
  343.     632, "Specify syntax highlighting settings"
  344.     633, "Specify editor settings"
  345.     634, "Specify mouse settings"
  346.     636, "Specify global default settings for the browser"
  347.     637, "Specify IDE startup options"
  348.     638, "Set environment, editor, mouse, startup, and desktop preferences"
  349. END
  350.  
  351.  
  352. STRINGTABLE LOADONCALL MOVEABLE DISCARDABLE
  353. BEGIN
  354.     640, "Display contents of online help"
  355.     641, "Search help index for keyword"
  356.     642, "Display online help glossary"
  357.     643, "Display online help about the Help System"
  358.     644, "Display online help about the compiler directives"
  359.     646, "Display online help about procedures and functions"
  360.     647, "Display Turbo Pascal's reserved words"
  361.     648, "Display online help about standard Turbo Pascal units"
  362.     649, "Display online help about the Turbo Pascal language"
  363.     651, "Display version and copyright information"
  364.     652, "Display online help about the error messages"
  365. END
  366.  
  367.  
  368.  
  369.