wininet: Mark internal symbols with hidden visibility.
[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., 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 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, const 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, 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)) 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, id, 0);
120
121        /*
122         * Clip the DC and have the parent draw the item.
123         */
124        IntersectClipRect(hdc,
125                          rectEdit.left,  rectEdit.top,
126                          rectEdit.right, rectEdit.bottom);
127
128        SendMessageW(GetParent (hwnd), WM_DRAWITEM, ctlid, (LPARAM)&dis );
129
130        /*
131         * Reset the clipping region.
132         */
133        SelectClipRgn(hdc, clipRegion);
134     }
135     else
136     {
137        static const WCHAR empty_stringW[] = { 0 };
138
139        if ( focused && !dropped ) {
140
141            /* highlight */
142            FillRect( hdc, &rectEdit, GetSysColorBrush(COLOR_HIGHLIGHT) );
143            SetBkColor( hdc, GetSysColor( COLOR_HIGHLIGHT ) );
144            SetTextColor( hdc, GetSysColor( COLOR_HIGHLIGHTTEXT ) );
145       }
146
147       ExtTextOutW( hdc,
148                    rectEdit.left + 1,
149                    rectEdit.top + 1,
150                    ETO_OPAQUE | ETO_CLIPPED,
151                    &rectEdit,
152                    pText ? pText : empty_stringW , size, NULL );
153
154       if ( focused && !dropped )
155         DrawFocusRect( hdc, &rectEdit );
156     }
157
158     if( hPrevFont )
159       SelectObject(hdc, hPrevFont );
160    
161     HeapFree( GetProcessHeap(), 0, pText );
162 }
163
164 /* paint the combobox */
165 static LRESULT paint (HTHEME theme, HWND hwnd, HDC hParamDC, ULONG state)
166 {
167   PAINTSTRUCT ps;
168   HDC   hDC;
169   COMBOBOXINFO cbi;
170   DWORD dwStyle = GetWindowLongW (hwnd, GWL_STYLE);
171
172   hDC = (hParamDC) ? hParamDC
173                    : BeginPaint( hwnd, &ps);
174
175   TRACE("hdc=%p\n", hDC);
176
177   if( hDC && !(state & STATE_NOREDRAW) )
178   {
179       RECT frameRect;
180       int buttonState;
181   
182       cbi.cbSize = sizeof (cbi);
183       SendMessageW (hwnd, CB_GETCOMBOBOXINFO, 0, (LPARAM)&cbi);
184       
185       /* paint border */
186       if ((dwStyle & CBS_DROPDOWNLIST) != CBS_SIMPLE)
187           GetClientRect (hwnd, &frameRect);
188       else
189       {
190           CopyRect (&frameRect, &cbi.rcItem);
191
192           InflateRect(&frameRect, 
193               EDIT_CONTROL_PADDING + COMBO_XBORDERSIZE, 
194               EDIT_CONTROL_PADDING + COMBO_YBORDERSIZE);
195       }
196       
197       DrawThemeBackground (theme, hDC, 0, 
198           IsWindowEnabled (hwnd) ? CBXS_NORMAL : CBXS_DISABLED, &frameRect, NULL);
199       
200       /* paint button */
201       if (cbi.stateButton != STATE_SYSTEM_INVISIBLE)
202       {
203           if (!IsWindowEnabled (hwnd))
204               buttonState = CBXS_DISABLED;
205           else if (cbi.stateButton == STATE_SYSTEM_PRESSED)
206               buttonState = CBXS_PRESSED;
207           else if (state & STATE_HOT)
208               buttonState = CBXS_HOT;
209           else
210               buttonState = CBXS_NORMAL;
211           DrawThemeBackground (theme, hDC, CP_DROPDOWNBUTTON, buttonState, 
212               &cbi.rcButton, NULL);
213       }
214
215       /* paint text, if we need to */
216       if ((dwStyle & CBS_DROPDOWNLIST) == CBS_DROPDOWNLIST)
217           paint_text (hwnd, hDC, dwStyle, &cbi);
218   }
219
220   if( !hParamDC )
221     EndPaint(hwnd, &ps);
222
223   return 0;
224 }
225
226
227 /**********************************************************************
228  * The combo control subclass window proc.
229  */
230 LRESULT CALLBACK THEMING_ComboSubclassProc (HWND hwnd, UINT msg, 
231                                             WPARAM wParam, LPARAM lParam, 
232                                             ULONG_PTR dwRefData)
233 {
234     const WCHAR* themeClass = WC_COMBOBOXW;
235     HTHEME theme;
236     LRESULT result;
237       
238     switch (msg)
239     {
240     case WM_CREATE:
241         result = THEMING_CallOriginalClass  (hwnd, msg, wParam, lParam);
242         OpenThemeData( hwnd, themeClass );
243         return result;
244     
245     case WM_DESTROY:
246         theme = GetWindowTheme( hwnd );
247         CloseThemeData ( theme );
248         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
249
250     case WM_THEMECHANGED:
251         theme = GetWindowTheme( hwnd );
252         CloseThemeData ( theme );
253         OpenThemeData( hwnd, themeClass );
254         break;
255         
256     case WM_SYSCOLORCHANGE:
257         theme = GetWindowTheme( hwnd );
258         if (!theme) return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
259         /* Do nothing. When themed, a WM_THEMECHANGED will be received, too,
260          * which will do the repaint. */
261         break;
262         
263     case WM_PAINT:
264         theme = GetWindowTheme( hwnd );
265         if (!theme) return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
266         return paint (theme, hwnd, (HDC)wParam, dwRefData);
267
268     case WM_SETREDRAW:
269         /* Since there doesn't seem to be WM_GETREDRAW, do redraw tracking in 
270          * the subclass as well. */
271         if( wParam )
272             dwRefData &= ~STATE_NOREDRAW;
273         else
274             dwRefData |= STATE_NOREDRAW;
275         THEMING_SetSubclassData (hwnd, dwRefData);
276         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
277         
278     case WM_MOUSEMOVE:
279         {
280             /* Dropdown button hot-tracking */
281             COMBOBOXINFO cbi;
282             POINT pt;
283
284             pt.x = (short)LOWORD(lParam);
285             pt.y = (short)HIWORD(lParam);
286             cbi.cbSize = sizeof (cbi);
287             SendMessageW (hwnd, CB_GETCOMBOBOXINFO, 0, (LPARAM)&cbi);
288             
289             if (cbi.stateButton != STATE_SYSTEM_INVISIBLE)
290             {
291                 if (PtInRect (&cbi.rcButton, pt))
292                 {
293                     if (!(dwRefData & STATE_HOT))
294                     {
295                         dwRefData |= STATE_HOT;
296                         THEMING_SetSubclassData (hwnd, dwRefData);
297                         RedrawWindow (hwnd, &cbi.rcButton, 0, 
298                             RDW_INVALIDATE | RDW_UPDATENOW);
299                     }
300                 }
301                 else
302                 {
303                     if (dwRefData & STATE_HOT)
304                     {
305                         dwRefData &= ~STATE_HOT;
306                         THEMING_SetSubclassData (hwnd, dwRefData);
307                         RedrawWindow (hwnd, &cbi.rcButton, 0, 
308                             RDW_INVALIDATE | RDW_UPDATENOW);
309                     }
310                 }
311             }
312         }
313         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
314     
315     default: 
316         /* Call old proc */
317         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
318     }
319     return 0;
320 }