Mercurial > vba-clojure

comparison src/win32/ColorControl.cpp @ 1:f9f4f1b99eed

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
importing src directory
author Robert McIntyre <rlm@mit.edu>
date Sat, 03 Mar 2012 10:31:27 -0600
parents
children
comparison
equal deleted inserted replaced
0:8ced16adf2e1 1:f9f4f1b99eed
1 // ColorControl.cpp : implementation file
2 //
3
4 #include "stdafx.h"
5 #include "ColorControl.h"
6
7 bool ColorControl::isRegistered = false;
8
9 /////////////////////////////////////////////////////////////////////////////
10 // ColorControl
11
12 ColorControl::ColorControl()
13 {
14 color = 0;
15 registerClass();
16 }
17
18 ColorControl::~ColorControl()
19 {
20 }
21
22
23 BEGIN_MESSAGE_MAP(ColorControl, CWnd)
24 //{{AFX_MSG_MAP(ColorControl)
25 ON_WM_PAINT()
26 ON_WM_ERASEBKGND()
27 //}}AFX_MSG_MAP
28 END_MESSAGE_MAP()
29
30
31 /////////////////////////////////////////////////////////////////////////////
32 // ColorControl message handlers
33
34 void ColorControl::OnPaint()
35 {
36 CPaintDC dc(this); // device context for painting
37 }
38
39 BOOL ColorControl::OnEraseBkgnd(CDC* pDC)
40 {
41 int r = (color & 0x1f) << 3;
42 int g = (color & 0x3e0) >> 2;
43 int b = (color & 0x7c00) >> 7;
44
45 CBrush br;
46 br.CreateSolidBrush(RGB(r,g,b));
47
48 RECT rect;
49 GetClientRect(&rect);
50 pDC->FillRect(&rect,&br);
51 pDC->DrawEdge(&rect, EDGE_SUNKEN, BF_RECT);
52 br.DeleteObject();
53 return TRUE;
54 }
55
56 void ColorControl::setColor(u16 c)
57 {
58 color = c;
59 Invalidate();
60 }
61
62 void ColorControl::registerClass()
63 {
64 if(!isRegistered) {
65 WNDCLASS wc;
66 ZeroMemory(&wc, sizeof(wc));
67 wc.style = CS_HREDRAW | CS_VREDRAW | CS_GLOBALCLASS;
68 wc.lpfnWndProc = (WNDPROC)::DefWindowProc;
69 wc.hInstance = AfxGetInstanceHandle();
70 wc.hIcon = NULL;
71 wc.hCursor = LoadCursor(NULL, IDC_ARROW);
72 wc.hbrBackground = (HBRUSH )GetStockObject(BLACK_BRUSH);
73 wc.lpszMenuName = NULL;
74 wc.lpszClassName = "VbaColorControl";
75 AfxRegisterClass(&wc);
76 isRegistered = true;
77 }
78 }