bbf5827b4485e954c857c2db57cd34b67398f45c
[reactos.git] / reactos / dll / win32 / comctl32 / theme_edit.c
1 /*
2 * Theming - Edit control
3 *
4 * Copyright (c) 2005 by Frank Richter
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 *
20 */
21
22 #include "comctl32.h"
23
24 /* Draw themed border */
25 static void nc_paint (HTHEME theme, HWND hwnd, HRGN region)
26 {
27 HRGN cliprgn = region;
28 DWORD exStyle = GetWindowLongW (hwnd, GWL_EXSTYLE);
29 if (exStyle & WS_EX_CLIENTEDGE)
30 {
31 HDC dc;
32 RECT r;
33 int cxEdge = GetSystemMetrics (SM_CXEDGE),
34 cyEdge = GetSystemMetrics (SM_CYEDGE);
35 int part = EP_EDITTEXT;
36 int state = ETS_NORMAL;
37 DWORD dwStyle = GetWindowLongW (hwnd, GWL_STYLE);
38
39 if (!IsWindowEnabled (hwnd))
40 state = ETS_DISABLED;
41 else if (dwStyle & ES_READONLY)
42 state = ETS_READONLY;
43 else if (GetFocus() == hwnd)
44 state = ETS_FOCUSED;
45
46 GetWindowRect(hwnd, &r);
47
48 /* New clipping region passed to default proc to exclude border */
49 cliprgn = CreateRectRgn (r.left + cxEdge, r.top + cyEdge,
50 r.right - cxEdge, r.bottom - cyEdge);
51 if (region != (HRGN)1)
52 CombineRgn (cliprgn, cliprgn, region, RGN_AND);
53 OffsetRect(&r, -r.left, -r.top);
54
55 dc = GetDCEx(hwnd, region, DCX_WINDOW|DCX_INTERSECTRGN);
56 OffsetRect(&r, -r.left, -r.top);
57
58 if (IsThemeBackgroundPartiallyTransparent (theme, part, state))
59 DrawThemeParentBackground(hwnd, dc, &r);
60 DrawThemeBackground (theme, dc, part, state, &r, 0);
61 ReleaseDC(hwnd, dc);
62 }
63
64 /* Call default proc to get the scrollbars etc. also painted */
65 DefWindowProcW (hwnd, WM_NCPAINT, (WPARAM)cliprgn, 0);
66 }
67
68 /**********************************************************************
69 * The edit control subclass window proc.
70 */
71 LRESULT CALLBACK THEMING_EditSubclassProc (HWND hwnd, UINT msg,
72 WPARAM wParam, LPARAM lParam,
73 ULONG_PTR dwRefData)
74 {
75 const WCHAR* themeClass = WC_EDITW;
76 HTHEME theme;
77 LRESULT result;
78
79 switch (msg)
80 {
81 case WM_CREATE:
82 result = THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
83 OpenThemeData( hwnd, themeClass );
84 return result;
85
86 case WM_DESTROY:
87 theme = GetWindowTheme( hwnd );
88 CloseThemeData ( theme );
89 return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
90
91 case WM_THEMECHANGED:
92 theme = GetWindowTheme( hwnd );
93 CloseThemeData ( theme );
94 OpenThemeData( hwnd, themeClass );
95 break;
96
97 case WM_SYSCOLORCHANGE:
98 theme = GetWindowTheme( hwnd );
99 if (!theme) return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
100 /* Do nothing. When themed, a WM_THEMECHANGED will be received, too,
101 * which will do the repaint. */
102 break;
103
104 case WM_NCPAINT:
105 theme = GetWindowTheme( hwnd );
106 if (!theme) return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
107 nc_paint (theme, hwnd, (HRGN)wParam);
108 break;
109
110 case WM_ENABLE:
111 case WM_KILLFOCUS:
112 case WM_SETFOCUS:
113 theme = GetWindowTheme( hwnd );
114 if (theme) RedrawWindow (hwnd, NULL, NULL,
115 RDW_FRAME | RDW_INVALIDATE | RDW_UPDATENOW);
116 return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
117
118 default:
119 /* Call old proc */
120 return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
121 }
122 return 0;
123 }