riched20: Add newlines to ERR macro output.
[wine] / dlls / comctl32 / theme_combo.c
1 /*
2  * Theming - Combo box 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 WINE_DEFAULT_DEBUG_CHANNEL(themingcombo);
36
37 /* Subclass-private state flags */
38 #define STATE_NOREDRAW         1
39 #define STATE_HOT              2
40
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
46
47 /* paint text of combobox, needed for read-only drop downs. */
48 static void paint_text (HWND hwnd, HDC hdc, DWORD dwStyle, COMBOBOXINFO* cbi)
49 {
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;
58
59     TRACE("\n");
60
61     /* follow Windows combobox that sends a bunch of text
62      * inquiries to its listbox while processing WM_PAINT. */
63
64     if( (id = SendMessageW (cbi->hwndList, LB_GETCURSEL, 0, 0) ) != LB_ERR )
65     {
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))) )
70         {
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;
75     }
76     else
77        if( !(dwStyle & (CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE)) )
78            return;
79
80     /*
81      * Give ourselves some space.
82      */
83     CopyRect (&rectEdit, &cbi->rcItem);
84     InflateRect( &rectEdit, -1, -1 );
85      
86     if(dwStyle & (CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE))
87     {
88        DRAWITEMSTRUCT dis;
89        HRGN           clipRegion;
90        UINT ctlid = (UINT)GetWindowLongPtrW( hwnd, GWLP_ID );
91
92        /* setup state for DRAWITEM message. Owner will highlight */
93        if ( focused && !dropped )
94            itemState |= ODS_SELECTED | ODS_FOCUS;
95
96        /*
97         * Save the current clip region.
98         * To retrieve the clip region, we need to create one "dummy"
99         * clip region.
100         */
101        clipRegion = CreateRectRgnIndirect(&rectEdit);
102
103        if (GetClipRgn(hdc, clipRegion)!=1)
104        {
105          DeleteObject(clipRegion);
106          clipRegion=NULL;
107        }
108
109        if (!IsWindowEnabled(hwnd) & WS_DISABLED) itemState |= ODS_DISABLED;
110
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 );
121
122        /*
123         * Clip the DC and have the parent draw the item.
124         */
125        IntersectClipRect(hdc,
126                          rectEdit.left,  rectEdit.top,
127                          rectEdit.right, rectEdit.bottom);
128
129        SendMessageW(GetParent (hwnd), WM_DRAWITEM, ctlid, (LPARAM)&dis );
130
131        /*
132         * Reset the clipping region.
133         */
134        SelectClipRgn(hdc, clipRegion);
135     }
136     else
137     {
138        static const WCHAR empty_stringW[] = { 0 };
139
140        if ( focused && !dropped ) {
141
142            /* highlight */
143            FillRect( hdc, &rectEdit, GetSysColorBrush(COLOR_HIGHLIGHT) );
144            SetBkColor( hdc, GetSysColor( COLOR_HIGHLIGHT ) );
145            SetTextColor( hdc, GetSysColor( COLOR_HIGHLIGHTTEXT ) );
146       }
147
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 );
154
155       if ( focused && !dropped )
156         DrawFocusRect( hdc, &rectEdit );
157     }
158
159     if( hPrevFont )
160       SelectObject(hdc, hPrevFont );
161    
162     HeapFree( GetProcessHeap(), 0, pText );
163 }
164
165 /* paint the combobox */
166 static LRESULT paint (HTHEME theme, HWND hwnd, HDC hParamDC, ULONG state)
167 {
168   PAINTSTRUCT ps;
169   HDC   hDC;
170   COMBOBOXINFO cbi;
171   DWORD dwStyle = GetWindowLongW (hwnd, GWL_STYLE);
172
173   hDC = (hParamDC) ? hParamDC
174                    : BeginPaint( hwnd, &ps);
175
176   TRACE("hdc=%p\n", hDC);
177
178   if( hDC && !(state & STATE_NOREDRAW) )
179   {
180       RECT frameRect;
181       int buttonState;
182   
183       cbi.cbSize = sizeof (cbi);
184       SendMessageW (hwnd, CB_GETCOMBOBOXINFO, 0, (LPARAM)&cbi);
185       
186       /* paint border */
187       if ((dwStyle & CBS_DROPDOWNLIST) != CBS_SIMPLE)
188           GetClientRect (hwnd, &frameRect);
189       else
190       {
191           CopyRect (&frameRect, &cbi.rcItem);
192
193           InflateRect(&frameRect, 
194               EDIT_CONTROL_PADDING + COMBO_XBORDERSIZE, 
195               EDIT_CONTROL_PADDING + COMBO_YBORDERSIZE);
196       }
197       
198       DrawThemeBackground (theme, hDC, 0, 
199           IsWindowEnabled (hwnd) ? CBXS_NORMAL : CBXS_DISABLED, &frameRect, NULL);
200       
201       /* paint button */
202       if (cbi.stateButton != STATE_SYSTEM_INVISIBLE)
203       {
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);
214       }
215
216       /* paint text, if we need to */
217       if ((dwStyle & CBS_DROPDOWNLIST) == CBS_DROPDOWNLIST)
218           paint_text (hwnd, hDC, dwStyle, &cbi);
219   }
220
221   if( !hParamDC )
222     EndPaint(hwnd, &ps);
223
224   return 0;
225 }
226
227
228 /**********************************************************************
229  * The combo control subclass window proc.
230  */
231 LRESULT CALLBACK THEMING_ComboSubclassProc (HWND hwnd, UINT msg, 
232                                             WPARAM wParam, LPARAM lParam, 
233                                             ULONG_PTR dwRefData)
234 {
235     const WCHAR* themeClass = WC_COMBOBOXW;
236     HTHEME theme;
237     LRESULT result;
238       
239     switch (msg)
240     {
241     case WM_CREATE:
242         result = THEMING_CallOriginalClass  (hwnd, msg, wParam, lParam);
243         OpenThemeData( hwnd, themeClass );
244         return result;
245     
246     case WM_DESTROY:
247         theme = GetWindowTheme( hwnd );
248         CloseThemeData ( theme );
249         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
250
251     case WM_THEMECHANGED:
252         theme = GetWindowTheme( hwnd );
253         CloseThemeData ( theme );
254         OpenThemeData( hwnd, themeClass );
255         break;
256         
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;
263         
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);
268
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);
278         
279     case WM_MOUSEMOVE:
280         {
281             /* Dropdown button hot-tracking */
282             COMBOBOXINFO cbi;
283             POINT pt = {LOWORD(lParam), HIWORD(lParam)};
284         
285             cbi.cbSize = sizeof (cbi);
286             SendMessageW (hwnd, CB_GETCOMBOBOXINFO, 0, (LPARAM)&cbi);
287             
288             if (cbi.stateButton != STATE_SYSTEM_INVISIBLE)
289             {
290                 if (PtInRect (&cbi.rcButton, pt))
291                 {
292                     if (!(dwRefData & STATE_HOT))
293                     {
294                         dwRefData |= STATE_HOT;
295                         THEMING_SetSubclassData (hwnd, dwRefData);
296                         RedrawWindow (hwnd, &cbi.rcButton, 0, 
297                             RDW_INVALIDATE | RDW_UPDATENOW);
298                     }
299                 }
300                 else
301                 {
302                     if (dwRefData & STATE_HOT)
303                     {
304                         dwRefData &= ~STATE_HOT;
305                         THEMING_SetSubclassData (hwnd, dwRefData);
306                         RedrawWindow (hwnd, &cbi.rcButton, 0, 
307                             RDW_INVALIDATE | RDW_UPDATENOW);
308                     }
309                 }
310             }
311         }
312         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
313     
314     default: 
315         /* Call old proc */
316         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
317     }
318     return 0;
319 }