git.oblomov.eu Git - wine/blob - dlls/comctl32/nativefont.c

   1 /*
   2  * Native Font control
   3  *
   4  * Copyright 1998, 1999 Eric Kohl
   5  *
   6  * NOTES
   7  *   This is just a dummy control. An author is needed! Any volunteers?
   8  *   I will only improve this control once in a while.
   9  *     Eric <ekohl@abo.rhein-zeitung.de>
  10  *
  11  * TODO:
  12  *   - All messages.
  13  *   - All notifications.
  14  */
  15
  16 #include <string.h>
  17 #include "winbase.h"
  18 #include "commctrl.h"
  19 #include "debugtools.h"
  20
  21 DEFAULT_DEBUG_CHANNEL(nativefont);
  22
  23 typedef struct
  24 {
  25     DWORD  dwDummy;   /* just to keep the compiler happy ;-) */
  26 } NATIVEFONT_INFO;
  27
  28 #define NATIVEFONT_GetInfoPtr(hwnd) ((NATIVEFONT_INFO *)GetWindowLongA (hwnd, 0))
  29
  30
  31 static LRESULT
  32 NATIVEFONT_Create (HWND hwnd, WPARAM wParam, LPARAM lParam)
  33 {
  34     NATIVEFONT_INFO *infoPtr;
  35
  36     /* allocate memory for info structure */
  37     infoPtr = (NATIVEFONT_INFO *)COMCTL32_Alloc (sizeof(NATIVEFONT_INFO));
  38     SetWindowLongA (hwnd, 0, (DWORD)infoPtr);
  39
  40
  41     /* initialize info structure */
  42
  43
  44     return 0;
  45 }
  46
  47
  48 static LRESULT
  49 NATIVEFONT_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam)
  50 {
  51     NATIVEFONT_INFO *infoPtr = NATIVEFONT_GetInfoPtr (hwnd);
  52
  53
  54
  55
  56     /* free comboex info data */
  57     COMCTL32_Free (infoPtr);
  58
  59     return 0;
  60 }
  61
  62
  63
  64 static LRESULT WINAPI
  65 NATIVEFONT_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
  66 {
  67     switch (uMsg)
  68     {
  69
  70         case WM_CREATE:
  71             return NATIVEFONT_Create (hwnd, wParam, lParam);
  72
  73         case WM_DESTROY:
  74             return NATIVEFONT_Destroy (hwnd, wParam, lParam);
  75
  76         default:
  77             ERR("unknown msg %04x wp=%08x lp=%08lx\n",
  78                      uMsg, wParam, lParam);
  79             return DefWindowProcA (hwnd, uMsg, wParam, lParam);
  80     }
  81     return 0;
  82 }
  83
  84
  85 VOID
  86 NATIVEFONT_Register (void)
  87 {
  88     WNDCLASSA wndClass;
  89
  90     ZeroMemory (&wndClass, sizeof(WNDCLASSA));
  91     wndClass.style         = CS_GLOBALCLASS;
  92     wndClass.lpfnWndProc   = (WNDPROC)NATIVEFONT_WindowProc;
  93     wndClass.cbClsExtra    = 0;
  94     wndClass.cbWndExtra    = sizeof(NATIVEFONT_INFO *);
  95     wndClass.hCursor       = LoadCursorA (0, IDC_ARROWA);
  96     wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
  97     wndClass.lpszClassName = WC_NATIVEFONTCTLA;
  98
  99     RegisterClassA (&wndClass);
 100 }
 101
 102
 103 VOID
 104 NATIVEFONT_Unregister (void)
 105 {
 106     UnregisterClassA (WC_NATIVEFONTCTLA, (HINSTANCE)NULL);
 107 }
 108