oleaut32/tests: Fix the FSF address.
[wine/multimedia.git] / dlls / comctl32 / nativefont.c
blob54c8ac85f0fcffc997ae6f45b242027fbe2b9c49
1 /*
2 * Native Font control
4 * Copyright 1998, 1999 Eric Kohl
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
20 * NOTES
21 * This is just a dummy control. An author is needed! Any volunteers?
22 * I will only improve this control once in a while.
23 * Eric <ekohl@abo.rhein-zeitung.de>
25 * TODO:
26 * - All messages.
27 * - All notifications.
30 #include <stdarg.h>
32 #include "windef.h"
33 #include "winbase.h"
34 #include "wingdi.h"
35 #include "winuser.h"
36 #include "commctrl.h"
37 #include "comctl32.h"
38 #include "wine/debug.h"
40 WINE_DEFAULT_DEBUG_CHANNEL(nativefont);
42 typedef struct
44 HWND hwndSelf; /* my own handle */
45 } NATIVEFONT_INFO;
47 #define NATIVEFONT_GetInfoPtr(hwnd) ((NATIVEFONT_INFO *)GetWindowLongPtrW (hwnd, 0))
49 static LRESULT
50 NATIVEFONT_Create (HWND hwnd, WPARAM wParam, LPARAM lParam)
52 NATIVEFONT_INFO *infoPtr;
54 /* allocate memory for info structure */
55 infoPtr = (NATIVEFONT_INFO *)Alloc (sizeof(NATIVEFONT_INFO));
56 SetWindowLongPtrW (hwnd, 0, (DWORD_PTR)infoPtr);
58 /* initialize info structure */
59 infoPtr->hwndSelf = hwnd;
61 return 0;
64 static LRESULT
65 NATIVEFONT_Destroy (NATIVEFONT_INFO *infoPtr)
67 /* free control info data */
68 SetWindowLongPtrW( infoPtr->hwndSelf, 0, 0 );
69 Free (infoPtr);
71 return 0;
74 static LRESULT WINAPI
75 NATIVEFONT_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
77 NATIVEFONT_INFO *infoPtr = NATIVEFONT_GetInfoPtr(hwnd);
79 TRACE("hwnd=%p msg=%04x wparam=%08x lparam=%08lx\n",
80 hwnd, uMsg, wParam, lParam);
82 if (!infoPtr && (uMsg != WM_CREATE))
83 return DefWindowProcW( hwnd, uMsg, wParam, lParam );
85 switch (uMsg)
87 case WM_CREATE:
88 return NATIVEFONT_Create (hwnd, wParam, lParam);
90 case WM_DESTROY:
91 return NATIVEFONT_Destroy (infoPtr);
93 case WM_MOVE:
94 case WM_SIZE:
95 case WM_SHOWWINDOW:
96 case WM_WINDOWPOSCHANGING:
97 case WM_WINDOWPOSCHANGED:
98 case WM_SETFONT:
99 case WM_GETDLGCODE:
100 /* FIXME("message %04x seen but stubbed\n", uMsg); */
101 return DefWindowProcW (hwnd, uMsg, wParam, lParam);
103 default:
104 if ((uMsg >= WM_USER) && (uMsg < WM_APP))
105 ERR("unknown msg %04x wp=%08x lp=%08lx\n",
106 uMsg, wParam, lParam);
107 return DefWindowProcW (hwnd, uMsg, wParam, lParam);
112 VOID
113 NATIVEFONT_Register (void)
115 WNDCLASSW wndClass;
117 ZeroMemory (&wndClass, sizeof(WNDCLASSW));
118 wndClass.style = CS_GLOBALCLASS;
119 wndClass.lpfnWndProc = NATIVEFONT_WindowProc;
120 wndClass.cbClsExtra = 0;
121 wndClass.cbWndExtra = sizeof(NATIVEFONT_INFO *);
122 wndClass.hCursor = LoadCursorW (0, (LPWSTR)IDC_ARROW);
123 wndClass.hbrBackground = (HBRUSH)(COLOR_BTNFACE + 1);
124 wndClass.lpszClassName = WC_NATIVEFONTCTLW;
126 RegisterClassW (&wndClass);
130 VOID
131 NATIVEFONT_Unregister (void)
133 UnregisterClassW (WC_NATIVEFONTCTLW, NULL);