Revert "comctl32: Fix selection of tab via mouse."
[wine] / dlls / comctl32 / theme_edit.c
1 /*
2  * Theming - Edit 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 /* Draw themed border */
36 static void nc_paint (HTHEME theme, HWND hwnd, HRGN region)
37 {
38     HRGN cliprgn = region;
39     DWORD exStyle = GetWindowLongW (hwnd, GWL_EXSTYLE);
40     if (exStyle & WS_EX_CLIENTEDGE)
41     {
42         HDC dc;
43         RECT r;
44         int cxEdge = GetSystemMetrics (SM_CXEDGE),
45             cyEdge = GetSystemMetrics (SM_CYEDGE);
46         int part = EP_EDITTEXT;
47         int state = ETS_NORMAL;
48         DWORD dwStyle = GetWindowLongW (hwnd, GWL_STYLE);
49     
50         if (!IsWindowEnabled (hwnd))
51             state = ETS_DISABLED;
52         else if (dwStyle & ES_READONLY)
53             state = ETS_READONLY;
54         else if (GetFocus() == hwnd)
55             state = ETS_FOCUSED;
56     
57         GetWindowRect(hwnd, &r);
58     
59         /* New clipping region passed to default proc to exclude border */
60         cliprgn = CreateRectRgn (r.left + cxEdge, r.top + cyEdge,
61             r.right - cxEdge, r.bottom - cyEdge);
62         if (region != (HRGN)1)
63             CombineRgn (cliprgn, cliprgn, region, RGN_AND);
64         OffsetRect(&r, -r.left, -r.top);
65     
66         dc = GetDCEx(hwnd, region, DCX_WINDOW|DCX_INTERSECTRGN);
67         OffsetRect(&r, -r.left, -r.top);
68     
69         if (IsThemeBackgroundPartiallyTransparent (theme, part, state))
70             DrawThemeParentBackground(hwnd, dc, &r);
71         DrawThemeBackground (theme, dc, part, state, &r, 0);
72         ReleaseDC(hwnd, dc);
73     }
74
75     /* Call default proc to get the scrollbars etc. also painted */
76     DefWindowProcW (hwnd, WM_NCPAINT, (WPARAM)cliprgn, 0);
77 }
78
79 /**********************************************************************
80  * The edit control subclass window proc.
81  */
82 LRESULT CALLBACK THEMING_EditSubclassProc (HWND hwnd, UINT msg, 
83                                            WPARAM wParam, LPARAM lParam, 
84                                            ULONG_PTR dwRefData)
85 {
86     const WCHAR* themeClass = WC_EDITW;
87     HTHEME theme;
88     LRESULT result;
89       
90     switch (msg)
91     {
92     case WM_CREATE:
93         result = THEMING_CallOriginalClass  (hwnd, msg, wParam, lParam);
94         OpenThemeData( hwnd, themeClass );
95         return result;
96     
97     case WM_DESTROY:
98         theme = GetWindowTheme( hwnd );
99         CloseThemeData ( theme );
100         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
101
102     case WM_THEMECHANGED:
103         theme = GetWindowTheme( hwnd );
104         CloseThemeData ( theme );
105         OpenThemeData( hwnd, themeClass );
106         break;
107         
108     case WM_SYSCOLORCHANGE:
109         theme = GetWindowTheme( hwnd );
110         if (!theme) return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
111         /* Do nothing. When themed, a WM_THEMECHANGED will be received, too,
112          * which will do the repaint. */
113         break;
114         
115     case WM_NCPAINT:
116         theme = GetWindowTheme( hwnd );
117         if (!theme) return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
118         nc_paint (theme, hwnd, (HRGN)wParam);
119         break;
120
121     case WM_ENABLE:
122         theme = GetWindowTheme( hwnd );
123         if (theme) RedrawWindow (hwnd, NULL, NULL, 
124             RDW_FRAME | RDW_INVALIDATE | RDW_UPDATENOW);
125         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
126         
127     default: 
128         /* Call old proc */
129         return THEMING_CallOriginalClass (hwnd, msg, wParam, lParam);
130     }
131     return 0;
132 }