4 * Copyright 1993 David Metcalfe
5 * 1994 Alexandre Julliard
12 #include "wine/winuser16.h"
19 #include "debugtools.h"
21 DEFAULT_DEBUG_CHANNEL(win
);
24 /*****************************************************************
26 * pMsgQ is the queue whose perQData focus is to be modified
28 void FOCUS_SwitchFocus( MESSAGEQUEUE
*pMsgQ
, HWND hFocusFrom
, HWND hFocusTo
)
30 PERQDATA_SetFocusWnd( pMsgQ
->pQData
, hFocusTo
);
32 if (hFocusFrom
) SendMessageA( hFocusFrom
, WM_KILLFOCUS
, hFocusTo
, 0 );
34 if( !hFocusTo
|| hFocusTo
!= PERQDATA_GetFocusWnd( pMsgQ
->pQData
) )
39 /* According to API docs, the WM_SETFOCUS message is sent AFTER the window
40 has received the keyboard focus. */
41 if (USER_Driver
.pSetFocus
) USER_Driver
.pSetFocus(hFocusTo
);
43 SendMessageA( hFocusTo
, WM_SETFOCUS
, hFocusFrom
, 0 );
47 /*****************************************************************
50 HWND16 WINAPI
SetFocus16( HWND16 hwnd
)
52 return (HWND16
)SetFocus( hwnd
);
56 /*****************************************************************
59 HWND WINAPI
SetFocus( HWND hwnd
)
61 HWND hWndFocus
= 0, hwndTop
= hwnd
;
62 WND
*wndPtr
= WIN_FindWndPtr( hwnd
);
63 MESSAGEQUEUE
*pMsgQ
= 0, *pCurMsgQ
= 0;
66 /* Get the messageQ for the current thread */
67 if (!(pCurMsgQ
= (MESSAGEQUEUE
*)QUEUE_Lock( GetFastQueue16() )))
69 WARN("\tCurrent message queue not found. Exiting!\n" );
75 /* Check if we can set the focus to this window */
77 while ( (wndPtr
->dwStyle
& (WS_CHILD
| WS_POPUP
)) == WS_CHILD
)
79 if ( wndPtr
->dwStyle
& ( WS_MINIMIZE
| WS_DISABLED
) )
81 WIN_UpdateWndPtr(&wndPtr
,wndPtr
->parent
);
82 if (!wndPtr
) goto CLEANUP
;
83 hwndTop
= wndPtr
->hwndSelf
;
86 /* definitely at the top window now */
87 if ( wndPtr
->dwStyle
& ( WS_MINIMIZE
| WS_DISABLED
) ) goto CLEANUP
;
89 /* Retrieve the message queue associated with this window */
90 pMsgQ
= (MESSAGEQUEUE
*)QUEUE_Lock( wndPtr
->hmemTaskQ
);
93 WARN("\tMessage queue not found. Exiting!\n" );
97 /* Make sure that message queue for the window we are setting focus to
98 * shares the same perQ data as the current threads message queue.
99 * In other words you can't set focus to a window owned by a different
100 * thread unless AttachThreadInput has been called previously.
101 * (see AttachThreadInput and SetFocus docs)
103 if ( pCurMsgQ
->pQData
!= pMsgQ
->pQData
)
106 /* Get the current focus window from the perQ data */
107 hWndFocus
= PERQDATA_GetFocusWnd( pMsgQ
->pQData
);
109 if( hwnd
== hWndFocus
)
111 bRet
= 1; /* Success */
112 goto CLEANUP
; /* Nothing to do */
116 if( HOOK_CallHooksA( WH_CBT
, HCBT_SETFOCUS
, (WPARAM
)hwnd
, (LPARAM
)hWndFocus
) )
119 /* activate hwndTop if needed. */
120 if (hwndTop
!= GetActiveWindow())
122 if (!WINPOS_SetActiveWindow(hwndTop
, 0, 0)) goto CLEANUP
;
124 if (!IsWindow( hwnd
)) goto CLEANUP
; /* Abort if window destroyed */
127 /* Get the current focus window from the perQ data */
128 hWndFocus
= PERQDATA_GetFocusWnd( pMsgQ
->pQData
);
130 /* Change focus and send messages */
131 FOCUS_SwitchFocus( pMsgQ
, hWndFocus
, hwnd
);
133 else /* NULL hwnd passed in */
135 if( HOOK_CallHooksA( WH_CBT
, HCBT_SETFOCUS
, 0, (LPARAM
)hWndFocus
) )
138 /* Get the current focus from the perQ data of the current message Q */
139 hWndFocus
= PERQDATA_GetFocusWnd( pCurMsgQ
->pQData
);
141 /* Change focus and send messages */
142 FOCUS_SwitchFocus( pCurMsgQ
, hWndFocus
, hwnd
);
145 bRet
= 1; /* Success */
149 /* Unlock the queues before returning */
151 QUEUE_Unlock( pMsgQ
);
153 QUEUE_Unlock( pCurMsgQ
);
155 WIN_ReleaseWndPtr(wndPtr
);
156 return bRet
? hWndFocus
: 0;
160 /*****************************************************************
163 HWND16 WINAPI
GetFocus16(void)
165 return (HWND16
)GetFocus();
169 /*****************************************************************
170 * GetFocus (USER32.@)
172 HWND WINAPI
GetFocus(void)
174 MESSAGEQUEUE
*pCurMsgQ
= 0;
177 /* Get the messageQ for the current thread */
178 if (!(pCurMsgQ
= (MESSAGEQUEUE
*)QUEUE_Lock( GetFastQueue16() )))
180 WARN("\tCurrent message queue not found. Exiting!\n" );
184 /* Get the current focus from the perQ data of the current message Q */
185 hwndFocus
= PERQDATA_GetFocusWnd( pCurMsgQ
->pQData
);
187 QUEUE_Unlock( pCurMsgQ
);