4 * Copyright 1993 David Metcalfe
5 * 1994 Alexandre Julliard
17 static HWND32 hwndFocus = 0;
19 /*****************************************************************
23 * Explicit colormap management seems to work only with OLVWM.
25 void FOCUS_SetXFocus( HWND32 hwnd )
27 XWindowAttributes win_attr;
30 /* Only mess with the X focus if there's */
31 /* no desktop window and no window manager. */
32 if ((rootWindow != DefaultRootWindow(display)) || Options.managed) return;
34 if (!hwnd) /* If setting the focus to 0, uninstall the colormap */
36 if (COLOR_GetSystemPaletteFlags() & COLOR_PRIVATE)
37 TSXUninstallColormap( display, COLOR_GetColormap() );
41 /* Set X focus and install colormap */
43 if (!(win = WIN_GetXWindow( hwnd ))) return;
44 if (!TSXGetWindowAttributes( display, win, &win_attr ) ||
45 (win_attr.map_state != IsViewable))
46 return; /* If window is not viewable, don't change anything */
48 TSXSetInputFocus( display, win, RevertToParent, CurrentTime );
49 if (COLOR_GetSystemPaletteFlags() & COLOR_PRIVATE)
50 TSXInstallColormap( display, COLOR_GetColormap() );
55 /*****************************************************************
58 void FOCUS_SwitchFocus( HWND32 hFocusFrom, HWND32 hFocusTo )
63 if (hFocusFrom) SendMessage32A( hFocusFrom, WM_KILLFOCUS, hFocusTo, 0 );
65 /* FIXME: must be SendMessage16() because 32A doesn't do
66 * intertask at this time */
67 if (hFocusFrom) SendMessage16( hFocusFrom, WM_KILLFOCUS, hFocusTo, 0 );
69 if( !hFocusTo || hFocusTo != hwndFocus )
72 /* According to API docs, the WM_SETFOCUS message is sent AFTER the window
73 has received the keyboard focus. */
74 FOCUS_SetXFocus( hFocusTo );
77 SendMessage32A( hFocusTo, WM_SETFOCUS, hFocusFrom, 0 );
79 SendMessage16( hFocusTo, WM_SETFOCUS, hFocusFrom, 0 );
84 /*****************************************************************
85 * SetFocus16 (USER.22)
87 HWND16 WINAPI SetFocus16( HWND16 hwnd )
89 return (HWND16)SetFocus32( hwnd );
93 /*****************************************************************
94 * SetFocus32 (USER32.481)
96 HWND32 WINAPI SetFocus32( HWND32 hwnd )
98 HWND32 hWndPrevFocus, hwndTop = hwnd;
99 WND *wndPtr = WIN_FindWndPtr( hwnd );
103 /* Check if we can set the focus to this window */
105 while ( (wndPtr->dwStyle & (WS_CHILD | WS_POPUP)) == WS_CHILD )
107 if ( wndPtr->dwStyle & ( WS_MINIMIZE | WS_DISABLED) )
109 if (!(wndPtr = wndPtr->parent)) return 0;
110 hwndTop = wndPtr->hwndSelf;
113 if( hwnd == hwndFocus ) return hwnd;
116 if( HOOK_CallHooks16( WH_CBT, HCBT_SETFOCUS, (WPARAM16)hwnd,
120 /* activate hwndTop if needed. */
121 if (hwndTop != GetActiveWindow32())
123 if (!WINPOS_SetActiveWindow(hwndTop, 0, 0)) return 0;
125 if (!IsWindow32( hwnd )) return 0; /* Abort if window destroyed */
128 else if( HOOK_CallHooks16( WH_CBT, HCBT_SETFOCUS, 0, (LPARAM)hwndFocus ) )
131 /* Change focus and send messages */
132 hWndPrevFocus = hwndFocus;
134 FOCUS_SwitchFocus( hwndFocus , hwnd );
136 return hWndPrevFocus;
140 /*****************************************************************
141 * GetFocus16 (USER.23)
143 HWND16 WINAPI GetFocus16(void)
145 return (HWND16)hwndFocus;
149 /*****************************************************************
150 * GetFocus32 (USER32.240)
152 HWND32 WINAPI GetFocus32(void)