Mercurial > vba-clojure

comparison src/win32/ColorButton.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 // ColorButton.cpp : implementation file
2 //
3
4 #include "stdafx.h"
5 #include "ColorButton.h"
6
7 bool ColorButton::isRegistered = false;
8
9 /////////////////////////////////////////////////////////////////////////////
10 // ColorButton
11
12 ColorButton::ColorButton()
13 {
14 color = 0;
15 registerClass();
16 }
17
18 ColorButton::~ColorButton()
19 {
20 }
21
22
23 BEGIN_MESSAGE_MAP(ColorButton, CButton)
24 //{{AFX_MSG_MAP(ColorButton)
25 // NOTE - the ClassWizard will add and remove mapping macros here.
26 //}}AFX_MSG_MAP
27 END_MESSAGE_MAP()
28
29 /////////////////////////////////////////////////////////////////////////////
30 // ColorButton message handlers
31
32 void ColorButton::PreSubclassWindow()
33 {
34 SetWindowLong(m_hWnd, GWL_STYLE, GetStyle() | BS_OWNERDRAW);
35 CWnd::PreSubclassWindow();
36 }
37
38 void ColorButton::DrawItem(LPDRAWITEMSTRUCT lpDrawItemStruct)
39 {
40 ASSERT(lpDrawItemStruct);
41
42 int r = (color & 0x1f) << 3;
43 int g = (color & 0x3e0) >> 2;
44 int b = (color & 0x7c00) >> 7;
45
46 HDC dc = lpDrawItemStruct->hDC;
47 UINT state = lpDrawItemStruct->itemState;
48 RECT rect = lpDrawItemStruct->rcItem;
49
50 SIZE margins;
51 margins.cx = ::GetSystemMetrics(SM_CXEDGE);
52 margins.cy = ::GetSystemMetrics(SM_CYEDGE);
53
54 if(GetState() & BST_PUSHED)
55 DrawEdge(dc, &rect, EDGE_SUNKEN, BF_RECT);
56 else
57 DrawEdge(dc, &rect, EDGE_RAISED, BF_RECT);
58
59 InflateRect(&rect, -margins.cx, -margins.cy);
60
61 HBRUSH br = CreateSolidBrush((state & ODS_DISABLED) ?
62 ::GetSysColor(COLOR_3DFACE) : RGB(r,g,b));
63
64 FillRect(dc, &rect, br);
65
66 if(state & ODS_FOCUS) {
67 InflateRect(&rect, -1, -1);
68 DrawFocusRect(dc, &rect);
69 }
70
71 DeleteObject(br);
72 }
73
74 void ColorButton::setColor(u16 c)
75 {
76 color = c;
77 Invalidate();
78 }
79
80 void ColorButton::registerClass()
81 {
82 if(!isRegistered) {
83 WNDCLASS wc;
84 ZeroMemory(&wc, sizeof(wc));
85 wc.style = CS_HREDRAW | CS_VREDRAW | CS_GLOBALCLASS;
86 wc.lpfnWndProc = (WNDPROC)::DefWindowProc;
87 wc.hInstance = AfxGetInstanceHandle();
88 wc.hIcon = LoadCursor(NULL, IDC_ARROW);
89 wc.hbrBackground = (HBRUSH )GetStockObject(BLACK_BRUSH);
90 wc.lpszMenuName = NULL;
91 wc.lpszClassName = "VbaColorButton";
92 AfxRegisterClass(&wc);
93 isRegistered = true;
94 }
95 }