2 * Default window procedure
4 * Copyright 1993, 1996 Alexandre Julliard
14 #include "nonclient.h"
17 #include "debugtools.h"
24 #include "wine/unicode.h"
25 #include "wine/winuser16.h"
27 DEFAULT_DEBUG_CHANNEL(win
);
29 /* bits in the dwKeyData */
30 #define KEYDATA_ALT 0x2000
31 #define KEYDATA_PREVSTATE 0x4000
33 static short iF10Key
= 0;
34 static short iMenuSysKey
= 0;
36 /***********************************************************************
37 * DEFWND_HandleWindowPosChanged
39 * Handle the WM_WINDOWPOSCHANGED message.
41 static void DEFWND_HandleWindowPosChanged( WND
*wndPtr
, UINT flags
)
43 WPARAM16 wp
= SIZE_RESTORED
;
45 if (!(flags
& SWP_NOCLIENTMOVE
))
46 SendMessage16( wndPtr
->hwndSelf
, WM_MOVE
, 0,
47 MAKELONG(wndPtr
->rectClient
.left
, wndPtr
->rectClient
.top
));
48 if (!(flags
& SWP_NOCLIENTSIZE
))
50 if (wndPtr
->dwStyle
& WS_MAXIMIZE
) wp
= SIZE_MAXIMIZED
;
51 else if (wndPtr
->dwStyle
& WS_MINIMIZE
) wp
= SIZE_MINIMIZED
;
53 SendMessage16( wndPtr
->hwndSelf
, WM_SIZE
, wp
,
54 MAKELONG(wndPtr
->rectClient
.right
-wndPtr
->rectClient
.left
,
55 wndPtr
->rectClient
.bottom
-wndPtr
->rectClient
.top
));
60 /***********************************************************************
63 * Set the window text.
65 void DEFWND_SetTextA( WND
*wndPtr
, LPCSTR text
)
70 count
= MultiByteToWideChar( CP_ACP
, 0, text
, -1, NULL
, 0 );
72 if (wndPtr
->text
) HeapFree(SystemHeap
, 0, wndPtr
->text
);
73 if ((wndPtr
->text
= HeapAlloc(SystemHeap
, 0, count
* sizeof(WCHAR
))))
74 MultiByteToWideChar( CP_ACP
, 0, text
, -1, wndPtr
->text
, count
);
76 ERR("Not enough memory for window text");
78 wndPtr
->pDriver
->pSetText(wndPtr
, wndPtr
->text
);
81 /***********************************************************************
84 * Set the window text.
86 void DEFWND_SetTextW( WND
*wndPtr
, LPCWSTR text
)
88 static const WCHAR empty_string
[] = {0};
91 if (!text
) text
= empty_string
;
92 count
= strlenW(text
) + 1;
94 if (wndPtr
->text
) HeapFree(SystemHeap
, 0, wndPtr
->text
);
95 if ((wndPtr
->text
= HeapAlloc(SystemHeap
, 0, count
* sizeof(WCHAR
))))
96 lstrcpyW( wndPtr
->text
, text
);
98 ERR("Not enough memory for window text");
100 wndPtr
->pDriver
->pSetText(wndPtr
, wndPtr
->text
);
103 /***********************************************************************
104 * DEFWND_ControlColor
106 * Default colors for control painting.
108 HBRUSH
DEFWND_ControlColor( HDC hDC
, UINT16 ctlType
)
110 if( ctlType
== CTLCOLOR_SCROLLBAR
)
112 HBRUSH hb
= GetSysColorBrush(COLOR_SCROLLBAR
);
113 if (TWEAK_WineLook
== WIN31_LOOK
) {
114 SetTextColor( hDC
, RGB(0, 0, 0) );
115 SetBkColor( hDC
, RGB(255, 255, 255) );
117 COLORREF bk
= GetSysColor(COLOR_3DHILIGHT
);
118 SetTextColor( hDC
, GetSysColor(COLOR_3DFACE
));
119 SetBkColor( hDC
, bk
);
121 /* if COLOR_WINDOW happens to be the same as COLOR_3DHILIGHT
122 * we better use 0x55aa bitmap brush to make scrollbar's background
123 * look different from the window background.
125 if (bk
== GetSysColor(COLOR_WINDOW
)) {
126 return CACHE_GetPattern55AABrush();
129 UnrealizeObject( hb
);
133 SetTextColor( hDC
, GetSysColor(COLOR_WINDOWTEXT
));
135 if (TWEAK_WineLook
> WIN31_LOOK
) {
136 if ((ctlType
== CTLCOLOR_EDIT
) || (ctlType
== CTLCOLOR_LISTBOX
))
137 SetBkColor( hDC
, GetSysColor(COLOR_WINDOW
) );
139 SetBkColor( hDC
, GetSysColor(COLOR_3DFACE
) );
140 return GetSysColorBrush(COLOR_3DFACE
);
144 SetBkColor( hDC
, GetSysColor(COLOR_WINDOW
) );
145 return GetSysColorBrush(COLOR_WINDOW
);
149 /***********************************************************************
152 static void DEFWND_SetRedraw( WND
* wndPtr
, WPARAM wParam
)
154 BOOL bVisible
= wndPtr
->dwStyle
& WS_VISIBLE
;
156 TRACE("%04x %i\n", wndPtr
->hwndSelf
, (wParam
!=0) );
162 wndPtr
->dwStyle
|= WS_VISIBLE
;
163 DCE_InvalidateDCE( wndPtr
, &wndPtr
->rectWindow
);
168 if( wndPtr
->dwStyle
& WS_MINIMIZE
) wParam
= RDW_VALIDATE
;
169 else wParam
= RDW_ALLCHILDREN
| RDW_VALIDATE
;
171 PAINT_RedrawWindow( wndPtr
->hwndSelf
, NULL
, 0, wParam
, 0 );
172 DCE_InvalidateDCE( wndPtr
, &wndPtr
->rectWindow
);
173 wndPtr
->dwStyle
&= ~WS_VISIBLE
;
177 /***********************************************************************
180 * This method handles the default behavior for the WM_PRINT message.
182 static void DEFWND_Print(
190 if ( (uFlags
& PRF_CHECKVISIBLE
) &&
191 !IsWindowVisible(wndPtr
->hwndSelf
) )
195 * Unimplemented flags.
197 if ( (uFlags
& PRF_CHILDREN
) ||
198 (uFlags
& PRF_OWNED
) ||
199 (uFlags
& PRF_NONCLIENT
) )
201 WARN("WM_PRINT message with unsupported flags\n");
207 if ( uFlags
& PRF_ERASEBKGND
)
208 SendMessageA(wndPtr
->hwndSelf
, WM_ERASEBKGND
, (WPARAM
)hdc
, 0);
213 if ( uFlags
& PRF_CLIENT
)
214 SendMessageA(wndPtr
->hwndSelf
, WM_PRINTCLIENT
, (WPARAM
)hdc
, PRF_CLIENT
);
217 /***********************************************************************
220 * Default window procedure for messages that are the same in Win16 and Win32.
222 static LRESULT
DEFWND_DefWinProc( WND
*wndPtr
, UINT msg
, WPARAM wParam
,
228 return NC_HandleNCPaint( wndPtr
->hwndSelf
, (HRGN
)wParam
);
231 return NC_HandleNCHitTest( wndPtr
->hwndSelf
, MAKEPOINT16(lParam
) );
233 case WM_NCLBUTTONDOWN
:
234 return NC_HandleNCLButtonDown( wndPtr
, wParam
, lParam
);
236 case WM_LBUTTONDBLCLK
:
237 case WM_NCLBUTTONDBLCLK
:
238 return NC_HandleNCLButtonDblClk( wndPtr
, wParam
, lParam
);
242 if ((wndPtr
->flags
& WIN_ISWIN32
) || (TWEAK_WineLook
> WIN31_LOOK
))
244 ClientToScreen16(wndPtr
->hwndSelf
, (LPPOINT16
)&lParam
);
245 SendMessageA( wndPtr
->hwndSelf
, WM_CONTEXTMENU
,
246 wndPtr
->hwndSelf
, lParam
);
251 if( wndPtr
->dwStyle
& WS_CHILD
)
252 SendMessageA( wndPtr
->parent
->hwndSelf
, msg
, wParam
, lParam
);
253 else if (wndPtr
->hSysMenu
)
256 POINT16 pt
= MAKEPOINT16(lParam
);
258 ScreenToClient16(wndPtr
->hwndSelf
, &pt
);
259 hitcode
= NC_HandleNCHitTest(wndPtr
->hwndSelf
, pt
);
261 /* Track system popup if click was in the caption area. */
262 if (hitcode
==HTCAPTION
|| hitcode
==HTSYSMENU
)
263 TrackPopupMenu(GetSystemMenu(wndPtr
->hwndSelf
, FALSE
),
264 TPM_LEFTBUTTON
| TPM_RIGHTBUTTON
,
265 pt
.x
, pt
.y
, 0, wndPtr
->hwndSelf
, NULL
);
270 return NC_HandleNCActivate( wndPtr
, wParam
);
273 if (wndPtr
->text
) HeapFree( SystemHeap
, 0, wndPtr
->text
);
275 if (wndPtr
->pVScroll
) HeapFree( SystemHeap
, 0, wndPtr
->pVScroll
);
276 if (wndPtr
->pHScroll
) HeapFree( SystemHeap
, 0, wndPtr
->pHScroll
);
277 wndPtr
->pVScroll
= wndPtr
->pHScroll
= NULL
;
281 DEFWND_Print(wndPtr
, (HDC
)wParam
, lParam
);
288 HDC16 hdc
= BeginPaint16( wndPtr
->hwndSelf
, &ps
);
291 if( (wndPtr
->dwStyle
& WS_MINIMIZE
) && wndPtr
->class->hIcon
)
293 int x
= (wndPtr
->rectWindow
.right
- wndPtr
->rectWindow
.left
-
294 GetSystemMetrics(SM_CXICON
))/2;
295 int y
= (wndPtr
->rectWindow
.bottom
- wndPtr
->rectWindow
.top
-
296 GetSystemMetrics(SM_CYICON
))/2;
297 TRACE("Painting class icon: vis rect=(%i,%i - %i,%i)\n",
298 ps
.rcPaint
.left
, ps
.rcPaint
.top
, ps
.rcPaint
.right
, ps
.rcPaint
.bottom
);
299 DrawIcon( hdc
, x
, y
, wndPtr
->class->hIcon
);
301 EndPaint16( wndPtr
->hwndSelf
, &ps
);
307 if (wndPtr
->hrgnUpdate
)
309 RedrawWindow ( wndPtr
->hwndSelf
, 0, wndPtr
->hrgnUpdate
,
310 RDW_ERASENOW
| RDW_ERASE
| RDW_FRAME
| RDW_ALLCHILDREN
);
315 DEFWND_SetRedraw( wndPtr
, wParam
);
319 DestroyWindow( wndPtr
->hwndSelf
);
322 case WM_MOUSEACTIVATE
:
323 if (wndPtr
->dwStyle
& WS_CHILD
)
325 LONG ret
= SendMessage16( wndPtr
->parent
->hwndSelf
,
326 WM_MOUSEACTIVATE
, wParam
, lParam
);
330 /* Caption clicks are handled by the NC_HandleNCLButtonDown() */
331 return (LOWORD(lParam
) >= HTCLIENT
) ? MA_ACTIVATE
: MA_NOACTIVATE
;
334 /* The default action in Windows is to set the keyboard focus to
335 * the window, if it's being activated and not minimized */
336 if (LOWORD(wParam
) != WA_INACTIVE
) {
337 if (!(wndPtr
->dwStyle
& WS_MINIMIZE
))
338 SetFocus(wndPtr
->hwndSelf
);
343 if (wndPtr
->dwStyle
& WS_CHILD
)
345 return SendMessageA( wndPtr
->parent
->hwndSelf
,
346 WM_MOUSEWHEEL
, wParam
, lParam
);
351 case WM_ICONERASEBKGND
:
355 if (!wndPtr
->class->hbrBackground
) return 0;
357 /* Since WM_ERASEBKGND may receive either a window dc or a */
358 /* client dc, the area to be erased has to be retrieved from */
359 /* the device context. */
360 GetClipBox( (HDC
)wParam
, &rect
);
362 /* Always call the Win32 variant of FillRect even on Win16,
363 * since despite the fact that Win16, as well as Win32,
364 * supports special background brushes for a window class,
365 * the Win16 variant of FillRect does not.
367 FillRect( (HDC
) wParam
, &rect
, wndPtr
->class->hbrBackground
);
374 case WM_CTLCOLORMSGBOX
:
375 case WM_CTLCOLOREDIT
:
376 case WM_CTLCOLORLISTBOX
:
379 case WM_CTLCOLORSTATIC
:
380 case WM_CTLCOLORSCROLLBAR
:
381 return (LRESULT
)DEFWND_ControlColor( (HDC
)wParam
, msg
- WM_CTLCOLORMSGBOX
);
384 return (LRESULT
)DEFWND_ControlColor( (HDC
)wParam
, HIWORD(lParam
) );
386 case WM_GETTEXTLENGTH
:
387 if (wndPtr
->text
) return (LRESULT
)strlenW(wndPtr
->text
);
391 if (wndPtr
->dwStyle
& WS_CHILD
)
392 if (SendMessage16(wndPtr
->parent
->hwndSelf
, WM_SETCURSOR
,
395 return NC_HandleSetCursor( wndPtr
->hwndSelf
, wParam
, lParam
);
398 return NC_HandleSysCommand( wndPtr
->hwndSelf
, wParam
,
399 MAKEPOINT16(lParam
) );
402 if(wParam
== VK_F10
) iF10Key
= VK_F10
;
406 if( HIWORD(lParam
) & KEYDATA_ALT
)
408 /* if( HIWORD(lParam) & ~KEYDATA_PREVSTATE ) */
409 if( wParam
== VK_MENU
&& !iMenuSysKey
)
416 if( wParam
== VK_F4
) /* try to close the window */
418 HWND hWnd
= WIN_GetTopParent( wndPtr
->hwndSelf
);
419 wndPtr
= WIN_FindWndPtr( hWnd
);
420 if( wndPtr
&& !(wndPtr
->class->style
& CS_NOCLOSE
) )
421 PostMessage16( hWnd
, WM_SYSCOMMAND
, SC_CLOSE
, 0 );
422 WIN_ReleaseWndPtr(wndPtr
);
425 else if( wParam
== VK_F10
)
428 if( wParam
== VK_ESCAPE
&& (GetKeyState(VK_SHIFT
) & 0x8000))
429 SendMessage16( wndPtr
->hwndSelf
, WM_SYSCOMMAND
,
430 (WPARAM16
)SC_KEYMENU
, (LPARAM
)VK_SPACE
);
435 /* Press and release F10 or ALT */
436 if (((wParam
== VK_MENU
) && iMenuSysKey
) ||
437 ((wParam
== VK_F10
) && iF10Key
))
438 SendMessage16( WIN_GetTopParent(wndPtr
->hwndSelf
),
439 WM_SYSCOMMAND
, SC_KEYMENU
, 0L );
440 iMenuSysKey
= iF10Key
= 0;
445 if (wParam
== VK_RETURN
&& (wndPtr
->dwStyle
& WS_MINIMIZE
))
447 PostMessage16( wndPtr
->hwndSelf
, WM_SYSCOMMAND
,
448 (WPARAM16
)SC_RESTORE
, 0L );
451 if ((HIWORD(lParam
) & KEYDATA_ALT
) && wParam
)
453 if (wParam
== VK_TAB
|| wParam
== VK_ESCAPE
) break;
454 if (wParam
== VK_SPACE
&& (wndPtr
->dwStyle
& WS_CHILD
))
455 SendMessage16( wndPtr
->parent
->hwndSelf
, msg
, wParam
, lParam
);
457 SendMessage16( wndPtr
->hwndSelf
, WM_SYSCOMMAND
,
458 (WPARAM16
)SC_KEYMENU
, (LPARAM
)(DWORD
)wParam
);
460 else /* check for Ctrl-Esc */
461 if (wParam
!= VK_ESCAPE
) MessageBeep(0);
465 if (!lParam
) return 0; /* sent from ShowWindow */
466 if (!(wndPtr
->dwStyle
& WS_POPUP
) || !wndPtr
->owner
) return 0;
467 if ((wndPtr
->dwStyle
& WS_VISIBLE
) && wParam
) return 0;
468 else if (!(wndPtr
->dwStyle
& WS_VISIBLE
) && !wParam
) return 0;
469 ShowWindow( wndPtr
->hwndSelf
, wParam
? SW_SHOWNOACTIVATE
: SW_HIDE
);
473 if (wndPtr
->parent
== WIN_GetDesktop()) EndMenu();
474 if (GetCapture() == wndPtr
->hwndSelf
) ReleaseCapture();
475 WIN_ReleaseDesktop();
485 case WM_QUERYDROPOBJECT
:
486 if (wndPtr
->dwExStyle
& WS_EX_ACCEPTFILES
) return 1;
489 case WM_QUERYDRAGICON
:
494 if( (hIcon
=wndPtr
->class->hCursor
) ) return (LRESULT
)hIcon
;
495 for(len
=1; len
<64; len
++)
496 if((hIcon
=LoadIcon16(wndPtr
->hInstance
,MAKEINTRESOURCE16(len
))))
497 return (LRESULT
)hIcon
;
498 return (LRESULT
)LoadIcon16(0,IDI_APPLICATION16
);
502 case WM_ISACTIVEICON
:
503 return ((wndPtr
->flags
& WIN_NCACTIVATED
) != 0);
505 case WM_NOTIFYFORMAT
:
506 if (IsWindowUnicode(wndPtr
->hwndSelf
)) return NFR_UNICODE
;
507 else return NFR_ANSI
;
510 case WM_QUERYENDSESSION
:
515 int index
= (wParam
!= ICON_SMALL
) ? GCL_HICON
: GCL_HICONSM
;
516 HICON16 hOldIcon
= GetClassLongA(wndPtr
->hwndSelf
, index
);
517 SetClassLongA(wndPtr
->hwndSelf
, index
, lParam
);
519 SetWindowPos(wndPtr
->hwndSelf
, 0, 0, 0, 0, 0, SWP_FRAMECHANGED
520 | SWP_NOSIZE
| SWP_NOMOVE
| SWP_NOACTIVATE
523 if( wndPtr
->flags
& WIN_NATIVE
)
524 wndPtr
->pDriver
->pSetHostAttr(wndPtr
, HAK_ICONS
, 0);
531 int index
= (wParam
!= ICON_SMALL
) ? GCL_HICON
: GCL_HICONSM
;
532 return GetClassLongA(wndPtr
->hwndSelf
, index
);
536 SendMessageA( wndPtr
->parent
->hwndSelf
, msg
, wParam
, lParam
);
545 /***********************************************************************
546 * DefWindowProc16 (USER.107)
548 LRESULT WINAPI
DefWindowProc16( HWND16 hwnd
, UINT16 msg
, WPARAM16 wParam
,
551 WND
* wndPtr
= WIN_FindWndPtr( hwnd
);
554 if (!wndPtr
) return 0;
555 SPY_EnterMessage( SPY_DEFWNDPROC16
, hwnd
, msg
, wParam
, lParam
);
561 CREATESTRUCT16
*cs
= (CREATESTRUCT16
*)PTR_SEG_TO_LIN(lParam
);
563 DEFWND_SetTextA( wndPtr
, (LPCSTR
)PTR_SEG_TO_LIN(cs
->lpszName
) );
571 CONV_RECT16TO32( (RECT16
*)PTR_SEG_TO_LIN(lParam
), &rect32
);
572 result
= NC_HandleNCCalcSize( wndPtr
, &rect32
);
573 CONV_RECT32TO16( &rect32
, (RECT16
*)PTR_SEG_TO_LIN(lParam
) );
577 case WM_WINDOWPOSCHANGING
:
578 result
= WINPOS_HandleWindowPosChanging16( wndPtr
,
579 (WINDOWPOS16
*)PTR_SEG_TO_LIN(lParam
) );
582 case WM_WINDOWPOSCHANGED
:
584 WINDOWPOS16
* winPos
= (WINDOWPOS16
*)PTR_SEG_TO_LIN(lParam
);
585 DEFWND_HandleWindowPosChanged( wndPtr
, winPos
->flags
);
590 if (wParam
&& wndPtr
->text
)
592 lstrcpynWtoA( (LPSTR
)PTR_SEG_TO_LIN(lParam
), wndPtr
->text
, wParam
);
593 result
= (LRESULT
)strlen( (LPSTR
)PTR_SEG_TO_LIN(lParam
) );
598 DEFWND_SetTextA( wndPtr
, (LPCSTR
)PTR_SEG_TO_LIN(lParam
) );
599 if( wndPtr
->dwStyle
& WS_CAPTION
) NC_HandleNCPaint( hwnd
, (HRGN
)1 );
603 result
= DEFWND_DefWinProc( wndPtr
, msg
, wParam
, lParam
);
607 WIN_ReleaseWndPtr(wndPtr
);
608 SPY_ExitMessage( SPY_RESULT_DEFWND16
, hwnd
, msg
, result
);
613 /***********************************************************************
614 * DefWindowProcA [USER32.126]
617 LRESULT WINAPI
DefWindowProcA( HWND hwnd
, UINT msg
, WPARAM wParam
,
620 WND
* wndPtr
= WIN_FindWndPtr( hwnd
);
623 if (!wndPtr
) return 0;
624 SPY_EnterMessage( SPY_DEFWNDPROC
, hwnd
, msg
, wParam
, lParam
);
630 CREATESTRUCTA
*cs
= (CREATESTRUCTA
*)lParam
;
631 if (cs
->lpszName
) DEFWND_SetTextA( wndPtr
, cs
->lpszName
);
637 result
= NC_HandleNCCalcSize( wndPtr
, (RECT
*)lParam
);
640 case WM_WINDOWPOSCHANGING
:
641 result
= WINPOS_HandleWindowPosChanging( wndPtr
,
642 (WINDOWPOS
*)lParam
);
645 case WM_WINDOWPOSCHANGED
:
647 WINDOWPOS
* winPos
= (WINDOWPOS
*)lParam
;
648 DEFWND_HandleWindowPosChanged( wndPtr
, winPos
->flags
);
653 if (wParam
&& wndPtr
->text
)
655 lstrcpynWtoA( (LPSTR
)lParam
, wndPtr
->text
, wParam
);
656 result
= (LRESULT
)strlen( (LPSTR
)lParam
);
661 DEFWND_SetTextA( wndPtr
, (LPCSTR
)lParam
);
662 NC_HandleNCPaint( hwnd
, (HRGN
)1 ); /* Repaint caption */
666 result
= DEFWND_DefWinProc( wndPtr
, msg
, wParam
, lParam
);
670 WIN_ReleaseWndPtr(wndPtr
);
671 SPY_ExitMessage( SPY_RESULT_DEFWND
, hwnd
, msg
, result
);
676 /***********************************************************************
677 * DefWindowProcW [USER32.127] Calls default window message handler
679 * Calls default window procedure for messages not processed
683 * Return value is dependent upon the message.
685 LRESULT WINAPI
DefWindowProcW(
686 HWND hwnd
, /* [in] window procedure recieving message */
687 UINT msg
, /* [in] message identifier */
688 WPARAM wParam
, /* [in] first message parameter */
689 LPARAM lParam
) /* [in] second message parameter */
691 WND
* wndPtr
= WIN_FindWndPtr( hwnd
);
694 if (!wndPtr
) return 0;
699 CREATESTRUCTW
*cs
= (CREATESTRUCTW
*)lParam
;
700 if (cs
->lpszName
) DEFWND_SetTextW( wndPtr
, cs
->lpszName
);
706 if (wParam
&& wndPtr
->text
)
708 lstrcpynW( (LPWSTR
)lParam
, wndPtr
->text
, wParam
);
709 result
= strlenW( (LPWSTR
)lParam
);
714 DEFWND_SetTextW( wndPtr
, (LPCWSTR
)lParam
);
715 NC_HandleNCPaint( hwnd
, (HRGN
)1 ); /* Repaint caption */
719 result
= DefWindowProcA( hwnd
, msg
, wParam
, lParam
);
722 WIN_ReleaseWndPtr(wndPtr
);