Programming Windows程式開發設計指南->第八章 例子程式2

/*_############################################################################
  _##
  _##  Programming Windows程式開發設計指南->第八章 例子程式2
  _##  Author: xwlee                        
  _##  Time: 2007.06.26
  _##  Chang'an University
  _##  Development condition: win2003 Server+VC6.0
  _##
  _##  程式8-2  BEEPER2
  _##  BEEPER2.C 檔案
  _##  簡單的定時器：一個例子
  _##  程式只是進行驗證
  _## 
  _##
  _##      BEEPER2.C --       Timer Demo Program No. 2
  _##     (c) Charles Petzold, 1998
  _##  
  _##########################################################################*/
#include <windows.h>
#define ID_TIMER    1

LRESULT       CALLBACK           WndProc   (HWND, UINT, WPARAM, LPARAM) ;
VOID    CALLBACK  TimerProc (HWND, UINT, UINT,   DWORD ) ;

int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
                                                              PSTR szCmdLine, int iCmdShow)
{
           static char      szAppName[]               = "Beeper2" ;
          HWND                                 hwnd ;
          MSG                                   msg ;
          WNDCLASS                    wndclass ;
    
          wndclass.style                                    = CS_HREDRAW | CS_VREDRAW ;
          wndclass.lpfnWndProc                            = WndProc ;
          wndclass.cbClsExtra                              = 0 ;
          wndclass.cbWndExtra                            = 0 ;
          wndclass.hInstance                               = hInstance ;
          wndclass.hIcon                                  = LoadIcon (NULL, IDI_APPLICATION) ;
          wndclass.hCursor                                = LoadCursor (NULL, IDC_ARROW) ;
          wndclass.hbrBackground                   = (HBRUSH) GetStockObject (WHITE_BRUSH) ;
          wndclass.lpszMenuName                   = NULL ;
          wndclass.lpszClassName                    = szAppName ;
    
          if (!RegisterClass (&wndclass))
          {
                     MessageBox ( NULL, TEXT ("Program requires Windows NT!"),
                                                                    szAppName, MB_ICONERROR) ;
                     return 0 ;
          }
    
          hwnd = CreateWindow (       szAppName, "Beeper2 Timer Demo",
                                                      WS_OVERLAPPEDWINDOW,
                                     CW_USEDEFAULT, CW_USEDEFAULT,
                                 CW_USEDEFAULT, CW_USEDEFAULT,
                                NULL, NULL, hInstance, NULL) ;
    
          ShowWindow (hwnd, iCmdShow) ;
          UpdateWindow (hwnd) ;
         
          while (GetMessage (&msg, NULL, 0, 0))
          {
                     TranslateMessage (&msg) ;
                 DispatchMessage (&msg) ;
          }
          return msg.wParam ;
}

LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
      switch (message)
     {
         case       WM_CREATE:
                     SetTimer (hwnd, ID_TIMER, 1000, TimerProc) ; //這裡
                     return 0 ;
         
          case       WM_DESTROY:
                    KillTimer (hwnd, ID_TIMER) ;
                     PostQuitMessage (0) ;
                     return 0 ;
     }
          return DefWindowProc (hwnd, message, wParam, lParam) ;
}

VOID CALLBACK TimerProc (HWND hwnd, UINT message, UINT iTimerID, DWORD dwTime)
{
          static BOOL fFlipFlop = FALSE ;
          HBRUSH                         hBrush ;
          HDC                                   hdc ;
          RECT                                  rc ;
        
          MessageBeep (-1) ;
    Beep(5000, 100);

          fFlipFlop = !fFlipFlop ;
    
          GetClientRect (hwnd, &rc) ;
          hdc = GetDC (hwnd) ;
          hBrush = CreateSolidBrush (fFlipFlop ? RGB(255,0,0) : RGB(0,0,255)) ;

          FillRect (hdc, &rc, hBrush) ;
          ReleaseDC (hwnd, hdc) ;
 
          DeleteObject (hBrush) ;
}