home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / windows / disolve.zip / FADER.C next >
C/C++ Source or Header  |  1990-06-19  |  11KB  |  333 lines
  1. /* Fader.c
  2.    source for Fader/Dissolve style controls
  3.  
  4.     Copyright 1990 by William R. Ross
  5. */
  6.  
  7. #include "windows.h"
  8. #define FADER_MAIN
  9. #include "fader.h"
  10. #include <sys\types.h> /* for ftime() */
  11. #include <sys\timeb.h> /* ditto */
  12.  
  13. #define FCN
  14.  
  15. static void FadeIn ();
  16. static void Dissolve ();
  17. static void FadeOut ();
  18. static void Wait ();
  19.  
  20. /******************************************
  21. * FaderInit ()
  22. * registers Fader window class
  23. *
  24. *******************************************/
  25. FCN BOOL FaderInit( hInstance )
  26. HANDLE hInstance;
  27. {
  28.     PWNDCLASS   pClass;
  29.  
  30.     pClass = (PWNDCLASS)LocalAlloc( LPTR, sizeof(WNDCLASS) );
  31.  
  32.     /* this is the class for the FADER control */
  33.     pClass->hCursor        = LoadCursor( NULL, IDC_ARROW );
  34.     pClass->hIcon          = NULL;
  35.     pClass->lpszMenuName   = (LPSTR)NULL;
  36.     pClass->hbrBackground  = (HBRUSH)GetStockObject( WHITE_BRUSH );
  37.     pClass->hInstance      = hInstance;
  38.     pClass->style          = CS_HREDRAW | CS_VREDRAW;
  39.     /* here's the interesting parts of the class... */
  40.     pClass->lpfnWndProc    = FaderWndProc;
  41.     pClass->lpszClassName  = (LPSTR)"FADER";
  42.  
  43.     if (!RegisterClass( (LPWNDCLASS)pClass ) )
  44.         /* Initialization failed.
  45.          * Windows will automatically deallocate all allocated memory.
  46.          */
  47.         return FALSE;
  48.  
  49.     LocalFree( (HANDLE)pClass );
  50.     return TRUE;        /* Initialization succeeded */
  51. } /* end of FaderInit */
  52.  
  53. /***************************************************
  54. * FadeIn ()
  55. * 
  56. *
  57. ***************************************************/
  58. FCN void FadeIn (hWnd, lpszText)
  59. HWND hWnd;
  60. LPSTR lpszText;
  61. {
  62.     HDC hDC, hMemDC;
  63.     HBITMAP hBM;
  64.     RECT rect;
  65.     int nWidth, nHeight;
  66.     int i;
  67.  
  68.     GetClientRect (hWnd, &rect);
  69.     nWidth = rect.right - rect.left;
  70.     nHeight = rect.bottom - rect.top;
  71.  
  72.     hDC = GetDC (hWnd);
  73.     hMemDC = CreateCompatibleDC (hDC);
  74.     hBM = CreateCompatibleBitmap (hDC, nWidth, nHeight);
  75.  
  76.     SelectObject (hMemDC, hBM);
  77.     PatBlt (hMemDC, 0, 0, nWidth, nHeight, WHITENESS);
  78.     DrawText (hMemDC, (LPSTR)lpszText, -1, &rect,
  79.                 DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  80.     SelectObject(hMemDC, GetStockObject(LTGRAY_BRUSH));
  81.     PatBlt (hMemDC, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  82.     BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDC, 0, 0, SRCCOPY);
  83.     Wait(47);
  84.  
  85.      DrawText (hMemDC, (LPSTR)lpszText, -1, &rect,
  86.                 DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  87.      SelectObject(hMemDC, GetStockObject(GRAY_BRUSH));
  88.      PatBlt (hMemDC, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  89.      BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDC, 0, 0, SRCCOPY);
  90.     Wait(47);
  91.  
  92.      DrawText (hMemDC, (LPSTR)lpszText, -1, &rect,
  93.                 DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  94.      SelectObject(hMemDC, GetStockObject(DKGRAY_BRUSH));
  95.      PatBlt (hMemDC, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  96.      BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDC, 0, 0, SRCCOPY);
  97.      Wait(47);
  98.  
  99.      DrawText (hMemDC, (LPSTR)lpszText, -1, &rect,
  100.                 DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  101.      SelectObject(hMemDC, GetStockObject(BLACK_BRUSH));
  102.      PatBlt (hMemDC, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  103.      BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDC, 0, 0, SRCCOPY);
  104.  
  105.  
  106.      DeleteDC (hMemDC);
  107.      DeleteObject (hBM);
  108.      ReleaseDC(hWnd, hDC);
  109.  
  110.     SetWindowText (hWnd, (LPSTR)lpszText);
  111. } /* end of FadeIn */
  112.  
  113. /***************************************************
  114. * Dissolve ()
  115. * 
  116. *
  117. ***************************************************/
  118. FCN void Dissolve (hWnd, lpszNew, szOld)
  119. HWND hWnd;
  120. LPSTR lpszNew;
  121. char *szOld;
  122. {
  123.     HDC hDC, hMemDCOld, hMemDCNew;
  124.     HBITMAP hBMOld, hBMNew;
  125.     RECT rect;
  126.     int nWidth, nHeight;
  127.     unsigned int i;
  128.  
  129.     GetClientRect (hWnd, &rect);
  130.     nWidth = rect.right - rect.left;
  131.     nHeight = rect.bottom - rect.top;
  132.  
  133.     hDC = GetDC (hWnd);
  134.     hMemDCOld = CreateCompatibleDC (hDC);
  135.     hMemDCNew = CreateCompatibleDC (hDC);
  136.     hBMOld = CreateCompatibleBitmap (hDC, nWidth, nHeight);
  137.     hBMNew = CreateCompatibleBitmap (hDC, nWidth, nHeight);
  138.  
  139.     SelectObject (hMemDCOld, hBMOld);
  140.     SelectObject (hMemDCNew, hBMNew);
  141.     PatBlt (hMemDCOld, 0, 0, nWidth, nHeight, WHITENESS);
  142.     PatBlt (hMemDCNew, 0, 0, nWidth, nHeight, WHITENESS);
  143.  
  144.     DrawText (hMemDCOld, (LPSTR)szOld, -1, &rect,
  145.              DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  146.     SelectObject(hMemDCOld, GetStockObject(DKGRAY_BRUSH));
  147.     PatBlt (hMemDCOld, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  148.     DrawText (hMemDCNew, (LPSTR)lpszNew, -1, &rect,
  149.              DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  150.     SelectObject(hMemDCNew, GetStockObject(LTGRAY_BRUSH));
  151.     PatBlt (hMemDCNew, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  152.     BitBlt (hMemDCOld, 0, 0, nWidth, nHeight, hMemDCNew, 0, 0, (DWORD)0x8800C6);
  153.     BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDCOld, 0, 0, SRCCOPY);
  154.     Wait(55);
  155.  
  156.     PatBlt (hMemDCOld, 0, 0, nWidth, nHeight, WHITENESS);
  157.     PatBlt (hMemDCNew, 0, 0, nWidth, nHeight, WHITENESS);
  158.  
  159.     DrawText (hMemDCOld, (LPSTR)szOld, -1, &rect,
  160.              DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  161.     SelectObject(hMemDCOld, GetStockObject(GRAY_BRUSH));
  162.     PatBlt (hMemDCOld, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  163.     DrawText (hMemDCNew, (LPSTR)lpszNew, -1, &rect,
  164.              DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  165.     SelectObject(hMemDCNew, GetStockObject(GRAY_BRUSH));
  166.     PatBlt (hMemDCNew, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  167.     BitBlt (hMemDCOld, 0, 0, nWidth, nHeight, hMemDCNew, 0, 0, (DWORD)0x8800C6);
  168.     BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDCOld, 0, 0, SRCCOPY);
  169.     Wait(55);
  170.  
  171.     PatBlt (hMemDCOld, 0, 0, nWidth, nHeight, WHITENESS);
  172.     PatBlt (hMemDCNew, 0, 0, nWidth, nHeight, WHITENESS);
  173.  
  174.     DrawText (hMemDCOld, (LPSTR)szOld, -1, &rect,
  175.              DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  176.     SelectObject(hMemDCOld, GetStockObject(LTGRAY_BRUSH));
  177.     PatBlt (hMemDCOld, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  178.     DrawText (hMemDCNew, (LPSTR)lpszNew, -1, &rect,
  179.              DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  180.     SelectObject(hMemDCNew, GetStockObject(DKGRAY_BRUSH));
  181.     PatBlt (hMemDCNew, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  182.     BitBlt (hMemDCOld, 0, 0, nWidth, nHeight, hMemDCNew, 0, 0, (DWORD)0x8800C6);
  183.     BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDCOld, 0, 0, SRCCOPY);
  184.     Wait(55);
  185.  
  186.     PatBlt (hMemDCNew, 0, 0, nWidth, nHeight, WHITENESS);
  187.  
  188.     DrawText (hMemDCNew, (LPSTR)lpszNew, -1, &rect,
  189.              DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  190.     BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDCNew, 0, 0, SRCCOPY);
  191.  
  192.     DeleteDC (hMemDCOld);
  193.     DeleteDC (hMemDCNew);
  194.     DeleteObject (hBMOld);
  195.     DeleteObject (hBMNew);
  196.     ReleaseDC(hWnd, hDC);
  197.  
  198.     SetWindowText (hWnd, (LPSTR)lpszNew);
  199. } /* end of Dissolve */
  200.  
  201. /***************************************************
  202. * FadeOut ()
  203. * 
  204. *
  205. ***************************************************/
  206. FCN void FadeOut (hWnd, szOld)
  207. HWND hWnd;
  208. char *szOld;
  209. {
  210.     HDC hDC, hMemDC;
  211.     HBITMAP hBM;
  212.     RECT rect;
  213.     int nWidth, nHeight;
  214.     int i;
  215.  
  216.     GetClientRect (hWnd, &rect);
  217.     nWidth = rect.right - rect.left;
  218.     nHeight = rect.bottom - rect.top;
  219.  
  220.     hDC = GetDC (hWnd);
  221.     hMemDC = CreateCompatibleDC (hDC);
  222.     hBM = CreateCompatibleBitmap (hDC, nWidth, nHeight);
  223.  
  224.     SelectObject (hMemDC, hBM);
  225.     PatBlt (hMemDC, 0, 0, nWidth, nHeight, WHITENESS);
  226.     DrawText (hMemDC, (LPSTR)szOld, -1, &rect,
  227.                 DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  228.     SelectObject(hMemDC, GetStockObject(DKGRAY_BRUSH));
  229.     PatBlt (hMemDC, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  230.     BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDC, 0, 0, SRCCOPY);
  231.     Wait(47);
  232.  
  233.      DrawText (hMemDC, (LPSTR)szOld, -1, &rect,
  234.                 DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  235.      SelectObject(hMemDC, GetStockObject(GRAY_BRUSH));
  236.      PatBlt (hMemDC, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  237.      BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDC, 0, 0, SRCCOPY);
  238.     Wait(47);
  239.  
  240.      DrawText (hMemDC, (LPSTR)szOld, -1, &rect,
  241.                 DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  242.      SelectObject(hMemDC, GetStockObject(LTGRAY_BRUSH));
  243.      PatBlt (hMemDC, 0, 0, nWidth, nHeight, (DWORD)0xFA0089);
  244.      BitBlt (hDC, 0, 0, nWidth, nHeight, hMemDC, 0, 0, SRCCOPY);
  245.     Wait(47);
  246.  
  247.     PatBlt (hDC, 0, 0, nWidth, nHeight, WHITENESS);
  248.  
  249.      DeleteDC (hMemDC);
  250.      DeleteObject (hBM);
  251.      ReleaseDC(hWnd, hDC);
  252.  
  253.     SetWindowText (hWnd, (LPSTR) '\0');
  254. } /* end of FadeOut */
  255.  
  256. /***************************************************
  257. * FaderWndProc ()
  258. * window procedure for fader control
  259. *
  260. ***************************************************/
  261. FCN long FAR PASCAL FaderWndProc( hWnd, message, wParam, lParam )
  262. HWND hWnd;
  263. unsigned message;
  264. WORD wParam;
  265. LONG lParam;
  266. {
  267.     char szText [80];
  268.     HDC hDC, hMemDC;
  269.     HBITMAP hBM;
  270.     RECT rect;
  271.  
  272.     switch (message)
  273.     {
  274.     case WM_FADER:
  275.         GetWindowText (hWnd, szText, sizeof(szText));
  276.  
  277.         /* lParam is new text, szText is current text */
  278.         if (!lParam && !szText)
  279.             break; /* nothing to do */
  280.  
  281.         else if (lParam && !szText)
  282.             FadeIn (hWnd, (LPSTR)lParam);
  283.  
  284.         else if (lParam && szText)
  285.             Dissolve(hWnd, (LPSTR)lParam, szText);
  286.  
  287.         else if (!lParam && szText)
  288.             FadeOut(hWnd, szText);
  289.  
  290.         break;
  291.  
  292.     case WM_PAINT:
  293.         GetClientRect (hWnd, &rect);
  294.         GetWindowText (hWnd, szText, sizeof(szText));
  295.         hDC = GetDC (hWnd);
  296.         DrawText (hDC, szText, -1, &rect,
  297.                  DT_SINGLELINE | DT_CENTER | DT_VCENTER);
  298.         ReleaseDC (hWnd, hDC);
  299.         ValidateRect (hWnd, (LPRECT)NULL);
  300.         break;
  301.  
  302.     default:
  303.         return DefWindowProc( hWnd, message, wParam, lParam );
  304.         break;
  305.     } /* switch */
  306.  
  307.     return(0L);
  308. } /* end of FaderWndProc */
  309.  
  310. /***************************************************
  311. * Wait ()
  312. * wait for "interval" number of milliseconds
  313. * use only for small intervals < 1000 ms
  314. ***************************************************/
  315. FCN void Wait (int interval)
  316. {
  317.     struct timeb timebuffer;
  318.     unsigned short startMS;
  319.  
  320.     ftime (&timebuffer);
  321.     startMS = timebuffer.millitm;
  322.     while (TRUE)
  323.         {
  324.         ftime (&timebuffer);
  325.         if (startMS > timebuffer.millitm)
  326.             timebuffer.millitm += 1000;
  327.  
  328.         if ((timebuffer.millitm - startMS) > interval)
  329.             break;
  330.         } /* while */
  331.  
  332. } /* end of Wait */
  333.