Release 960521
[wine] / controls / button.c
1 /* File: button.c -- Button type widgets
2  *
3  * Copyright (C) 1993 Johannes Ruscheinski
4  * Copyright (C) 1993 David Metcalfe
5  * Copyright (C) 1994 Alexandre Julliard
6  */
7
8 #include "win.h"
9 #include "syscolor.h"
10 #include "graphics.h"
11 #include "button.h"
12
13 static void PB_Paint( WND *wndPtr, HDC hDC, WORD action );
14 static void PB_PaintGrayOnGray(HDC hDC,HFONT hFont,RECT16 *rc,char *text);
15 static void CB_Paint( WND *wndPtr, HDC hDC, WORD action );
16 static void GB_Paint( WND *wndPtr, HDC hDC, WORD action );
17 static void UB_Paint( WND *wndPtr, HDC hDC, WORD action );
18 static void OB_Paint( WND *wndPtr, HDC hDC, WORD action );
19 static void BUTTON_CheckAutoRadioButton( WND *wndPtr );
20
21 #define MAX_BTN_TYPE  12
22
23 static WORD maxCheckState[MAX_BTN_TYPE] =
24 {
25     BUTTON_UNCHECKED,   /* BS_PUSHBUTTON */
26     BUTTON_UNCHECKED,   /* BS_DEFPUSHBUTTON */
27     BUTTON_CHECKED,     /* BS_CHECKBOX */
28     BUTTON_CHECKED,     /* BS_AUTOCHECKBOX */
29     BUTTON_CHECKED,     /* BS_RADIOBUTTON */
30     BUTTON_3STATE,      /* BS_3STATE */
31     BUTTON_3STATE,      /* BS_AUTO3STATE */
32     BUTTON_UNCHECKED,   /* BS_GROUPBOX */
33     BUTTON_UNCHECKED,   /* BS_USERBUTTON */
34     BUTTON_CHECKED,     /* BS_AUTORADIOBUTTON */
35     BUTTON_UNCHECKED,   /* Not defined */
36     BUTTON_UNCHECKED    /* BS_OWNERDRAW */
37 };
38
39 typedef void (*pfPaint)( WND *wndPtr, HDC hdc, WORD action );
40
41 static pfPaint btnPaintFunc[MAX_BTN_TYPE] =
42 {
43     PB_Paint,    /* BS_PUSHBUTTON */
44     PB_Paint,    /* BS_DEFPUSHBUTTON */
45     CB_Paint,    /* BS_CHECKBOX */
46     CB_Paint,    /* BS_AUTOCHECKBOX */
47     CB_Paint,    /* BS_RADIOBUTTON */
48     CB_Paint,    /* BS_3STATE */
49     CB_Paint,    /* BS_AUTO3STATE */
50     GB_Paint,    /* BS_GROUPBOX */
51     UB_Paint,    /* BS_USERBUTTON */
52     CB_Paint,    /* BS_AUTORADIOBUTTON */
53     NULL,        /* Not defined */
54     OB_Paint     /* BS_OWNERDRAW */
55 };
56
57 #define PAINT_BUTTON(wndPtr,style,action) \
58      if (btnPaintFunc[style]) { \
59          HDC hdc = GetDC( (wndPtr)->hwndSelf ); \
60          (btnPaintFunc[style])(wndPtr,hdc,action); \
61          ReleaseDC( (wndPtr)->hwndSelf, hdc ); }
62
63 #define BUTTON_SEND_CTLCOLOR(wndPtr,hdc) \
64     SendMessage32A( GetParent((wndPtr)->hwndSelf), WM_CTLCOLORBTN, \
65                     (hdc), (wndPtr)->hwndSelf )
66
67 static HBITMAP hbitmapCheckBoxes = 0;
68 static WORD checkBoxWidth = 0, checkBoxHeight = 0;
69
70
71 /***********************************************************************
72  *           ButtonWndProc
73  */
74 LRESULT ButtonWndProc(HWND32 hWnd, UINT32 uMsg, WPARAM32 wParam, LPARAM lParam)
75 {
76     RECT16 rect;
77     WND *wndPtr = WIN_FindWndPtr(hWnd);
78     BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra;
79     LONG style = wndPtr->dwStyle & 0x0f;
80
81     switch (uMsg)
82     {
83     case WM_GETDLGCODE:
84         switch(style)
85         {
86         case BS_PUSHBUTTON:      return DLGC_BUTTON | DLGC_UNDEFPUSHBUTTON;
87         case BS_DEFPUSHBUTTON:   return DLGC_BUTTON | DLGC_DEFPUSHBUTTON;
88         case BS_RADIOBUTTON:
89         case BS_AUTORADIOBUTTON: return DLGC_BUTTON | DLGC_RADIOBUTTON;
90         default:                 return DLGC_BUTTON;
91         }
92
93     case WM_ENABLE:
94         PAINT_BUTTON( wndPtr, style, ODA_DRAWENTIRE );
95         break;
96
97     case WM_CREATE:
98         if (!hbitmapCheckBoxes)
99         {
100             BITMAP bmp;
101             hbitmapCheckBoxes = LoadBitmap(0, MAKEINTRESOURCE(OBM_CHECKBOXES));
102             GetObject( hbitmapCheckBoxes, sizeof(bmp), (LPSTR)&bmp );
103             checkBoxWidth  = bmp.bmWidth / 4;
104             checkBoxHeight = bmp.bmHeight / 3;
105         }
106         if (style < 0L || style >= MAX_BTN_TYPE) return -1; /* abort */
107         infoPtr->state = BUTTON_UNCHECKED;
108         infoPtr->hFont = 0;
109         return 0;
110
111     case WM_ERASEBKGND:
112         break;
113
114     case WM_PAINT:
115         if (btnPaintFunc[style])
116         {
117             PAINTSTRUCT16 ps;
118             HDC hdc = BeginPaint16( hWnd, &ps );
119             (btnPaintFunc[style])( wndPtr, hdc, ODA_DRAWENTIRE );
120             EndPaint16( hWnd, &ps );
121         }
122         break;
123
124     case WM_LBUTTONDOWN:
125         SendMessage32A( hWnd, BM_SETSTATE32, TRUE, 0 );
126         SetFocus( hWnd );
127         SetCapture( hWnd );
128         break;
129
130     case WM_LBUTTONUP:
131         ReleaseCapture();
132         if (!(infoPtr->state & BUTTON_HIGHLIGHTED)) break;
133         SendMessage16( hWnd, BM_SETSTATE16, FALSE, 0 );
134         GetClientRect16( hWnd, &rect );
135         if (PtInRect16( &rect, MAKEPOINT16(lParam) ))
136         {
137             switch(style)
138             {
139             case BS_AUTOCHECKBOX:
140                 SendMessage32A( hWnd, BM_SETCHECK32,
141                                 !(infoPtr->state & BUTTON_CHECKED), 0 );
142                 break;
143             case BS_AUTORADIOBUTTON:
144                 SendMessage32A( hWnd, BM_SETCHECK32, TRUE, 0 );
145                 break;
146             case BS_AUTO3STATE:
147                 SendMessage32A( hWnd, BM_SETCHECK32,
148                                 (infoPtr->state & BUTTON_3STATE) ? 0 :
149                                 ((infoPtr->state & 3) + 1), 0 );
150                 break;
151             }
152             SendMessage32A( GetParent(hWnd), WM_COMMAND,
153                             MAKEWPARAM( wndPtr->wIDmenu, BN_CLICKED ), hWnd);
154         }
155         break;
156
157     case WM_MOUSEMOVE:
158         if (GetCapture() == hWnd)
159         {
160             GetClientRect16( hWnd, &rect );
161             SendMessage32A( hWnd, BM_SETSTATE32,
162                             PtInRect16( &rect,MAKEPOINT16(lParam) ), 0 );
163         }
164         break;
165
166     case WM_NCHITTEST:
167         if(style == BS_GROUPBOX) return HTTRANSPARENT;
168         return DefWindowProc32A( hWnd, uMsg, wParam, lParam );
169
170     case WM_SETTEXT:
171         DEFWND_SetText( wndPtr, (LPSTR)lParam );
172         PAINT_BUTTON( wndPtr, style, ODA_DRAWENTIRE );
173         return 0;
174
175     case WM_SETFONT:
176         infoPtr->hFont = (HFONT) wParam;
177         if (lParam) PAINT_BUTTON( wndPtr, style, ODA_DRAWENTIRE );
178         break;
179
180     case WM_GETFONT:
181         return infoPtr->hFont;
182
183     case WM_SETFOCUS:
184         infoPtr->state |= BUTTON_HASFOCUS;
185         PAINT_BUTTON( wndPtr, style, ODA_FOCUS );
186         break;
187
188     case WM_KILLFOCUS:
189         infoPtr->state &= ~BUTTON_HASFOCUS;
190         PAINT_BUTTON( wndPtr, style, ODA_FOCUS );
191         break;
192
193     case WM_SYSCOLORCHANGE:
194         InvalidateRect32( hWnd, NULL, FALSE );
195         break;
196
197     case BM_SETSTYLE16:
198     case BM_SETSTYLE32:
199         if ((wParam & 0x0f) >= MAX_BTN_TYPE) break;
200         wndPtr->dwStyle = (wndPtr->dwStyle & 0xfffffff0) 
201                            | (wParam & 0x0000000f);
202         style = wndPtr->dwStyle & 0x0000000f;
203         PAINT_BUTTON( wndPtr, style, ODA_DRAWENTIRE );
204         break;
205
206     case BM_GETCHECK16:
207     case BM_GETCHECK32:
208         return infoPtr->state & 3;
209
210     case BM_SETCHECK16:
211     case BM_SETCHECK32:
212         if (wParam > maxCheckState[style]) wParam = maxCheckState[style];
213         if ((infoPtr->state & 3) != wParam)
214         {
215             infoPtr->state = (infoPtr->state & ~3) | wParam;
216             PAINT_BUTTON( wndPtr, style, ODA_SELECT );
217         }
218         if ((style == BS_AUTORADIOBUTTON) && (wParam == BUTTON_CHECKED))
219             BUTTON_CheckAutoRadioButton( wndPtr );
220         break;
221
222     case BM_GETSTATE16:
223     case BM_GETSTATE32:
224         return infoPtr->state;
225
226     case BM_SETSTATE16:
227     case BM_SETSTATE32:
228         if (wParam)
229         {
230             if (infoPtr->state & BUTTON_HIGHLIGHTED) break;
231             infoPtr->state |= BUTTON_HIGHLIGHTED;
232         }
233         else
234         {
235             if (!(infoPtr->state & BUTTON_HIGHLIGHTED)) break;
236             infoPtr->state &= ~BUTTON_HIGHLIGHTED;
237         }
238         PAINT_BUTTON( wndPtr, style, ODA_SELECT );
239         break;
240
241     default:
242         return DefWindowProc32A(hWnd, uMsg, wParam, lParam);
243     }
244     return 0;
245 }
246
247
248 /**********************************************************************
249  *       Push Button Functions
250  */
251
252 static void PB_Paint( WND *wndPtr, HDC hDC, WORD action )
253 {
254     RECT16 rc;
255     HPEN16 hOldPen;
256     HBRUSH hOldBrush;
257     DWORD dwTextSize;
258     TEXTMETRIC tm;
259     BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra;
260
261     GetClientRect16(wndPtr->hwndSelf, &rc);
262
263       /* Send WM_CTLCOLOR to allow changing the font (the colors are fixed) */
264     if (infoPtr->hFont) SelectObject( hDC, infoPtr->hFont );
265     BUTTON_SEND_CTLCOLOR( wndPtr, hDC );
266     hOldPen = (HPEN16)SelectObject(hDC, sysColorObjects.hpenWindowFrame);
267     hOldBrush = (HBRUSH)SelectObject(hDC, sysColorObjects.hbrushBtnFace);
268     SetBkMode(hDC, TRANSPARENT);
269     Rectangle(hDC, rc.left, rc.top, rc.right, rc.bottom);
270     if (action == ODA_DRAWENTIRE)
271     {
272         SetPixel( hDC, rc.left, rc.top, GetSysColor(COLOR_WINDOW) );
273         SetPixel( hDC, rc.left, rc.bottom-1, GetSysColor(COLOR_WINDOW) );
274         SetPixel( hDC, rc.right-1, rc.top, GetSysColor(COLOR_WINDOW) );
275         SetPixel( hDC, rc.right-1, rc.bottom-1, GetSysColor(COLOR_WINDOW) );
276     }
277     InflateRect16( &rc, -1, -1 );
278
279     if ((wndPtr->dwStyle & 0x000f) == BS_DEFPUSHBUTTON)
280     {
281         Rectangle(hDC, rc.left, rc.top, rc.right, rc.bottom);
282         InflateRect16( &rc, -1, -1 );
283     }
284
285     if (infoPtr->state & BUTTON_HIGHLIGHTED)
286     {
287         /* draw button shadow: */
288         SelectObject(hDC, sysColorObjects.hbrushBtnShadow );
289         PatBlt(hDC, rc.left, rc.top, 1, rc.bottom-rc.top, PATCOPY );
290         PatBlt(hDC, rc.left, rc.top, rc.right-rc.left, 1, PATCOPY );
291         rc.left += 2;  /* To position the text down and right */
292         rc.top  += 2;
293     }
294     else GRAPH_DrawReliefRect( hDC, &rc, 2, 2, FALSE );
295     
296     /* draw button label, if any: */
297     if (wndPtr->text && wndPtr->text[0])
298     {
299      LOGBRUSH lb;
300      GetObject(sysColorObjects.hbrushBtnFace,sizeof(LOGBRUSH),(LPSTR)&lb);
301      if (wndPtr->dwStyle & WS_DISABLED &&
302          GetSysColor(COLOR_GRAYTEXT)==lb.lbColor)
303          /* don't write gray text on gray bkg */
304          PB_PaintGrayOnGray(hDC,infoPtr->hFont,&rc,wndPtr->text);
305      else
306      {
307         SetTextColor( hDC, (wndPtr->dwStyle & WS_DISABLED) ?
308                      GetSysColor(COLOR_GRAYTEXT) : GetSysColor(COLOR_BTNTEXT));
309         DrawText16( hDC, wndPtr->text, -1, &rc,
310                     DT_SINGLELINE | DT_CENTER | DT_VCENTER );
311         /* do we have the focus? */
312         if (infoPtr->state & BUTTON_HASFOCUS)
313         {
314             short xdelta, ydelta;
315             dwTextSize = GetTextExtent(hDC,wndPtr->text,strlen(wndPtr->text));
316             GetTextMetrics( hDC, &tm );
317             xdelta = ((rc.right - rc.left) - LOWORD(dwTextSize) - 1) / 2;
318             ydelta = ((rc.bottom - rc.top) - tm.tmHeight - 1) / 2;
319             if (xdelta < 0) xdelta = 0;
320             if (ydelta < 0) ydelta = 0;
321             InflateRect16( &rc, -xdelta, -ydelta );
322             DrawFocusRect16( hDC, &rc );
323         }
324      }   
325     }
326
327     SelectObject( hDC, hOldPen );
328     SelectObject( hDC, hOldBrush );
329 }
330
331
332 /**********************************************************************
333  *   Push Button sub function                               [internal]
334  *   using a raster brush to avoid gray text on gray background
335  */
336
337 void PB_PaintGrayOnGray(HDC hDC,HFONT hFont,RECT16 *rc,char *text)
338 {
339     static int Pattern[] = {0xAA,0x55,0xAA,0x55,0xAA,0x55,0xAA,0x55};
340     HBITMAP hbm  = CreateBitmap(8, 8, 1, 1, Pattern);
341     HDC hdcMem   = CreateCompatibleDC(hDC);
342     HBITMAP hbmMem;
343     HBRUSH hBr;
344     RECT16 rect,rc2;
345
346     rect=*rc;
347     DrawText16( hDC, text, -1, &rect, DT_SINGLELINE | DT_CALCRECT);
348     rc2=rect;
349     rect.left=(rc->right-rect.right)/2;       /* for centering text bitmap */
350     rect.top=(rc->bottom-rect.bottom)/2;
351     hbmMem = CreateCompatibleBitmap( hDC,rect.right,rect.bottom);
352     SelectObject( hdcMem, hbmMem);
353     hBr = SelectObject( hdcMem,CreatePatternBrush(hbm));
354     DeleteObject( hbm);
355     PatBlt( hdcMem,0,0,rect.right,rect.bottom,WHITENESS);
356     if (hFont) SelectObject( hdcMem, hFont);
357     DrawText16( hdcMem, text, -1, &rc2, DT_SINGLELINE);  
358     PatBlt( hdcMem,0,0,rect.right,rect.bottom,0xFA0089);
359     DeleteObject( SelectObject( hdcMem,hBr));
360     BitBlt( hDC,rect.left,rect.top,rect.right,rect.bottom,hdcMem,0,0,0x990000);
361     DeleteDC( hdcMem);
362     DeleteObject( hbmMem);
363 }
364
365
366 /**********************************************************************
367  *       Check Box & Radio Button Functions
368  */
369
370 static void CB_Paint( WND *wndPtr, HDC hDC, WORD action )
371 {
372     RECT16 rc;
373     HBRUSH hBrush;
374     int textlen, delta, x, y;
375     TEXTMETRIC tm;
376     SIZE16 size;
377     BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra;
378
379     GetClientRect16(wndPtr->hwndSelf, &rc);
380
381     if (infoPtr->hFont) SelectObject( hDC, infoPtr->hFont );
382     hBrush = BUTTON_SEND_CTLCOLOR( wndPtr, hDC );
383     if (action == ODA_DRAWENTIRE) FillRect16( hDC, &rc, hBrush );
384
385     GetTextMetrics(hDC, &tm);
386     delta = (rc.bottom - rc.top - tm.tmHeight) >> 1;
387
388       /* Draw the check-box bitmap */
389     x = y = 0;
390     if (infoPtr->state & BUTTON_HIGHLIGHTED) x += 2 * checkBoxWidth;
391     if (infoPtr->state & (BUTTON_CHECKED | BUTTON_3STATE)) x += checkBoxWidth;
392     if (((wndPtr->dwStyle & 0x0f) == BS_RADIOBUTTON) ||
393         ((wndPtr->dwStyle & 0x0f) == BS_AUTORADIOBUTTON)) y += checkBoxHeight;
394     else if (infoPtr->state & BUTTON_3STATE) y += 2 * checkBoxHeight;
395     GRAPH_DrawBitmap( hDC, hbitmapCheckBoxes, rc.left, rc.top + delta,
396                       x, y, checkBoxWidth, checkBoxHeight );
397     rc.left += checkBoxWidth + tm.tmAveCharWidth / 2;
398
399     if (!wndPtr->text) return;
400     textlen = strlen( wndPtr->text );
401
402     if (action == ODA_DRAWENTIRE)
403     {
404         if (wndPtr->dwStyle & WS_DISABLED)
405             SetTextColor( hDC, GetSysColor(COLOR_GRAYTEXT) );
406         DrawText16( hDC, wndPtr->text, textlen, &rc,
407                     DT_SINGLELINE | DT_VCENTER );
408     }
409     
410     if ((action == ODA_FOCUS) ||
411         ((action == ODA_DRAWENTIRE) && (infoPtr->state & BUTTON_HASFOCUS)))
412     {
413         GetTextExtentPoint16( hDC, wndPtr->text, textlen, &size );
414         if (delta > 1)
415         {
416             rc.top += delta - 1;
417             rc.bottom -= delta + 1;
418         }
419         rc.left--;
420         rc.right = MIN( rc.left + size.cx + 2, rc.right );
421         DrawFocusRect16( hDC, &rc );
422     }
423 }
424
425
426 /**********************************************************************
427  *       BUTTON_CheckAutoRadioButton
428  *
429  * wndPtr is checked, uncheck everything else in group
430  */
431 static void BUTTON_CheckAutoRadioButton( WND *wndPtr )
432 {
433     HWND parent, sibling;
434     if (!(wndPtr->dwStyle & WS_CHILD)) return;
435     parent = wndPtr->parent->hwndSelf;
436     for(sibling = GetNextDlgGroupItem(parent,wndPtr->hwndSelf,FALSE);
437         sibling != wndPtr->hwndSelf;
438         sibling = GetNextDlgGroupItem(parent,sibling,FALSE))
439             SendMessage32A( sibling, BM_SETCHECK32, BUTTON_UNCHECKED, 0 );
440 }
441
442
443 /**********************************************************************
444  *       Group Box Functions
445  */
446
447 static void GB_Paint( WND *wndPtr, HDC hDC, WORD action )
448 {
449     RECT16 rc;
450     SIZE16 size;
451     BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra;
452
453     if (action != ODA_DRAWENTIRE) return;
454
455     if (infoPtr->hFont) SelectObject( hDC, infoPtr->hFont );
456     BUTTON_SEND_CTLCOLOR( wndPtr, hDC );
457     SelectObject( hDC, sysColorObjects.hpenWindowFrame );
458
459     GetClientRect16( wndPtr->hwndSelf, &rc);
460
461     MoveTo( hDC, rc.left, rc.top+2 );
462     LineTo( hDC, rc.right-1, rc.top+2 );
463     LineTo( hDC, rc.right-1, rc.bottom-1 );
464     LineTo( hDC, rc.left, rc.bottom-1 );
465     LineTo( hDC, rc.left, rc.top+2 );
466
467     if (!wndPtr->text) return;
468     GetTextExtentPoint16( hDC, wndPtr->text, strlen(wndPtr->text), &size );
469     rc.left  += 10;
470     rc.right  = rc.left + size.cx + 1;
471     rc.bottom = size.cy;
472     if (wndPtr->dwStyle & WS_DISABLED)
473         SetTextColor( hDC, GetSysColor(COLOR_GRAYTEXT) );
474     DrawText16( hDC, wndPtr->text, -1, &rc, DT_SINGLELINE );
475 }
476
477
478 /**********************************************************************
479  *       User Button Functions
480  */
481
482 static void UB_Paint( WND *wndPtr, HDC hDC, WORD action )
483 {
484     RECT16 rc;
485     HBRUSH hBrush;
486     BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra;
487
488     if (action == ODA_SELECT) return;
489
490     GetClientRect16( wndPtr->hwndSelf, &rc);
491
492     if (infoPtr->hFont) SelectObject( hDC, infoPtr->hFont );
493     hBrush = BUTTON_SEND_CTLCOLOR( wndPtr, hDC );
494     FillRect16( hDC, &rc, hBrush );
495
496     if ((action == ODA_FOCUS) ||
497         ((action == ODA_DRAWENTIRE) && (infoPtr->state & BUTTON_HASFOCUS)))
498         DrawFocusRect16( hDC, &rc );
499 }
500
501
502 /**********************************************************************
503  *       Ownerdrawn Button Functions
504  */
505
506 static void OB_Paint( WND *wndPtr, HDC hDC, WORD action )
507 {
508     BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra;
509     DRAWITEMSTRUCT32 dis;
510
511     dis.CtlType    = ODT_BUTTON;
512     dis.CtlID      = wndPtr->wIDmenu;
513     dis.itemID     = 0;
514     dis.itemAction = action;
515     dis.itemState  = (infoPtr->state & BUTTON_HASFOCUS) ? ODS_FOCUS : 0 |
516                      (infoPtr->state & BUTTON_HIGHLIGHTED) ? ODS_SELECTED : 0 |
517                      (wndPtr->dwStyle & WS_DISABLED) ? ODS_DISABLED : 0;
518     dis.hwndItem   = wndPtr->hwndSelf;
519     dis.hDC        = hDC;
520     dis.itemData   = 0;
521     GetClientRect32( wndPtr->hwndSelf, &dis.rcItem );
522     SendMessage32A( GetParent(wndPtr->hwndSelf), WM_DRAWITEM, 1, (LPARAM)&dis);
523 }