home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / wps / utils / memsz221 / config.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1993-12-14  |  10.3 KB  |  275 lines
  1. /***************************************************************** CONFIG.CPP
  2.  *                                                                          *
  3.  *                        Clock Configuration Dialog                        *
  4.  *                                                                          *
  5.  ****************************************************************************/
  6.  
  7. #define INCL_BASE
  8. #define INCL_PM
  9. #define INCL_WINSTDSPIN
  10. #include <os2.h>
  11.  
  12. #include <stdlib.h>
  13. #include <string.h>
  14.  
  15. #include "debug.h"
  16. #include "support.h"
  17.  
  18. #include "memsize.h"
  19. #include "config.h"
  20.  
  21.  
  22. /****************************************************************************
  23.  *                                                                          *
  24.  *                     Definitions & Declarations                           *
  25.  *                                                                          *
  26.  ****************************************************************************/
  27.  
  28.   // Function Prototypes
  29.  
  30. static METHODFUNCTION InitDlg ;
  31. static METHODFUNCTION Command ;
  32. static METHODFUNCTION OK ;
  33. static METHODFUNCTION Cancel ;
  34.  
  35.  
  36. /****************************************************************************
  37.  *                                                                          *
  38.  *      "Configure" Dialog Processor                                            *
  39.  *                                                                          *
  40.  ****************************************************************************/
  41.  
  42. extern MRESULT EXPENTRY ConfigureProcessor
  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.   * Get initial parameters.                                                 *
  85.   ***************************************************************************/
  86.  
  87.   PCONFIG_PARMS Parms = (PCONFIG_PARMS) ( PVOIDFROMMP ( mp2 ) ) ;
  88.  
  89.   WinSetWindowPtr ( hwnd, QWL_USER, Parms ) ;
  90.  
  91.  /***************************************************************************
  92.   * Associate the help instance.                                            *
  93.   ***************************************************************************/
  94.  
  95.   WinSetWindowUShort ( hwnd, QWS_ID, Parms->id ) ;
  96.  
  97.   if ( Parms->hwndHelp )
  98.   {
  99.     WinAssociateHelpInstance ( Parms->hwndHelp, hwnd ) ;
  100.   }
  101.  
  102.  /***************************************************************************
  103.   * Load the list box.                                                      *
  104.   ***************************************************************************/
  105.  
  106.   for ( int i=0; i<Parms->ItemCount; i++ )
  107.   {
  108.     WinSendDlgItemMsg ( hwnd, IDD_CONFIG_ITEMS, LM_INSERTITEM,
  109.       MPFROMSHORT(LIT_END), MPFROMP(Parms->ItemNames[i]) ) ;
  110.  
  111.     if ( Parms->ItemFlags[i] )
  112.     {
  113.       WinSendDlgItemMsg ( hwnd, IDD_CONFIG_ITEMS, LM_SELECTITEM,
  114.         MPFROMSHORT(SHORT(i)), MPFROMSHORT(TRUE) ) ;
  115.     }
  116.   }
  117.  
  118.  /***************************************************************************
  119.   * Set the radio button and checkbox values.                               *
  120.   ***************************************************************************/
  121.  
  122.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_HIDECONTROLS,
  123.     BM_SETCHECK, MPFROMSHORT(Parms->HideControls), 0 ) ;
  124.  
  125.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_FLOAT,
  126.     BM_SETCHECK, MPFROMSHORT(Parms->Float), 0 ) ;
  127.  
  128.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_ANIMATE,
  129.     BM_SETCHECK, MPFROMSHORT(Parms->Animate), 0 ) ;
  130.  
  131.  /***************************************************************************
  132.   * Set the limits and initial value of the spin-button control.            *
  133.   ***************************************************************************/
  134.  
  135.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_TIMER,
  136.     SPBM_SETLIMITS, (MPARAM)300L, (MPARAM)10L ) ;
  137.  
  138.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_TIMER,
  139.     SPBM_SETCURRENTVALUE, (MPARAM)(Parms->TimerInterval/100), NULL ) ;
  140.  
  141.  /***************************************************************************
  142.   * Return without error.                                                   *
  143.   ***************************************************************************/
  144.  
  145.   return ( MRFROMSHORT ( FALSE ) ) ;
  146. }
  147.  
  148. /****************************************************************************
  149.  *                                                                          *
  150.  *      Process commands received by the Configure Dialog                       *
  151.  *                                                                          *
  152.  ****************************************************************************/
  153.  
  154. static MRESULT APIENTRY Command
  155. ( 
  156.   HWND hwnd, 
  157.   USHORT msg, 
  158.   MPARAM mp1, 
  159.   MPARAM mp2
  160. )
  161. {
  162.  /***************************************************************************
  163.   * Local Declarations                                                      *
  164.   ***************************************************************************/
  165.  
  166.   static METHOD Methods [] =
  167.   {
  168.     { DID_OK,     OK     },
  169.     { DID_CANCEL, Cancel },
  170.   } ;
  171.  
  172.  /***************************************************************************
  173.   * Dispatch the message without a default message processor.               *
  174.   ***************************************************************************/
  175.  
  176.   return ( DispatchMessage ( hwnd, SHORT1FROMMP(mp1), mp1, mp2, Methods, sizeof(Methods)/sizeof(Methods[0]), PFNWP(NULL) ) ) ;
  177. }
  178.  
  179. /****************************************************************************
  180.  *                                                                          *
  181.  *      Process the Configure Dialog's OK button being pressed.             *
  182.  *                                                                          *
  183.  ****************************************************************************/
  184.  
  185. static MRESULT APIENTRY OK
  186. ( 
  187.   HWND hwnd, 
  188.   USHORT msg, 
  189.   MPARAM mp1, 
  190.   MPARAM mp2
  191. )
  192. {
  193.  /***************************************************************************
  194.   * Find the instance data.                                                 *
  195.   ***************************************************************************/
  196.  
  197.   PCONFIG_PARMS Parms = PCONFIG_PARMS ( WinQueryWindowPtr ( hwnd, QWL_USER ) ) ;
  198.  
  199.  /***************************************************************************
  200.   * Query the list box items for their selection.                           *
  201.   ***************************************************************************/
  202.  
  203.   for ( int i=0; i<Parms->ItemCount; i++ )
  204.   {
  205.     Parms->ItemFlags[i] = FALSE ;
  206.   }
  207.  
  208.   SHORT Selection = LIT_FIRST ;
  209.   do
  210.   {
  211.     Selection = BOOL ( SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  212.       IDD_CONFIG_ITEMS, LM_QUERYSELECTION,
  213.       MPFROMSHORT(SHORT(Selection)), 0 ) ) ) ;
  214.  
  215.     if ( Selection != LIT_NONE )
  216.     {
  217.       Parms->ItemFlags[Selection] = TRUE ;
  218.     }
  219.   }
  220.   while ( Selection != LIT_NONE ) ;
  221.  
  222.  /***************************************************************************
  223.   * Query the buttons for their new settings.                               *
  224.   ***************************************************************************/
  225.  
  226.   Parms->HideControls = (BOOL) SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  227.     IDD_CONFIG_HIDECONTROLS, BM_QUERYCHECK, 0L, 0L ) ) ;
  228.  
  229.   Parms->Float = (BOOL) SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  230.     IDD_CONFIG_FLOAT, BM_QUERYCHECK, 0L, 0L ) ) ;
  231.  
  232.   Parms->Animate = (BOOL) SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  233.     IDD_CONFIG_ANIMATE, BM_QUERYCHECK, 0L, 0L ) ) ;
  234.  
  235.  /***************************************************************************
  236.   * Query the spinbuttons for their new settings.                           *
  237.   ***************************************************************************/
  238.  
  239.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_TIMER, SPBM_QUERYVALUE,
  240.     &Parms->TimerInterval, MPFROM2SHORT(0,SPBQ_UPDATEIFVALID) ) ;
  241.  
  242.   Parms->TimerInterval *= 100 ;
  243.  
  244.  /***************************************************************************
  245.   * Dismiss the dialog with a TRUE status.                                  *
  246.   ***************************************************************************/
  247.  
  248.   WinDismissDlg ( hwnd, TRUE ) ;
  249.  
  250.   return ( 0 ) ;
  251. }
  252.  
  253. /****************************************************************************
  254.  *                                                                          *
  255.  *      Process the Configure Dialog's being cancelled.                     *
  256.  *                                                                          *
  257.  ****************************************************************************/
  258.  
  259. static MRESULT APIENTRY Cancel
  260. ( 
  261.   HWND hwnd, 
  262.   USHORT msg, 
  263.   MPARAM mp1, 
  264.   MPARAM mp2
  265. )
  266. {
  267.  /***************************************************************************
  268.   * Dismiss the dialog with a TRUE status.                                  *
  269.   ***************************************************************************/
  270.  
  271.   WinDismissDlg ( hwnd, FALSE ) ;
  272.  
  273.   return ( 0 ) ;
  274. }
  275.