msi: Add more tests for MsiSourceListGetInfo.
[wine.git] / dlls / comctl32 / theme_combo.c
blob477138e1792da90ecdeb1efe43f9c003b0edb931
1 /*
2 * Theming - Combo box control
4 * Copyright (c) 2005 by Frank Richter
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.
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.
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
22 #include <stdarg.h>
23 #include <string.h>
24 #include <stdlib.h>
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"
35 WINE_DEFAULT_DEBUG_CHANNEL(themingcombo);
37 /* Subclass-private state flags */
38 #define STATE_NOREDRAW 1
39 #define STATE_HOT 2
41 /* some constants for metrics, same as in user32 */
42 #define COMBO_XBORDERSIZE 2
43 #define COMBO_YBORDERSIZE 2
44 #define COMBO_EDITBUTTONSPACE 0
45 #define EDIT_CONTROL_PADDING 1
47 /* paint text of combobox, needed for read-only drop downs. */
48 static void paint_text (HWND hwnd, HDC hdc, DWORD dwStyle, const COMBOBOXINFO *cbi)
50 INT id, size = 0;
51 LPWSTR pText = NULL;
52 UINT itemState = ODS_COMBOBOXEDIT;
53 HFONT font = (HFONT)SendMessageW (hwnd, WM_GETFONT, 0, 0);
54 HFONT hPrevFont = (font) ? SelectObject(hdc, font) : 0;
55 RECT rectEdit;
56 BOOL focused = GetFocus () == hwnd;
57 BOOL dropped = cbi->stateButton == STATE_SYSTEM_PRESSED;
59 TRACE("\n");
61 /* follow Windows combobox that sends a bunch of text
62 * inquiries to its listbox while processing WM_PAINT. */
64 if( (id = SendMessageW (cbi->hwndList, LB_GETCURSEL, 0, 0) ) != LB_ERR )
66 size = SendMessageW (cbi->hwndList, LB_GETTEXTLEN, id, 0);
67 if (size == LB_ERR)
68 FIXME("LB_ERR probably not handled yet\n");
69 if( (pText = HeapAlloc( GetProcessHeap(), 0, (size + 1) * sizeof(WCHAR))) )
71 /* size from LB_GETTEXTLEN may be too large, from LB_GETTEXT is accurate */
72 size=SendMessageW (cbi->hwndList, LB_GETTEXT, (WPARAM)id, (LPARAM)pText);
73 pText[size] = '\0'; /* just in case */
74 } else return;
76 else
77 if( !(dwStyle & (CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE)) )
78 return;
81 * Give ourselves some space.
83 CopyRect (&rectEdit, &cbi->rcItem);
84 InflateRect( &rectEdit, -1, -1 );
86 if(dwStyle & (CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE))
88 DRAWITEMSTRUCT dis;
89 HRGN clipRegion;
90 UINT ctlid = (UINT)GetWindowLongPtrW( hwnd, GWLP_ID );
92 /* setup state for DRAWITEM message. Owner will highlight */
93 if ( focused && !dropped )
94 itemState |= ODS_SELECTED | ODS_FOCUS;
97 * Save the current clip region.
98 * To retrieve the clip region, we need to create one "dummy"
99 * clip region.
101 clipRegion = CreateRectRgnIndirect(&rectEdit);
103 if (GetClipRgn(hdc, clipRegion)!=1)
105 DeleteObject(clipRegion);
106 clipRegion=NULL;
109 if (!IsWindowEnabled(hwnd)) itemState |= ODS_DISABLED;
111 dis.CtlType = ODT_COMBOBOX;
112 dis.CtlID = ctlid;
113 dis.hwndItem = hwnd;
114 dis.itemAction = ODA_DRAWENTIRE;
115 dis.itemID = id;
116 dis.itemState = itemState;
117 dis.hDC = hdc;
118 dis.rcItem = rectEdit;
119 dis.itemData = SendMessageW(cbi->hwndList, LB_GETITEMDATA,
120 (WPARAM)id, 0 );
123 * Clip the DC and have the parent draw the item.
125 IntersectClipRect(hdc,
126 rectEdit.left, rectEdit.top,
127 rectEdit.right, rectEdit.bottom);
129 SendMessageW(GetParent (hwnd), WM_DRAWITEM, ctlid, (LPARAM)&dis );
132 * Reset the clipping region.
134 SelectClipRgn(hdc, clipRegion);
136 else
138 static const WCHAR empty_stringW[] = { 0 };
140 if ( focused && !dropped ) {
142 /* highlight */
143 FillRect( hdc, &rectEdit, GetSysColorBrush(COLOR_HIGHLIGHT) );
144 SetBkColor( hdc, GetSysColor( COLOR_HIGHLIGHT ) );
145 SetTextColor( hdc, GetSysColor( COLOR_HIGHLIGHTTEXT ) );
148 ExtTextOutW( hdc,
149 rectEdit.left + 1,
150 rectEdit.top + 1,
151 ETO_OPAQUE | ETO_CLIPPED,
152 &rectEdit,
153 pText ? pText : empty_stringW , size, NULL );
155 if ( focused && !dropped )
156 DrawFocusRect( hdc, &rectEdit );
159 if( hPrevFont )
160 SelectObject(hdc, hPrevFont );
162 HeapFree( GetProcessHeap(), 0, pText );
165 /* paint the combobox */
166 static LRESULT paint (HTHEME theme, HWND hwnd, HDC hParamDC, ULONG state)
168 PAINTSTRUCT ps;
169 HDC hDC;
170 COMBOBOXINFO cbi;
171 DWORD dwStyle = GetWindowLongW (hwnd, GWL_STYLE);
173 hDC = (hParamDC) ? hParamDC
174 : BeginPaint( hwnd, &ps);
176 TRACE("hdc=%p\n", hDC);
178 if( hDC && !(state & STATE_NOREDRAW) )
180 RECT frameRect;
181 int buttonState;
183 cbi.cbSize = sizeof (cbi);
184 SendMessageW (hwnd, CB_GETCOMBOBOXINFO, 0, (LPARAM)&cbi);
186 /* paint border */
187 if ((dwStyle & CBS_DROPDOWNLIST) != CBS_SIMPLE)
188 GetClientRect (hwnd, &frameRect);
189 else
191 CopyRect (&frameRect, &cbi.rcItem);
193 InflateRect(&frameRect,
194 EDIT_CONTROL_PADDING + COMBO_XBORDERSIZE,
195 EDIT_CONTROL_PADDING + COMBO_YBORDERSIZE);
198 DrawThemeBackground (theme, hDC, 0,
199 IsWindowEnabled (hwnd) ? CBXS_NORMAL : CBXS_DISABLED, &frameRect, NULL);
201 /* paint button */
202 if (cbi.stateButton != STATE_SYSTEM_INVISIBLE)
204 if (!IsWindowEnabled (hwnd))
205 buttonState = CBXS_DISABLED;
206 else if (cbi.stateButton == STATE_SYSTEM_PRESSED)
207 buttonState = CBXS_PRESSED;
208 else if (state & STATE_HOT)
209 buttonState = CBXS_HOT;
210 else
211 buttonState = CBXS_NORMAL;
212 DrawThemeBackground (theme, hDC, CP_DROPDOWNBUTTON, buttonState,
213 &cbi.rcButton, NULL);
216 /* paint text, if we need to */
217 if ((dwStyle & CBS_DROPDOWNLIST) == CBS_DROPDOWNLIST)
218 paint_text (hwnd, hDC, dwStyle, &cbi);
221 if( !hParamDC )
222 EndPaint(hwnd, &ps);
224 return 0;
228 /**********************************************************************
229 * The combo control subclass window proc.
231 LRESULT CALLBACK THEMING_ComboSubclassProc (HWND hwnd, UINT msg,
232 WPARAM wParam, LPARAM lParam,
233 ULONG_PTR dwRefData)
235 const WCHAR* themeClass = WC_COMBOBOXW;
236 HTHEME theme;
237 LRESULT result;
239 switch (msg)
241 case WM_CREATE:
242 result = THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
243 OpenThemeData( hwnd, themeClass );
244 return result;
246 case WM_DESTROY:
247 theme = GetWindowTheme( hwnd );
248 CloseThemeData ( theme );
249 return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
251 case WM_THEMECHANGED:
252 theme = GetWindowTheme( hwnd );
253 CloseThemeData ( theme );
254 OpenThemeData( hwnd, themeClass );
255 break;
257 case WM_SYSCOLORCHANGE:
258 theme = GetWindowTheme( hwnd );
259 if (!theme) return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
260 /* Do nothing. When themed, a WM_THEMECHANGED will be received, too,
261 * which will do the repaint. */
262 break;
264 case WM_PAINT:
265 theme = GetWindowTheme( hwnd );
266 if (!theme) return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
267 return paint (theme, hwnd, (HDC)wParam, dwRefData);
269 case WM_SETREDRAW:
270 /* Since there doesn't seem to be WM_GETREDRAW, do redraw tracking in
271 * the subclass as well. */
272 if( wParam )
273 dwRefData &= ~STATE_NOREDRAW;
274 else
275 dwRefData |= STATE_NOREDRAW;
276 THEMING_SetSubclassData (hwnd, dwRefData);
277 return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
279 case WM_MOUSEMOVE:
281 /* Dropdown button hot-tracking */
282 COMBOBOXINFO cbi;
283 POINT pt;
285 pt.x = (short)LOWORD(lParam);
286 pt.y = (short)HIWORD(lParam);
287 cbi.cbSize = sizeof (cbi);
288 SendMessageW (hwnd, CB_GETCOMBOBOXINFO, 0, (LPARAM)&cbi);
290 if (cbi.stateButton != STATE_SYSTEM_INVISIBLE)
292 if (PtInRect (&cbi.rcButton, pt))
294 if (!(dwRefData & STATE_HOT))
296 dwRefData |= STATE_HOT;
297 THEMING_SetSubclassData (hwnd, dwRefData);
298 RedrawWindow (hwnd, &cbi.rcButton, 0,
299 RDW_INVALIDATE | RDW_UPDATENOW);
302 else
304 if (dwRefData & STATE_HOT)
306 dwRefData &= ~STATE_HOT;
307 THEMING_SetSubclassData (hwnd, dwRefData);
308 RedrawWindow (hwnd, &cbi.rcButton, 0,
309 RDW_INVALIDATE | RDW_UPDATENOW);
314 return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
316 default:
317 /* Call old proc */
318 return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
320 return 0;