home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 15 / CD_ASCQ_15_070894.iso / vrac / memsz231.zip / CONFIG.CPP < prev    next >
Text File  |  1994-02-14  |  11KB  |  287 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.   ULONG 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.   ULONG 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.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_FSNAME,
  132.     BM_SETCHECK, MPFROMSHORT(Parms->ShowFileSystemNames), 0 ) ;
  133.  
  134.  /***************************************************************************
  135.   * Set the limits and initial value of the spin-button controls.           *
  136.   ***************************************************************************/
  137.  
  138.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_PRIORITY,
  139.     SPBM_SETLIMITS, (MPARAM)PRTYD_MAXIMUM, (MPARAM)0 ) ;
  140.  
  141.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_PRIORITY,
  142.     SPBM_SETCURRENTVALUE, (MPARAM)(Parms->MonitorPriority), NULL ) ;
  143.  
  144.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_TIMER,
  145.     SPBM_SETLIMITS, (MPARAM)300L, (MPARAM)10L ) ;
  146.  
  147.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_TIMER,
  148.     SPBM_SETCURRENTVALUE, (MPARAM)(Parms->TimerInterval/100), NULL ) ;
  149.  
  150.  /***************************************************************************
  151.   * Return without error.                                                   *
  152.   ***************************************************************************/
  153.  
  154.   return ( MRFROMSHORT ( FALSE ) ) ;
  155. }
  156.  
  157. /****************************************************************************
  158.  *                                                                          *
  159.  *      Process commands received by the Configure Dialog                       *
  160.  *                                                                          *
  161.  ****************************************************************************/
  162.  
  163. static MRESULT APIENTRY Command
  164. ( 
  165.   HWND hwnd, 
  166.   ULONG msg, 
  167.   MPARAM mp1, 
  168.   MPARAM mp2
  169. )
  170. {
  171.  /***************************************************************************
  172.   * Local Declarations                                                      *
  173.   ***************************************************************************/
  174.  
  175.   static METHOD Methods [] =
  176.   {
  177.     { DID_OK,     OK     },
  178.     { DID_CANCEL, Cancel },
  179.   } ;
  180.  
  181.  /***************************************************************************
  182.   * Dispatch the message without a default message processor.               *
  183.   ***************************************************************************/
  184.  
  185.   return ( DispatchMessage ( hwnd, SHORT1FROMMP(mp1), mp1, mp2, Methods, sizeof(Methods)/sizeof(Methods[0]), PFNWP(NULL) ) ) ;
  186. }
  187.  
  188. /****************************************************************************
  189.  *                                                                          *
  190.  *      Process the Configure Dialog's OK button being pressed.             *
  191.  *                                                                          *
  192.  ****************************************************************************/
  193.  
  194. static MRESULT APIENTRY OK
  195. ( 
  196.   HWND hwnd, 
  197.   ULONG msg, 
  198.   MPARAM mp1, 
  199.   MPARAM mp2
  200. )
  201. {
  202.  /***************************************************************************
  203.   * Find the instance data.                                                 *
  204.   ***************************************************************************/
  205.  
  206.   PCONFIG_PARMS Parms = PCONFIG_PARMS ( WinQueryWindowPtr ( hwnd, QWL_USER ) ) ;
  207.  
  208.  /***************************************************************************
  209.   * Query the list box items for their selection.                           *
  210.   ***************************************************************************/
  211.  
  212.   for ( int i=0; i<Parms->ItemCount; i++ ) {
  213.     Parms->ItemFlags[i] = FALSE ;
  214.   }
  215.  
  216.   SHORT Selection = LIT_FIRST ;
  217.   do {
  218.     Selection = BOOL ( SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  219.       IDD_CONFIG_ITEMS, LM_QUERYSELECTION,
  220.       MPFROMSHORT(SHORT(Selection)), 0 ) ) ) ;
  221.  
  222.     if ( Selection != LIT_NONE ) {
  223.       Parms->ItemFlags[Selection] = TRUE ;
  224.     }
  225.   }
  226.   while ( Selection != LIT_NONE ) ;
  227.  
  228.  /***************************************************************************
  229.   * Query the buttons for their new settings.                               *
  230.   ***************************************************************************/
  231.  
  232.   Parms->HideControls = (BOOL) SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  233.     IDD_CONFIG_HIDECONTROLS, BM_QUERYCHECK, 0L, 0L ) ) ;
  234.  
  235.   Parms->Float = (BOOL) SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  236.     IDD_CONFIG_FLOAT, BM_QUERYCHECK, 0L, 0L ) ) ;
  237.  
  238.   Parms->Animate = (BOOL) SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  239.     IDD_CONFIG_ANIMATE, BM_QUERYCHECK, 0L, 0L ) ) ;
  240.  
  241.   Parms->ShowFileSystemNames = (BOOL) SHORT1FROMMR ( WinSendDlgItemMsg ( hwnd,
  242.     IDD_CONFIG_FSNAME, BM_QUERYCHECK, 0L, 0L ) ) ;
  243.  
  244.  /***************************************************************************
  245.   * Query the spinbuttons for their new settings.                           *
  246.   ***************************************************************************/
  247.  
  248.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_PRIORITY, SPBM_QUERYVALUE,
  249.     &Parms->MonitorPriority, MPFROM2SHORT(0,SPBQ_UPDATEIFVALID) ) ;
  250.  
  251.   WinSendDlgItemMsg ( hwnd, IDD_CONFIG_TIMER, SPBM_QUERYVALUE,
  252.     &Parms->TimerInterval, MPFROM2SHORT(0,SPBQ_UPDATEIFVALID) ) ;
  253.  
  254.   Parms->TimerInterval *= 100 ;
  255.  
  256.  /***************************************************************************
  257.   * Dismiss the dialog with a TRUE status.                                  *
  258.   ***************************************************************************/
  259.  
  260.   WinDismissDlg ( hwnd, TRUE ) ;
  261.  
  262.   return ( 0 ) ;
  263. }
  264.  
  265. /****************************************************************************
  266.  *                                                                          *
  267.  *      Process the Configure Dialog's being cancelled.                     *
  268.  *                                                                          *
  269.  ****************************************************************************/
  270.  
  271. static MRESULT APIENTRY Cancel
  272. ( 
  273.   HWND hwnd, 
  274.   ULONG msg, 
  275.   MPARAM mp1, 
  276.   MPARAM mp2
  277. )
  278. {
  279.  /***************************************************************************
  280.   * Dismiss the dialog with a TRUE status.                                  *
  281.   ***************************************************************************/
  282.  
  283.   WinDismissDlg ( hwnd, FALSE ) ;
  284.  
  285.   return ( 0 ) ;
  286. }
  287.