rostests/dibtests/patblt/patblt.cpp

   1
   2 // ------------------------------------------------------------------
   3 // Windows 2000 Graphics API Black Book
   4 // Chapter 2 - Listing 2.1 (PatBlt Tracking Rect Demo)
   5 //
   6 // Created by Damon Chandler <dmc27@ee.cornell.edu>
   7 // Updates can be downloaded at: <www.coriolis.com>
   8 //
   9 // Please do not hesistate to e-mail me at dmc27@ee.cornell.edu
  10 // if you have any questions about this code.
  11 // ------------------------------------------------------------------
  12
  13
  14 //>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  15 #include <windows.h>
  16 //<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
  17
  18
  19 HINSTANCE HInst;
  20 const char* WndClassName = "GMainWnd";
  21 LRESULT CALLBACK MainWndProc(HWND HWnd, UINT Msg, WPARAM WParam,
  22    LPARAM LParam);
  23
  24
  25 int APIENTRY WinMain(HINSTANCE HInstance, HINSTANCE, LPTSTR,
  26    int nCmdShow)
  27 {
  28    HInst = HInstance;
  29
  30    WNDCLASS wc;
  31    memset(&wc, 0, sizeof(WNDCLASS));
  32
  33    wc.style = CS_VREDRAW | CS_HREDRAW;
  34    wc.lpszClassName = WndClassName;
  35    wc.lpfnWndProc = MainWndProc;
  36    wc.hInstance = HInstance;
  37    wc.hCursor = LoadCursor(NULL, IDC_ARROW);
  38    wc.hbrBackground = static_cast<HBRUSH>(
  39       GetStockObject(BLACK_BRUSH)
  40       );
  41
  42    if (RegisterClass(&wc))
  43    {
  44       HWND HWnd =
  45          CreateWindow(WndClassName,
  46                       TEXT("PatBlt Tracking Rect Demo"),
  47                       WS_OVERLAPPEDWINDOW | WS_CAPTION |
  48                       WS_VISIBLE | WS_CLIPCHILDREN,
  49                       CW_USEDEFAULT, CW_USEDEFAULT, 640, 480,
  50                       NULL, NULL, HInst, NULL);
  51
  52       if (HWnd)
  53       {
  54          ShowWindow(HWnd, nCmdShow);
  55          UpdateWindow(HWnd);
  56
  57          MSG msg;
  58          while (GetMessage(&msg, NULL, 0, 0))
  59          {
  60              TranslateMessage(&msg);
  61              DispatchMessage(&msg);
  62          }
  63       }
  64     }
  65     return 0;
  66 }
  67 //------------------------------------------------------------------
  68
  69
  70 // image related
  71 HDC HMemDC = NULL;
  72 HBITMAP HOldBmp = NULL;
  73 const char* filename = "PENGUIN.BMP";
  74 RECT RImage = {225, 110, 225, 110};
  75
  76 // tracking related
  77 bool is_tracking = false;
  78 HDC HScreenDC = NULL;
  79 POINT PMouse = {0, 0};
  80 RECT RTrack = {0, 0, 0, 0};
  81 const int line_width = 5;
  82
  83
  84 // utility function to map to/from window coordinates
  85 void MapRect(IN HWND HWndFrom, IN HWND HWndTo, IN OUT RECT& RMap)
  86 {
  87    MapWindowPoints(
  88       HWndFrom, HWndTo,
  89       reinterpret_cast<LPPOINT>(&RMap), 2
  90       );
  91 }
  92 //------------------------------------------------------------------
  93
  94
  95 // utility function that uses the PatBlt function to
  96 // render a tracking rectangle
  97 void RenderTrackingRect(IN HDC HDestDC, IN const RECT& RRender)
  98 {
  99    const int width = RRender.right - RRender.left;
 100    const int height = RRender.bottom - RRender.top;
 101    const DWORD dwROP3 = DSTINVERT; // experiment with others
 102
 103    // render top bar
 104    PatBlt(HDestDC,
 105           RRender.left, RRender.top,
 106           width, line_width,
 107           dwROP3);
 108    // render bottom bar
 109    PatBlt(HDestDC,
 110           RRender.left, RRender.bottom - line_width,
 111           width, line_width,
 112           dwROP3);
 113    // render left bar
 114    PatBlt(HDestDC,
 115           RRender.left, RRender.top + line_width,
 116           line_width, height - (2 * line_width),
 117           dwROP3);
 118    // render right bar
 119    PatBlt(HDestDC,
 120           RRender.right - line_width, RRender.top + line_width,
 121           line_width, height - (2 * line_width),
 122           dwROP3);
 123
 124 }
 125 //------------------------------------------------------------------
 126
 127
 128 LRESULT CALLBACK MainWndProc(HWND HWnd, UINT Msg, WPARAM WParam,
 129    LPARAM LParam)
 130 {
 131    switch (Msg)
 132    {
 133       case WM_CREATE:
 134       {
 135          // create a memory DC
 136          HMemDC = CreateCompatibleDC(NULL);
 137          if (HMemDC)
 138          {
 139             // load the penguin bitmap
 140             HBITMAP HBmp = static_cast<HBITMAP>(
 141                LoadImage(HInst, filename, IMAGE_BITMAP, 0, 0,
 142                          LR_LOADFROMFILE | LR_DEFAULTSIZE)
 143                );
 144             if (HBmp)
 145             {
 146                // get the bitmap's dimensions
 147                BITMAP bmp;
 148                if (GetObject(HBmp, sizeof(BITMAP), &bmp))
 149                {
 150                   RImage.right += bmp.bmWidth;
 151                   RImage.bottom += bmp.bmHeight;
 152
 153                   // realize the bitmap
 154                   HOldBmp = static_cast<HBITMAP>(
 155                      SelectObject(HMemDC, HBmp)
 156                      );
 157                }
 158                else DeleteObject(HBmp);
 159             }
 160          }
 161          break;
 162       }
 163       case WM_LBUTTONDOWN:
 164       {
 165          PMouse.x = LOWORD(LParam);
 166          PMouse.y = HIWORD(LParam);
 167
 168          RECT RClient;
 169          if (PtInRect(&RImage, PMouse) &&
 170              GetClientRect(HWnd, &RClient))
 171          {
 172             MapRect(HWnd, HWND_DESKTOP, RClient);
 173             ClipCursor(&RClient);
 174
 175             // grab a handle to the screen DC and clip
 176             // all output to the client area of our window
 177             HScreenDC = GetDC(NULL);
 178             HRGN HClipRgn = CreateRectRgnIndirect(&RClient);
 179             SelectClipRgn(HScreenDC, HClipRgn);
 180             DeleteObject(HClipRgn);
 181
 182             CopyRect(&RTrack, &RImage);
 183             MapRect(HWnd, HWND_DESKTOP, RTrack);
 184
 185             // render the first tracking rect
 186             RenderTrackingRect(HScreenDC, RTrack);
 187             is_tracking = true;
 188          }
 189          break;
 190       }
 191       case WM_MOUSEMOVE:
 192       {
 193          if (HScreenDC && is_tracking)
 194          {
 195             POINT PCurrent = {LOWORD(LParam), HIWORD(LParam)};
 196             const int dX = PCurrent.x - PMouse.x;
 197             const int dY = PCurrent.y - PMouse.y;
 198
 199             // erase the previous rectangle
 200             RenderTrackingRect(HScreenDC, RTrack);
 201             // update the postion
 202             OffsetRect(&RTrack, dX, dY);
 203             // render the new tracking rectangle
 204             RenderTrackingRect(HScreenDC, RTrack);
 205
 206             // update the mouse position
 207             memcpy(&PMouse, &PCurrent, sizeof(POINT));
 208          }
 209          break;
 210       }
 211       case WM_LBUTTONUP:
 212       {
 213          // clean up
 214          if (is_tracking)
 215          {
 216             is_tracking = false;
 217             SelectClipRgn(HScreenDC, NULL);
 218             ReleaseDC(NULL, HScreenDC);
 219
 220             InvalidateRect(HWnd, &RImage, true);
 221             CopyRect(&RImage, &RTrack);
 222             MapRect(HWND_DESKTOP, HWnd, RImage);
 223             InvalidateRect(HWnd, &RImage, true);
 224
 225             ClipCursor(NULL);
 226          }
 227          break;
 228       }
 229       case WM_PAINT:
 230       {
 231          PAINTSTRUCT ps;
 232          HDC Hdc = BeginPaint(HWnd, &ps);
 233          try
 234          {
 235             //
 236             // TODO: Add palette support...
 237             //
 238
 239             // render the penguin
 240             BitBlt(Hdc, RImage.left, RImage.top,
 241                    RImage.right - RImage.left,
 242                    RImage.bottom - RImage.top,
 243                    HMemDC, 0, 0,
 244                    SRCCOPY);
 245          }
 246          catch (...)
 247          {
 248             EndPaint(HWnd, &ps);
 249          }
 250          EndPaint(HWnd, &ps);
 251          break;
 252       }
 253       case WM_DESTROY:
 254       {
 255          // clean up
 256          if (HOldBmp)
 257          {
 258             DeleteObject(SelectObject(HMemDC, HOldBmp));
 259          }
 260          if (HMemDC)
 261          {
 262             DeleteDC(HMemDC);
 263          }
 264          PostQuitMessage(0);
 265          return 0;
 266       }
 267    }
 268    return DefWindowProc(HWnd, Msg, WParam, LParam);
 269 }
 270 //------------------------------------------------------------------