controls/static.c

   1 /*
   2  * Static control
   3  *
   4  * Copyright  David W. Metcalfe, 1993
   5  *
   6  */
   7
   8 #include "windef.h"
   9 #include "wingdi.h"
  10 #include "wine/winuser16.h"
  11 #include "win.h"
  12 #include "cursoricon.h"
  13 #include "static.h"
  14 #include "heap.h"
  15 #include "debugtools.h"
  16 #include "tweak.h"
  17
  18 DEFAULT_DEBUG_CHANNEL(static)
  19
  20 static void STATIC_PaintOwnerDrawfn( WND *wndPtr, HDC hdc );
  21 static void STATIC_PaintTextfn( WND *wndPtr, HDC hdc );
  22 static void STATIC_PaintRectfn( WND *wndPtr, HDC hdc );
  23 static void STATIC_PaintIconfn( WND *wndPtr, HDC hdc );
  24 static void STATIC_PaintBitmapfn( WND *wndPtr, HDC hdc );
  25 static void STATIC_PaintEtchedfn( WND *wndPtr, HDC hdc );
  26
  27 static COLORREF color_windowframe, color_background, color_window;
  28
  29
  30 typedef void (*pfPaint)( WND *, HDC );
  31
  32 static pfPaint staticPaintFunc[SS_TYPEMASK+1] =
  33 {
  34     STATIC_PaintTextfn,      /* SS_LEFT */
  35     STATIC_PaintTextfn,      /* SS_CENTER */
  36     STATIC_PaintTextfn,      /* SS_RIGHT */
  37     STATIC_PaintIconfn,      /* SS_ICON */
  38     STATIC_PaintRectfn,      /* SS_BLACKRECT */
  39     STATIC_PaintRectfn,      /* SS_GRAYRECT */
  40     STATIC_PaintRectfn,      /* SS_WHITERECT */
  41     STATIC_PaintRectfn,      /* SS_BLACKFRAME */
  42     STATIC_PaintRectfn,      /* SS_GRAYFRAME */
  43     STATIC_PaintRectfn,      /* SS_WHITEFRAME */
  44     NULL,                    /* Not defined */
  45     STATIC_PaintTextfn,      /* SS_SIMPLE */
  46     STATIC_PaintTextfn,      /* SS_LEFTNOWORDWRAP */
  47     STATIC_PaintOwnerDrawfn, /* SS_OWNERDRAW */
  48     STATIC_PaintBitmapfn,    /* SS_BITMAP */
  49     NULL,                    /* SS_ENHMETAFILE */
  50     STATIC_PaintEtchedfn,    /* SS_ETCHEDHORIZ */
  51     STATIC_PaintEtchedfn,    /* SS_ETCHEDVERT */
  52     STATIC_PaintEtchedfn,    /* SS_ETCHEDFRAME */
  53 };
  54
  55
  56 /***********************************************************************
  57  *           STATIC_SetIcon
  58  *
  59  * Set the icon for an SS_ICON control.
  60  */
  61 static HICON16 STATIC_SetIcon( WND *wndPtr, HICON16 hicon )
  62 {
  63     HICON16 prevIcon;
  64     STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra;
  65     CURSORICONINFO *info = hicon?(CURSORICONINFO *) GlobalLock16( hicon ):NULL;
  66
  67     if ((wndPtr->dwStyle & SS_TYPEMASK) != SS_ICON) return 0;
  68     if (hicon && !info) {
  69         ERR("huh? hicon!=0, but info=0???\n");
  70         return 0;
  71     }
  72     prevIcon = infoPtr->hIcon;
  73     infoPtr->hIcon = hicon;
  74     if (hicon)
  75     {
  76         SetWindowPos( wndPtr->hwndSelf, 0, 0, 0, info->nWidth, info->nHeight,
  77                         SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOZORDER );
  78         GlobalUnlock16( hicon );
  79     }
  80     return prevIcon;
  81 }
  82
  83 /***********************************************************************
  84  *           STATIC_SetBitmap
  85  *
  86  * Set the bitmap for an SS_BITMAP control.
  87  */
  88 static HBITMAP16 STATIC_SetBitmap( WND *wndPtr, HBITMAP16 hBitmap )
  89 {
  90     HBITMAP16 hOldBitmap;
  91     STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra;
  92
  93     if ((wndPtr->dwStyle & SS_TYPEMASK) != SS_BITMAP) return 0;
  94     if (hBitmap && GetObjectType(hBitmap) != OBJ_BITMAP) {
  95         ERR("huh? hBitmap!=0, but not bitmap\n");
  96         return 0;
  97     }
  98     hOldBitmap = infoPtr->hIcon;
  99     infoPtr->hIcon = hBitmap;
 100     if (hBitmap)
 101     {
 102         BITMAP bm;
 103         GetObjectA(hBitmap, sizeof(bm), &bm);
 104         SetWindowPos( wndPtr->hwndSelf, 0, 0, 0, bm.bmWidth, bm.bmHeight,
 105                       SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOZORDER );
 106     }
 107     return hOldBitmap;
 108 }
 109
 110
 111 /***********************************************************************
 112  *           STATIC_LoadIcon
 113  *
 114  * Load the icon for an SS_ICON control.
 115  */
 116 static HICON16 STATIC_LoadIcon( WND *wndPtr, LPCSTR name )
 117 {
 118     HICON16 hicon;
 119
 120     if (wndPtr->flags & WIN_ISWIN32)
 121     {
 122         if (!HIWORD(wndPtr->hInstance)) {
 123             LPSTR segname = SEGPTR_STRDUP(name);
 124             hicon = LoadIcon16( wndPtr->hInstance, SEGPTR_GET(segname) );
 125             SEGPTR_FREE(segname);
 126         } else
 127             hicon = LoadIconA( wndPtr->hInstance, name );
 128     } else {
 129         LPSTR segname = SEGPTR_STRDUP(name);
 130
 131         if (HIWORD(wndPtr->hInstance))
 132                 FIXME("win16 window class, but win32 hinstance??\n");
 133         hicon = LoadIcon16( wndPtr->hInstance, SEGPTR_GET(segname) );
 134         SEGPTR_FREE(segname);
 135     }
 136     if (!hicon)
 137         hicon = LoadIconA( 0, name );
 138     return hicon;
 139 }
 140
 141 /***********************************************************************
 142  *           STATIC_LoadBitmap
 143  *
 144  * Load the bitmap for an SS_BITMAP control.
 145  */
 146 static HBITMAP16 STATIC_LoadBitmap( WND *wndPtr, LPCSTR name )
 147 {
 148     HBITMAP16 hbitmap;
 149
 150     if (wndPtr->flags & WIN_ISWIN32)
 151     {
 152         hbitmap = LoadBitmapA( wndPtr->hInstance, name );
 153         if (!hbitmap)  /* Try OEM icon (FIXME: is this right?) */
 154             hbitmap = LoadBitmapA( 0, name );
 155     }
 156     else
 157     {
 158         LPSTR segname = SEGPTR_STRDUP(name);
 159         hbitmap = LoadBitmap16( wndPtr->hInstance, SEGPTR_GET(segname) );
 160         if (!hbitmap)  /* Try OEM icon (FIXME: is this right?) */
 161             hbitmap = LoadBitmapA( 0, segname );
 162         SEGPTR_FREE(segname);
 163     }
 164     return hbitmap;
 165 }
 166
 167
 168 /***********************************************************************
 169  *           StaticWndProc
 170  */
 171 LRESULT WINAPI StaticWndProc( HWND hWnd, UINT uMsg, WPARAM wParam,
 172                               LPARAM lParam )
 173 {
 174     LRESULT lResult = 0;
 175     WND *wndPtr = WIN_FindWndPtr(hWnd);
 176     LONG style = wndPtr->dwStyle & SS_TYPEMASK;
 177     STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra;
 178
 179     switch (uMsg)
 180     {
 181     case WM_NCCREATE: {
 182         CREATESTRUCTA *cs = (CREATESTRUCTA *)lParam;
 183
 184         if ((TWEAK_WineLook > WIN31_LOOK) && (wndPtr->dwStyle & SS_SUNKEN))
 185             wndPtr->dwExStyle |= WS_EX_STATICEDGE;
 186
 187         if (style == SS_ICON)
 188         {
 189             if (cs->lpszName)
 190             {
 191                 if (!HIWORD(cs->lpszName) || cs->lpszName[0])
 192                     STATIC_SetIcon( wndPtr,
 193                                 STATIC_LoadIcon( wndPtr, cs->lpszName ));
 194             }
 195             lResult = 1;
 196             goto END;
 197         }
 198         if (style == SS_BITMAP)
 199         {
 200             if (cs->lpszName)
 201                 STATIC_SetBitmap( wndPtr,
 202                                 STATIC_LoadBitmap( wndPtr, cs->lpszName ));
 203             WARN("style SS_BITMAP, dwStyle is 0x%08lx\n",
 204                         wndPtr->dwStyle);
 205             lResult = 1;
 206             goto END;
 207         }
 208         if (!HIWORD(cs->lpszName) && (cs->lpszName))
 209         {
 210                 FIXME("windowName is 0x%04x, not doing DefWindowProc\n",
 211                     LOWORD(cs->lpszName));
 212                 lResult = 1;
 213                 goto END;
 214         }
 215         lResult = DefWindowProcA( hWnd, uMsg, wParam, lParam );
 216         goto END;
 217     }
 218     case WM_CREATE:
 219         if (style < 0L || style > SS_TYPEMASK)
 220         {
 221             ERR("Unknown style 0x%02lx\n", style );
 222             lResult = -1L;
 223             break;
 224         }
 225         /* initialise colours */
 226         color_windowframe  = GetSysColor(COLOR_WINDOWFRAME);
 227         color_background   = GetSysColor(COLOR_BACKGROUND);
 228         color_window       = GetSysColor(COLOR_WINDOW);
 229         break;
 230
 231     case WM_NCDESTROY:
 232         if (style == SS_ICON) {
 233 /*
 234  * FIXME
 235  *           DestroyIcon32( STATIC_SetIcon( wndPtr, 0 ) );
 236  *
 237  * We don't want to do this yet because DestroyIcon32 is broken. If the icon
 238  * had already been loaded by the application the last thing we want to do is
 239  * GlobalFree16 the handle.
 240  */
 241         } else {
 242             lResult = DefWindowProcA( hWnd, uMsg, wParam, lParam );
 243         }
 244         break;
 245
 246     case WM_PAINT:
 247         {
 248             PAINTSTRUCT ps;
 249             BeginPaint( hWnd, &ps );
 250             if (staticPaintFunc[style])
 251                 (staticPaintFunc[style])( wndPtr, ps.hdc );
 252             EndPaint( hWnd, &ps );
 253         }
 254         break;
 255
 256     case WM_ENABLE:
 257         InvalidateRect( hWnd, NULL, FALSE );
 258         break;
 259
 260     case WM_SYSCOLORCHANGE:
 261         color_windowframe  = GetSysColor(COLOR_WINDOWFRAME);
 262         color_background   = GetSysColor(COLOR_BACKGROUND);
 263         color_window       = GetSysColor(COLOR_WINDOW);
 264         InvalidateRect( hWnd, NULL, TRUE );
 265         break;
 266
 267     case WM_SETTEXT:
 268         if (style == SS_ICON)
 269             /* FIXME : should we also return the previous hIcon here ??? */
 270             STATIC_SetIcon( wndPtr, STATIC_LoadIcon( wndPtr, (LPCSTR)lParam ));
 271         else if (style == SS_BITMAP)
 272             STATIC_SetBitmap(wndPtr,STATIC_LoadBitmap(wndPtr,(LPCSTR)lParam ));
 273         else
 274             DEFWND_SetText( wndPtr, (LPCSTR)lParam );
 275         InvalidateRect( hWnd, NULL, FALSE );
 276         UpdateWindow( hWnd );
 277         break;
 278
 279     case WM_SETFONT:
 280         if (style == SS_ICON)
 281         {
 282             lResult = 0;
 283             goto END;
 284         }
 285         if (style == SS_BITMAP)
 286         {
 287             lResult = 0;
 288             goto END;
 289         }
 290         infoPtr->hFont = (HFONT16)wParam;
 291         if (LOWORD(lParam))
 292         {
 293             InvalidateRect( hWnd, NULL, FALSE );
 294             UpdateWindow( hWnd );
 295         }
 296         break;
 297
 298     case WM_GETFONT:
 299         lResult = infoPtr->hFont;
 300         goto END;
 301
 302     case WM_NCHITTEST:
 303         lResult = HTTRANSPARENT;
 304         goto END;
 305
 306     case WM_GETDLGCODE:
 307         lResult = DLGC_STATIC;
 308         goto END;
 309
 310     case STM_GETIMAGE:
 311     case STM_GETICON16:
 312     case STM_GETICON:
 313         lResult = infoPtr->hIcon;
 314         goto END;
 315
 316     case STM_SETIMAGE:
 317         /* FIXME: handle wParam */
 318         lResult = STATIC_SetBitmap( wndPtr, (HBITMAP)lParam );
 319         InvalidateRect( hWnd, NULL, FALSE );
 320         UpdateWindow( hWnd );
 321         break;
 322
 323     case STM_SETICON16:
 324     case STM_SETICON:
 325         lResult = STATIC_SetIcon( wndPtr, (HICON16)wParam );
 326         InvalidateRect( hWnd, NULL, FALSE );
 327         UpdateWindow( hWnd );
 328         break;
 329
 330     default:
 331         lResult = DefWindowProcA(hWnd, uMsg, wParam, lParam);
 332         break;
 333     }
 334
 335 END:
 336     WIN_ReleaseWndPtr(wndPtr);
 337     return lResult;
 338 }
 339
 340 static void STATIC_PaintOwnerDrawfn( WND *wndPtr, HDC hdc )
 341 {
 342   DRAWITEMSTRUCT dis;
 343
 344   dis.CtlType    = ODT_STATIC;
 345   dis.CtlID      = wndPtr->wIDmenu;
 346   dis.itemID     = 0;
 347   dis.itemAction = ODA_DRAWENTIRE;
 348   dis.itemState  = 0;
 349   dis.hwndItem   = wndPtr->hwndSelf;
 350   dis.hDC        = hdc;
 351   dis.itemData   = 0;
 352   GetClientRect( wndPtr->hwndSelf, &dis.rcItem );
 353
 354   SendMessageA( GetParent(wndPtr->hwndSelf), WM_CTLCOLORSTATIC,
 355                 hdc, wndPtr->hwndSelf );
 356   SendMessageA( GetParent(wndPtr->hwndSelf), WM_DRAWITEM,
 357                 wndPtr->wIDmenu, (LPARAM)&dis );
 358 }
 359
 360 static void STATIC_PaintTextfn( WND *wndPtr, HDC hdc )
 361 {
 362     RECT rc;
 363     HBRUSH hBrush;
 364     WORD wFormat;
 365
 366     LONG style = wndPtr->dwStyle;
 367     STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra;
 368
 369     GetClientRect( wndPtr->hwndSelf, &rc);
 370
 371     switch (style & SS_TYPEMASK)
 372     {
 373     case SS_LEFT:
 374         wFormat = DT_LEFT | DT_EXPANDTABS | DT_WORDBREAK | DT_NOCLIP;
 375         break;
 376
 377     case SS_CENTER:
 378         wFormat = DT_CENTER | DT_EXPANDTABS | DT_WORDBREAK | DT_NOCLIP;
 379         break;
 380
 381     case SS_RIGHT:
 382         wFormat = DT_RIGHT | DT_EXPANDTABS | DT_WORDBREAK | DT_NOCLIP;
 383         break;
 384
 385     case SS_SIMPLE:
 386         wFormat = DT_LEFT | DT_SINGLELINE | DT_VCENTER | DT_NOCLIP;
 387         break;
 388
 389     case SS_LEFTNOWORDWRAP:
 390         wFormat = DT_LEFT | DT_EXPANDTABS | DT_VCENTER;
 391         break;
 392
 393     default:
 394         return;
 395     }
 396
 397     if (style & SS_NOPREFIX)
 398         wFormat |= DT_NOPREFIX;
 399
 400     if (infoPtr->hFont) SelectObject( hdc, infoPtr->hFont );
 401     hBrush = SendMessageA( GetParent(wndPtr->hwndSelf), WM_CTLCOLORSTATIC,
 402                              hdc, wndPtr->hwndSelf );
 403     if (!hBrush) hBrush = GetStockObject(WHITE_BRUSH);
 404     FillRect( hdc, &rc, hBrush );
 405
 406     if (!IsWindowEnabled(wndPtr->hwndSelf))
 407         SetTextColor(hdc, GetSysColor(COLOR_GRAYTEXT));
 408
 409     if (wndPtr->text) DrawTextA( hdc, wndPtr->text, -1, &rc, wFormat );
 410 }
 411
 412 static void STATIC_PaintRectfn( WND *wndPtr, HDC hdc )
 413 {
 414     RECT rc;
 415     HBRUSH hBrush;
 416
 417     GetClientRect( wndPtr->hwndSelf, &rc);
 418
 419     switch (wndPtr->dwStyle & SS_TYPEMASK)
 420     {
 421     case SS_BLACKRECT:
 422         hBrush = CreateSolidBrush(color_windowframe);
 423         FillRect( hdc, &rc, hBrush );
 424         break;
 425     case SS_GRAYRECT:
 426         hBrush = CreateSolidBrush(color_background);
 427         FillRect( hdc, &rc, hBrush );
 428         break;
 429     case SS_WHITERECT:
 430         hBrush = CreateSolidBrush(color_window);
 431         FillRect( hdc, &rc, hBrush );
 432         break;
 433     case SS_BLACKFRAME:
 434         hBrush = CreateSolidBrush(color_windowframe);
 435         FrameRect( hdc, &rc, hBrush );
 436         break;
 437     case SS_GRAYFRAME:
 438         hBrush = CreateSolidBrush(color_background);
 439         FrameRect( hdc, &rc, hBrush );
 440         break;
 441     case SS_WHITEFRAME:
 442         hBrush = CreateSolidBrush(color_window);
 443         FrameRect( hdc, &rc, hBrush );
 444         break;
 445     default:
 446         return;
 447     }
 448     DeleteObject( hBrush );
 449 }
 450
 451
 452 static void STATIC_PaintIconfn( WND *wndPtr, HDC hdc )
 453 {
 454     RECT rc;
 455     HBRUSH hbrush;
 456     STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra;
 457
 458     GetClientRect( wndPtr->hwndSelf, &rc );
 459     hbrush = SendMessageA( GetParent(wndPtr->hwndSelf), WM_CTLCOLORSTATIC,
 460                              hdc, wndPtr->hwndSelf );
 461     FillRect( hdc, &rc, hbrush );
 462     if (infoPtr->hIcon) DrawIcon( hdc, rc.left, rc.top, infoPtr->hIcon );
 463 }
 464
 465 static void STATIC_PaintBitmapfn(WND *wndPtr, HDC hdc )
 466 {
 467     RECT rc;
 468     HBRUSH hbrush;
 469     STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra;
 470     HDC hMemDC;
 471     HBITMAP oldbitmap;
 472
 473     GetClientRect( wndPtr->hwndSelf, &rc );
 474     hbrush = SendMessageA( GetParent(wndPtr->hwndSelf), WM_CTLCOLORSTATIC,
 475                              hdc, wndPtr->hwndSelf );
 476     FillRect( hdc, &rc, hbrush );
 477
 478     if (infoPtr->hIcon) {
 479         BITMAP bm;
 480         SIZE sz;
 481
 482         if(GetObjectType(infoPtr->hIcon) != OBJ_BITMAP)
 483             return;
 484         if (!(hMemDC = CreateCompatibleDC( hdc ))) return;
 485         GetObjectA(infoPtr->hIcon, sizeof(bm), &bm);
 486         GetBitmapDimensionEx(infoPtr->hIcon, &sz);
 487         oldbitmap = SelectObject(hMemDC, infoPtr->hIcon);
 488         BitBlt(hdc, sz.cx, sz.cy, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0,
 489                SRCCOPY);
 490         SelectObject(hMemDC, oldbitmap);
 491         DeleteDC(hMemDC);
 492     }
 493 }
 494
 495
 496 static void STATIC_PaintEtchedfn( WND *wndPtr, HDC hdc )
 497 {
 498     RECT rc;
 499
 500     if (TWEAK_WineLook == WIN31_LOOK)
 501         return;
 502
 503     GetClientRect( wndPtr->hwndSelf, &rc );
 504     switch (wndPtr->dwStyle & SS_TYPEMASK)
 505     {
 506         case SS_ETCHEDHORZ:
 507             DrawEdge(hdc,&rc,EDGE_ETCHED,BF_TOP|BF_BOTTOM);
 508             break;
 509         case SS_ETCHEDVERT:
 510             DrawEdge(hdc,&rc,EDGE_ETCHED,BF_LEFT|BF_RIGHT);
 511             break;
 512         case SS_ETCHEDFRAME:
 513             DrawEdge (hdc, &rc, EDGE_ETCHED, BF_RECT);
 514             break;
 515     }
 516 }
 517