home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / wps / utils / memsz221 / settimer.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1993-12-09  |  8.0 KB  |  215 lines
  1. /*************************************************************** SETTIMER.CPP
  2.  *                                                                          *
  3.  *                      Dialog: Set Timer Interval                          *
  4.  *                                                                          *
  5.  ****************************************************************************/
  6.  
  7. #define INCL_BASE
  8. #define INCL_PM
  9. #define INCL_WINSTDSPIN
  10. #include <os2.h>
  11.  
  12. #include "support.h"
  13. #include "settimer.h"
  14.  
  15.  
  16. /****************************************************************************
  17.  *                                                                          *
  18.  *                     Definitions & Declarations                           *
  19.  *                                                                          *
  20.  ****************************************************************************/
  21.  
  22.   // Function Prototypes
  23.  
  24. static METHODFUNCTION InitDlg ;
  25. static METHODFUNCTION Command ;
  26. static METHODFUNCTION OK ;
  27. static METHODFUNCTION Cancel ;
  28.  
  29.  
  30.   // Global Data
  31.  
  32. static SHORT id ;
  33. static PUSHORT TimerInterval ;
  34.  
  35.  
  36. /****************************************************************************
  37.  *                                                                          *
  38.  *      "SetTimer" Dialog Processor                                         *
  39.  *                                                                          *
  40.  ****************************************************************************/
  41.  
  42. extern MRESULT EXPENTRY SetTimerProcessor
  43. (
  44.   HWND hwnd,
  45.   USHORT msg,
  46.   MPARAM mp1,
  47.   MPARAM mp2
  48. )
  49. {
  50.  /***************************************************************************
  51.   *                             Declarations                                *
  52.   ***************************************************************************/
  53.  
  54.   static METHOD Methods [] =
  55.   {
  56.     { WM_INITDLG, InitDlg },
  57.     { WM_COMMAND, Command }
  58.   } ;
  59.  
  60.  /***************************************************************************
  61.   * Dispatch the message according to the method table and return the       *
  62.   *   result.  Any messages not defined above get handled by the system     *
  63.   *   default dialog processor.                                             *
  64.   ***************************************************************************/
  65.  
  66.   return ( DispatchMessage ( hwnd, msg, mp1, mp2, Methods, sizeof(Methods)/sizeof(Methods[0]), WinDefDlgProc ) ) ;
  67. }
  68.  
  69. /****************************************************************************
  70.  *                                                                          *
  71.  *      Initialize Dialog                                                   *
  72.  *                                                                          *
  73.  ****************************************************************************/
  74.  
  75. static MRESULT APIENTRY InitDlg
  76. ( 
  77.   HWND hwnd, 
  78.   USHORT msg,
  79.   MPARAM mp1, 
  80.   MPARAM mp2
  81. )
  82. {
  83.  /***************************************************************************
  84.   * Local Declarations                                                      *
  85.   ***************************************************************************/
  86.  
  87.   SETTIMER_PARMS *Parms = (SETTIMER_PARMS*) ( PVOIDFROMMP ( mp2 ) ) ;
  88.  
  89.  /***************************************************************************
  90.   * Save parameter data.                                                    *
  91.   ***************************************************************************/
  92.  
  93.   id = Parms->id ;
  94.   TimerInterval = Parms->TimerInterval ;
  95.  
  96.  /***************************************************************************
  97.   * Set the dialog help instance.                                           *
  98.   ***************************************************************************/
  99.  
  100.   WinSetWindowUShort ( hwnd, QWS_ID, id ) ;
  101.  
  102.   if ( Parms->hwndHelp )
  103.   {
  104.     WinAssociateHelpInstance ( Parms->hwndHelp, hwnd ) ;
  105.   }
  106.  
  107.  /***************************************************************************
  108.   * Set the limits and initial value of the spin-button control.            *
  109.   ***************************************************************************/
  110.  
  111.   WinSendDlgItemMsg ( hwnd, id,
  112.     SPBM_SETLIMITS, (MPARAM)300L, (MPARAM)10L ) ;
  113.  
  114.   WinSendDlgItemMsg ( hwnd, id,
  115.     SPBM_SETCURRENTVALUE, (MPARAM)(*TimerInterval/100), NULL ) ;
  116.  
  117.  /***************************************************************************
  118.   * Return OK.                                                              *
  119.   ***************************************************************************/
  120.  
  121.   return ( MRFROMSHORT ( FALSE ) ) ;
  122.  
  123.   hwnd = hwnd ;  msg = msg ;  mp1 = mp1 ;  mp2 = mp2 ;
  124. }
  125.  
  126. /****************************************************************************
  127.  *                                                                          *
  128.  *      Process command messages.                                           *
  129.  *                                                                          *
  130.  ****************************************************************************/
  131.  
  132. static MRESULT APIENTRY Command
  133. ( 
  134.   HWND hwnd, 
  135.   USHORT msg, 
  136.   MPARAM mp1, 
  137.   MPARAM mp2
  138. )
  139. {
  140.  /***************************************************************************
  141.   * Local Declarations                                                      *
  142.   ***************************************************************************/
  143.  
  144.   static METHOD Methods [] =
  145.   {
  146.     { DID_OK,     OK     },
  147.     { DID_CANCEL, Cancel },
  148.   } ;
  149.  
  150.  /***************************************************************************
  151.   * Dispatch the message without a default message processor.               *
  152.   ***************************************************************************/
  153.  
  154.   return ( DispatchMessage ( hwnd, SHORT1FROMMP(mp1), mp1, mp2, Methods, sizeof(Methods)/sizeof(Methods[0]), PFNWP(NULL) ) ) ;
  155.  
  156.   hwnd = hwnd ;  msg = msg ;  mp1 = mp1 ;  mp2 = mp2 ;
  157. }
  158.  
  159. /****************************************************************************
  160.  *                                                                          *
  161.  *      Process acceptance of new timer value.                              *
  162.  *                                                                          *
  163.  ****************************************************************************/
  164.  
  165. static MRESULT APIENTRY OK
  166. ( 
  167.   HWND hwnd, 
  168.   USHORT msg, 
  169.   MPARAM mp1, 
  170.   MPARAM mp2
  171. )
  172. {
  173.  /***************************************************************************
  174.   * Save the results.                                                       *
  175.   ***************************************************************************/
  176.  
  177.   WinSendDlgItemMsg ( hwnd, id, SPBM_QUERYVALUE, TimerInterval, MPFROM2SHORT(0,SPBQ_UPDATEIFVALID) ) ;
  178.   *TimerInterval *= 100 ;
  179.  
  180.  /***************************************************************************
  181.   * Dismiss the dialog with a TRUE status.                                  *
  182.   ***************************************************************************/
  183.  
  184.   WinDismissDlg ( hwnd, TRUE ) ;
  185.  
  186.   return ( 0 ) ;
  187.  
  188.   hwnd = hwnd ;  msg = msg ;  mp1 = mp1 ;  mp2 = mp2 ;
  189. }
  190.  
  191. /****************************************************************************
  192.  *                                                                          *
  193.  *      Process cancellation.                                               *
  194.  *                                                                          *
  195.  ****************************************************************************/
  196.  
  197. static MRESULT APIENTRY Cancel
  198. ( 
  199.   HWND hwnd, 
  200.   USHORT msg, 
  201.   MPARAM mp1, 
  202.   MPARAM mp2
  203. )
  204. {
  205.  /***************************************************************************
  206.   * Dismiss the dialog with a TRUE status.                                  *
  207.   ***************************************************************************/
  208.  
  209.   WinDismissDlg ( hwnd, FALSE ) ;
  210.  
  211.   return ( 0 ) ;
  212.  
  213.   hwnd = hwnd ;  msg = msg ;  mp1 = mp1 ;  mp2 = mp2 ;
  214. }
  215.