home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / MISC / WPJV1N.ZIP / ROD.ZIP / WNDPROC.C < prev   
Encoding:
C/C++ Source or Header  |  1993-02-22  |  1.8 KB  |  92 lines
  1. //*********************************************************
  2. //* 
  3. //* wndproc.c: the main windows processing function
  4. //*
  5. //*********************************************************
  6.  
  7. #define    NOCOMM
  8. #define    _WINDOWS
  9.  
  10. #include    <windows.h>
  11. #include <stdio.h>
  12. #include    "rodsapp.h"
  13. #include "dlls.h"
  14.  
  15. LONG FAR PASCAL MainWndProc(HWND hWnd, unsigned message, WORD wParam,
  16.                                     LONG lParam)
  17. {
  18.     /* local variables */
  19.     char    tmpBuffer[40];
  20.  
  21.     static HANDLE    hInstance;
  22.     static FARPROC    lpProcAbout;
  23.  
  24.     switch(message) {
  25.  
  26.         case WM_CREATE:
  27.  
  28.             hInstance= GetWindowWord(hWnd, GWW_HINSTANCE);
  29.             return(0);
  30.  
  31.         case WM_COMMAND:
  32.         
  33.             switch(wParam) {
  34.  
  35.                 case IDM_STEPONE:
  36.  
  37.                     /* initialize global variables */
  38.                     variableA= 10;
  39.                     variableB= 20;
  40.                     variableC= 100;
  41.  
  42.                     sprintf(tmpBuffer, "BEFORE DLL: varA= %d varB= %d varC= %d",
  43.                         variableA, variableB, variableC);
  44.                     MessageBox(hWnd, tmpBuffer, "Testing!", MB_OK);
  45.  
  46.                     /* go to the DLL */
  47.                     StepOne(hWnd);
  48.  
  49.                     sprintf(tmpBuffer, "AFTER DLL: varA= %d varB= %d varC= %d",
  50.                         variableA, variableB, variableC);
  51.                     MessageBox(hWnd, tmpBuffer, "Testing!", MB_OK);
  52.  
  53.                     break;
  54.  
  55.                 case IDM_ABOUT:
  56.  
  57.                     lpProcAbout= MakeProcInstance(About, hInstance);
  58.  
  59.                     if((DialogBox(hInstance,
  60.                         MAKEINTRESOURCE(IDD_ABOUTBOX), hWnd, lpProcAbout)) == -1) {
  61.  
  62.                         MessageBeep(0);
  63.                         MessageBox(hWnd, "Could not create dialog box!", "WARNING", MB_OK);
  64.  
  65.                     }
  66.  
  67.                     /* free dialog instance */
  68.                     FreeProcInstance(lpProcAbout);
  69.  
  70.                     break;
  71.  
  72.                 default:
  73.                     return(DefWindowProc(hWnd, message, wParam, lParam));
  74.  
  75.             }
  76.  
  77.             return(0);
  78.  
  79.         case WM_DESTROY:
  80.  
  81.             PostQuitMessage(0);
  82.             return(0);
  83.  
  84.         default:
  85.             return(DefWindowProc(hWnd, message, wParam, lParam));
  86.  
  87.     }
  88.  
  89.     return(0L);
  90.  
  91. } /* MainWndProc */
  92.