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, 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;
 284
 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);
 289
 290             if (cbi.stateButton != STATE_SYSTEM_INVISIBLE)
 291             {
 292                 if (PtInRect (&cbi.rcButton, pt))
 293                 {
 294                     if (!(dwRefData & STATE_HOT))
 295                     {
 296                         dwRefData |= STATE_HOT;
 297                         THEMING_SetSubclassData (hwnd, dwRefData);
 298                         RedrawWindow (hwnd, &cbi.rcButton, 0,
 299                             RDW_INVALIDATE | RDW_UPDATENOW);
 300                     }
 301                 }
 302                 else
 303                 {
 304                     if (dwRefData & STATE_HOT)
 305                     {
 306                         dwRefData &= ~STATE_HOT;
 307                         THEMING_SetSubclassData (hwnd, dwRefData);
 308                         RedrawWindow (hwnd, &cbi.rcButton, 0,
 309                             RDW_INVALIDATE | RDW_UPDATENOW);
 310                     }
 311                 }
 312             }
 313         }
 314         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
 315
 316     default:
 317         /* Call old proc */
 318         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
 319     }
 320     return 0;
 321 }