1 /*
2 * Theming - Dialogs
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 <stdarg.h>
23 #include <string.h>
24 #include <stdlib.h>
25
26 #include "windef.h"
27 #include "winbase.h"
28 #include "wingdi.h"
29 #include "winuser.h"
30 #include "uxtheme.h"
31 #include "tmschema.h"
32 #include "comctl32.h"
33 #include "wine/debug.h"
34
35 /**********************************************************************
36 * The dialog subclass window proc.
37 */
38 LRESULT CALLBACK THEMING_DialogSubclassProc (HWND hWnd, UINT msg,
39 WPARAM wParam, LPARAM lParam,
40 ULONG_PTR dwRefData)
41 {
42 HTHEME theme = GetWindowTheme ( hWnd );
43 static const WCHAR themeClass[] = { 'W','i','n','d','o','w',0 };
44 BOOL themingActive = IsThemeDialogTextureEnabled (hWnd);
45 BOOL doTheming = themingActive && (theme != NULL);
46 LRESULT result;
47
48 switch (msg)
49 {
50 case WM_CREATE:
51 result = THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
52 theme = OpenThemeData( hWnd, themeClass );
53 return result;
54
55 case WM_DESTROY:
56 CloseThemeData ( theme );
57 return THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
58
59 case WM_THEMECHANGED:
60 CloseThemeData ( theme );
61 OpenThemeData( hWnd, themeClass );
62 InvalidateRect( hWnd, NULL, TRUE );
63 return 0;
64
65 case WM_SYSCOLORCHANGE:
66 if (!doTheming) return THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
67 /* Do nothing. When themed, a WM_THEMECHANGED will be received, too,
68 * which will do the repaint. */
69 break;
70
71 case WM_ERASEBKGND:
72 if (!doTheming) return THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
73 {
74 RECT rc;
75 WNDPROC dlgp = (WNDPROC)GetWindowLongPtrW (hWnd, DWLP_DLGPROC);
76 if (!CallWindowProcW(dlgp, hWnd, msg, wParam, lParam))
77 {
78 /* Draw background*/
79 GetClientRect (hWnd, &rc);
80 if (IsThemePartDefined (theme, WP_DIALOG, 0))
81 /* Although there is a theme for the WINDOW class/DIALOG part,
82 * but I[res] haven't seen Windows using it yet... Even when
83 * dialog theming is activated, the good ol' BTNFACE
84 * background seems to be used. */
85 #if 0
86 DrawThemeBackground (theme, (HDC)wParam, WP_DIALOG, 0, &rc,
87 NULL);
88 #endif
89 return THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
90 else
91 /* We might have gotten a TAB theme class, so check if we can
92 * draw as a tab page. */
93 if (IsThemePartDefined (theme, TABP_BODY, 0))
94 DrawThemeBackground (theme, (HDC)wParam, TABP_BODY, 0, &rc,
95 NULL);
96 else
97 return THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
98 }
99 return 1;
100 }
101
102 case WM_CTLCOLORSTATIC:
103 if (!doTheming) return THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
104 {
105 WNDPROC dlgp = (WNDPROC)GetWindowLongPtrW (hWnd, DWLP_DLGPROC);
106 LRESULT result = CallWindowProcW(dlgp, hWnd, msg, wParam, lParam);
107 if (!result)
108 {
109 /* Override defaults with more suitable values when themed */
110 HDC controlDC = (HDC)wParam;
111 HWND controlWnd = (HWND)lParam;
112 WCHAR controlClass[32];
113 RECT rc;
114
115 GetClassNameW (controlWnd, controlClass,
116 sizeof(controlClass) / sizeof(controlClass[0]));
117 if (lstrcmpiW (controlClass, WC_STATICW) == 0)
118 {
119 /* Static control - draw parent background and set text to
120 * transparent, so it looks right on tab pages. */
121 GetClientRect (controlWnd, &rc);
122 DrawThemeParentBackground (controlWnd, controlDC, &rc);
123 SetBkMode (controlDC, TRANSPARENT);
124
125 /* Return NULL brush since we painted the BG already */
126 return (LRESULT)GetStockObject (NULL_BRUSH);
127 }
128 else
129 return THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
130
131 }
132 return result;
133 }
134
135 default:
136 /* Call old proc */
137 return THEMING_CallOriginalClass (hWnd, msg, wParam, lParam);
138 }
139 return 0;
140 }
141
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.