home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / WINPROPM.ZIP / EXAMMENU.C < prev    next >
Text File  |  1989-06-19  |  7KB  |  298 lines
  1. /* file : Exammenu.c
  2.  
  3.  
  4.         Created: 21:55:50 Mon Jun 19 1989
  5.  
  6.  
  7.         Description:  Menu processing functions for ExamplPM
  8.  
  9.  
  10.         Skeleton by:  WINPRO/PM, a product from Louis J. Cutrona, Jr.
  11.                       Skeleton.pm (Revision 2.5)  
  12.  
  13. */
  14.  
  15.  
  16. /* Activate standard window management definitions and typedefs */
  17. #define  INCL_WIN       1
  18.  
  19. #include <os2.h>
  20.  
  21. #include "Examrc.h"
  22. #include "Examgbl.h"
  23.  
  24. /* ----------------- ExamplPM MENU DIALOGS & FUNCTIONS ------------------- */
  25.  
  26. /* Action bar item: ~File */
  27. /* WM_COMMAND message: Pulldown item: ~New */
  28.  
  29. ULONG midFILENEWFunction( PUSHORT pmsg )
  30. {
  31.    MRESULT   RetCode ;
  32.  
  33.    WinMessageBox( HWND_DESKTOP,
  34.       gbl_hwndApp,
  35.       (PSZ) "midFILENEWFunction",     /* Message text */
  36.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  37.       (USHORT) 0,                    /* ID for Help */
  38.       MB_OK | MB_ICONASTERISK
  39.       ) ;
  40.    return LONGFROMMR( RetCode ) ;
  41. }
  42.  
  43.  
  44. /* Action bar item: ~File */
  45. /* WM_COMMAND message: Pulldown item: ~Open... */
  46.  
  47. ULONG midFILEOPENFunction( PUSHORT pmsg )
  48. {
  49.    MRESULT   RetCode ;
  50.  
  51.    RetCode = WinDlgBox( HWND_DESKTOP,
  52.       gbl_hwndApp,
  53.       (PFNWP)midFILEOPENDlgWndProc,
  54.       (HMODULE) 0,
  55.       midFILEOPEN,
  56.       (PVOID) 0
  57.       ) ;
  58.    return LONGFROMMR( RetCode ) ;
  59. }
  60.  
  61.  
  62. /* Action bar item: ~File */
  63. /* WM_COMMAND message: Pulldown item: ~Save */
  64.  
  65. ULONG midFILESAVEFunction( PUSHORT pmsg )
  66. {
  67.    MRESULT   RetCode ;
  68.  
  69.    WinMessageBox( HWND_DESKTOP,
  70.       gbl_hwndApp,
  71.       (PSZ) "midFILESAVEFunction",     /* Message text */
  72.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  73.       (USHORT) 0,                    /* ID for Help */
  74.       MB_OK | MB_ICONASTERISK
  75.       ) ;
  76.    return LONGFROMMR( RetCode ) ;
  77. }
  78.  
  79.  
  80. /* Action bar item: ~File */
  81. /* WM_COMMAND message: Pulldown item: A~bout ExamplPM... */
  82.  
  83. ULONG ABOUTFunction( PUSHORT pmsg )
  84. {
  85.    MRESULT   RetCode ;
  86.  
  87.    RetCode = WinDlgBox( HWND_DESKTOP,
  88.       gbl_hwndApp,
  89.       (PFNWP)ABOUTDlgWndProc,
  90.       (HMODULE) 0,
  91.       ABOUT,
  92.       (PVOID) 0
  93.       ) ;
  94.    return LONGFROMMR( RetCode ) ;
  95. }
  96.  
  97.  
  98. /* Action bar item: ~Edit */
  99. /* WM_COMMAND message: Pulldown item: ~Restore Image\tSh Esc */
  100.  
  101. /* WM_COMMAND message: Accelerator key */
  102.  
  103. ULONG midEDITRESTOREFunction( PUSHORT pmsg )
  104. {
  105.    MRESULT   RetCode ;
  106.  
  107.    WinMessageBox( HWND_DESKTOP,
  108.       gbl_hwndApp,
  109.       (PSZ) "midEDITRESTOREFunction",     /* Message text */
  110.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  111.       (USHORT) 0,                    /* ID for Help */
  112.       MB_OK | MB_ICONASTERISK
  113.       ) ;
  114.    return LONGFROMMR( RetCode ) ;
  115. }
  116.  
  117.  
  118. /* Action bar item: ~Edit */
  119. /* WM_COMMAND message: Pulldown item: Cu~t Image\tDel */
  120.  
  121. /* WM_COMMAND message: Accelerator key */
  122.  
  123. ULONG midEDITCUTFunction( PUSHORT pmsg )
  124. {
  125.    MRESULT   RetCode ;
  126.  
  127.    WinMessageBox( HWND_DESKTOP,
  128.       gbl_hwndApp,
  129.       (PSZ) "midEDITCUTFunction",     /* Message text */
  130.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  131.       (USHORT) 0,                    /* ID for Help */
  132.       MB_OK | MB_ICONASTERISK
  133.       ) ;
  134.    return LONGFROMMR( RetCode ) ;
  135. }
  136.  
  137.  
  138. /* Action bar item: ~Edit */
  139. /* WM_COMMAND message: Pulldown item: ~Copy Image\tF2 */
  140.  
  141. /* WM_COMMAND message: Accelerator key */
  142.  
  143. ULONG midEDITCOPYFunction( PUSHORT pmsg )
  144. {
  145.    MRESULT   RetCode ;
  146.  
  147.    WinMessageBox( HWND_DESKTOP,
  148.       gbl_hwndApp,
  149.       (PSZ) "midEDITCOPYFunction",     /* Message text */
  150.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  151.       (USHORT) 0,                    /* ID for Help */
  152.       MB_OK | MB_ICONASTERISK
  153.       ) ;
  154.    return LONGFROMMR( RetCode ) ;
  155. }
  156.  
  157.  
  158. /* Action bar item: ~Edit */
  159. /* WM_COMMAND message: Pulldown item: ~Paste Image\tIns */
  160.  
  161. /* WM_COMMAND message: Accelerator key */
  162.  
  163. ULONG midEDITPASTEFunction( PUSHORT pmsg )
  164. {
  165.    MRESULT   RetCode ;
  166.  
  167.    WinMessageBox( HWND_DESKTOP,
  168.       gbl_hwndApp,
  169.       (PSZ) "midEDITPASTEFunction",     /* Message text */
  170.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  171.       (USHORT) 0,                    /* ID for Help */
  172.       MB_OK | MB_ICONASTERISK
  173.       ) ;
  174.    return LONGFROMMR( RetCode ) ;
  175. }
  176.  
  177.  
  178. /* Action bar item: ~Edit */
  179. /* WM_COMMAND message: Pulldown item: C~lear */
  180.  
  181. ULONG midEDITCLEARFunction( PUSHORT pmsg )
  182. {
  183.    MRESULT   RetCode ;
  184.  
  185.    WinMessageBox( HWND_DESKTOP,
  186.       gbl_hwndApp,
  187.       (PSZ) "midEDITCLEARFunction",     /* Message text */
  188.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  189.       (USHORT) 0,                    /* ID for Help */
  190.       MB_OK | MB_ICONASTERISK
  191.       ) ;
  192.    return LONGFROMMR( RetCode ) ;
  193. }
  194.  
  195.  
  196. /* Action bar item: ~Create */
  197. /* WM_COMMAND message: Pulldown item: ~Scan... */
  198.  
  199. ULONG midCREATESCANFunction( PUSHORT pmsg )
  200. {
  201.    MRESULT   RetCode ;
  202.  
  203.    WinMessageBox( HWND_DESKTOP,
  204.       gbl_hwndApp,
  205.       (PSZ) "midCREATESCANFunction",     /* Message text */
  206.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  207.       (USHORT) 0,                    /* ID for Help */
  208.       MB_OK | MB_ICONASTERISK
  209.       ) ;
  210.    return LONGFROMMR( RetCode ) ;
  211. }
  212.  
  213.  
  214. /* Action bar item: ~Create */
  215. /* WM_COMMAND message: Pulldown item: ~Process... */
  216.  
  217. ULONG midCREATEPROCESSFunction( PUSHORT pmsg )
  218. {
  219.    MRESULT   RetCode ;
  220.  
  221.    RetCode = WinDlgBox( HWND_DESKTOP,
  222.       gbl_hwndApp,
  223.       (PFNWP)midCREATEPROCESSDlgWndProc,
  224.       (HMODULE) 0,
  225.       midCREATEPROCESS,
  226.       (PVOID) 0
  227.       ) ;
  228.    return LONGFROMMR( RetCode ) ;
  229. }
  230.  
  231.  
  232. /* Action bar item: E~xit */
  233. /* WM_COMMAND message: Pulldown item: E~xit WINPRO/PM example...  F3 */
  234.  
  235. /* WM_COMMAND message: Accelerator key */
  236.  
  237. /* This function requests ExamplPM to terminate itself */
  238.  
  239. ULONG MID_EXITFunction( PUSHORT pmsg )
  240. {
  241.    MRESULT   RetCode ;
  242.  
  243.    WinMessageBox( HWND_DESKTOP,
  244.       gbl_hwndApp,
  245.       (PSZ) "MID_EXITFunction",     /* Message text */
  246.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  247.       (USHORT) 0,                    /* ID for Help */
  248.       MB_OK | MB_ICONASTERISK
  249.       ) ;
  250.  
  251.    /* Request termination */
  252.    /* If RetCode is TRUE, request was accepted */
  253.    /* If RetCode is FALSE, termination request was denied */
  254.    RetCode = (MRESULT) fExamplPMClose() ;
  255.    return LONGFROMMR( RetCode ) ;
  256. }
  257.  
  258.  
  259. /* WM_HELP message: Action bar item: F1=Help */
  260.  
  261. /* WM_HELP message: Accelerator key */
  262.  
  263. ULONG midHELPFunction( PUSHORT pmsg )
  264. {
  265.    MRESULT   RetCode ;
  266.  
  267.    WinMessageBox( HWND_DESKTOP,
  268.       gbl_hwndApp,
  269.       (PSZ) "midHELPFunction",     /* Message text */
  270.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  271.       (USHORT) 0,                    /* ID for Help */
  272.       MB_OK | MB_ICONASTERISK
  273.       ) ;
  274.    return LONGFROMMR( RetCode ) ;
  275. }
  276.  
  277.  
  278. /* WM_COMMAND message: Accelerator key */
  279.  
  280. ULONG accelF10Function( PUSHORT pmsg )
  281. {
  282.    MRESULT   RetCode ;
  283.  
  284.    WinMessageBox( HWND_DESKTOP,
  285.       gbl_hwndApp,
  286.       (PSZ) "accelF10Function",     /* Message text */
  287.       (PSZ) gbl_psz( IDS_NAME ),     /* Caption */
  288.       (USHORT) 0,                    /* ID for Help */
  289.       MB_OK | MB_ICONASTERISK
  290.       ) ;
  291.    return LONGFROMMR( RetCode ) ;
  292. }
  293.  
  294.  
  295.  
  296.  
  297. /*   E N D   O F   E X A M M E N U . C   */
  298.