]> git.saurik.com Git - wxWidgets.git/blame - src/msw/evtloop.cpp
unused parameter warning fix after last change
[wxWidgets.git] / src / msw / evtloop.cpp
CommitLineData
3808e191
JS
1///////////////////////////////////////////////////////////////////////////////
2// Name: msw/evtloop.cpp
3// Purpose: implements wxEventLoop for MSW
4// Author: Vadim Zeitlin
5// Modified by:
6// Created: 01.06.01
7// RCS-ID: $Id$
8// Copyright: (c) 2001 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
65571936 9// License: wxWindows licence
3808e191
JS
10///////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
3808e191
JS
20// For compilers that support precompilation, includes "wx.h".
21#include "wx/wxprec.h"
22
23#ifdef __BORLANDC__
24 #pragma hdrstop
25#endif
26
27#ifndef WX_PRECOMP
6c0e8b4e
VZ
28 #include "wx/window.h"
29 #include "wx/app.h"
3808e191
JS
30#endif //WX_PRECOMP
31
32#include "wx/evtloop.h"
4300caa7 33
0cd7d9b2 34#include "wx/tooltip.h"
4300caa7
VZ
35#include "wx/except.h"
36#include "wx/ptr_scpd.h"
3808e191
JS
37
38#include "wx/msw/private.h"
39
0cd7d9b2 40#if wxUSE_THREADS
4300caa7
VZ
41 #include "wx/thread.h"
42
9af08eb8
VZ
43 // define the list of MSG strutures
44 WX_DECLARE_LIST(MSG, wxMsgList);
4300caa7 45
9af08eb8 46 #include "wx/listimpl.cpp"
4300caa7 47
259c43f6 48 WX_DEFINE_LIST(wxMsgList)
4300caa7 49#endif // wxUSE_THREADS
0cd7d9b2 50
3808e191 51// ============================================================================
3754265e 52// wxEventLoop implementation
3808e191
JS
53// ============================================================================
54
b4626104 55wxWindowMSW *wxEventLoop::ms_winCritical = NULL;
3754265e 56
3808e191 57// ----------------------------------------------------------------------------
3754265e 58// ctor/dtor
3808e191
JS
59// ----------------------------------------------------------------------------
60
3754265e
VZ
61wxEventLoop::wxEventLoop()
62{
63 m_shouldExit = false;
64 m_exitcode = 0;
65}
66
67// ----------------------------------------------------------------------------
68// wxEventLoop message processing
69// ----------------------------------------------------------------------------
70
71void wxEventLoop::ProcessMessage(WXMSG *msg)
3808e191
JS
72{
73 // give us the chance to preprocess the message first
74 if ( !PreProcessMessage(msg) )
75 {
76 // if it wasn't done, dispatch it to the corresponding window
77 ::TranslateMessage(msg);
78 ::DispatchMessage(msg);
79 }
80}
81
b4626104 82bool wxEventLoop::IsChildOfCriticalWindow(wxWindowMSW *win)
a7b7500c
VZ
83{
84 while ( win )
85 {
86 if ( win == ms_winCritical )
87 return true;
88
89 win = win->GetParent();
90 }
91
92 return false;
93}
94
3754265e 95bool wxEventLoop::PreProcessMessage(WXMSG *msg)
3808e191 96{
ac8d0c11 97 HWND hwnd = msg->hwnd;
89c83180 98 wxWindow *wndThis = wxGetWindowFromHWND((WXHWND)hwnd);
a7b7500c 99 wxWindow *wnd;
ac8d0c11 100
18f5234f
DS
101 // this might happen if we're in a modeless dialog, or if a wx control has
102 // children which themselves were not created by wx (i.e. wxActiveX control children)
ac8d0c11
VZ
103 if ( !wndThis )
104 {
18f5234f 105 while ( hwnd && (::GetWindowLong(hwnd, GWL_STYLE) & WS_CHILD ))
ac8d0c11
VZ
106 {
107 hwnd = ::GetParent(hwnd);
89c83180 108
18f5234f
DS
109 // If the control has a wx parent, break and give the parent a chance
110 // to process the window message
111 wndThis = wxGetWindowFromHWND((WXHWND)hwnd);
112 if (wndThis != NULL)
113 break;
ac8d0c11
VZ
114 }
115
18f5234f
DS
116 if ( !wndThis )
117 {
118 // this may happen if the event occurred in a standard modeless dialog (the
119 // only example of which I know of is the find/replace dialog) - then call
120 // IsDialogMessage() to make TAB navigation in it work
121
122 // NOTE: IsDialogMessage() just eats all the messages (i.e. returns true for
123 // them) if we call it for the control itself
124 return hwnd && ::IsDialogMessage(hwnd, msg) != 0;
125 }
ac8d0c11 126 }
3808e191 127
a7b7500c
VZ
128 if ( !AllowProcessing(wndThis) )
129 {
130 // not a child of critical window, so we eat the event but take care to
131 // stop an endless stream of WM_PAINTs which would have resulted if we
132 // didn't validate the invalidated part of the window
133 if ( msg->message == WM_PAINT )
134 ::ValidateRect(hwnd, NULL);
135
136 return true;
137 }
138
3808e191
JS
139#if wxUSE_TOOLTIPS
140 // we must relay WM_MOUSEMOVE events to the tooltip ctrl if we want it to
141 // popup the tooltip bubbles
ac8d0c11 142 if ( msg->message == WM_MOUSEMOVE )
3808e191 143 {
c009bf3e
VZ
144 // we should do it if one of window children has an associated tooltip
145 // (and not just if the window has a tooltip itself)
146 if ( wndThis->HasToolTips() )
147 wxToolTip::RelayEvent((WXMSG *)msg);
3808e191
JS
148 }
149#endif // wxUSE_TOOLTIPS
150
ac8d0c11
VZ
151 // allow the window to prevent certain messages from being
152 // translated/processed (this is currently used by wxTextCtrl to always
153 // grab Ctrl-C/V/X, even if they are also accelerators in some parent)
154 if ( !wndThis->MSWShouldPreProcessMessage((WXMSG *)msg) )
155 {
3754265e 156 return false;
ac8d0c11
VZ
157 }
158
159 // try translations first: the accelerators override everything
3808e191
JS
160 for ( wnd = wndThis; wnd; wnd = wnd->GetParent() )
161 {
ac8d0c11 162 if ( wnd->MSWTranslateMessage((WXMSG *)msg))
3754265e 163 return true;
ac8d0c11
VZ
164
165 // stop at first top level window, i.e. don't try to process the key
166 // strokes originating in a dialog using the accelerators of the parent
167 // frame - this doesn't make much sense
168 if ( wnd->IsTopLevel() )
169 break;
3808e191
JS
170 }
171
22cfea03
JS
172 // now try the other hooks (kbd navigation is handled here)
173 for ( wnd = wndThis; wnd; wnd = wnd->GetParent() )
3808e191 174 {
f6388667
VZ
175 if ( wnd->MSWProcessMessage((WXMSG *)msg) )
176 return true;
c8026dea 177
f6388667
VZ
178 // also stop at first top level window here, just as above because
179 // if we don't do this, pressing ESC on a modal dialog shown as child
180 // of a modal dialog with wxID_CANCEL will cause the parent dialog to
181 // be closed, for example
182 if ( wnd->IsTopLevel() )
22cfea03 183 break;
3808e191
JS
184 }
185
ac8d0c11 186 // no special preprocessing for this message, dispatch it normally
3754265e 187 return false;
cea62f9c
JS
188}
189
3808e191
JS
190// ----------------------------------------------------------------------------
191// wxEventLoop running and exiting
192// ----------------------------------------------------------------------------
193
c8026dea
VZ
194// ----------------------------------------------------------------------------
195// wxEventLoopManual customization
196// ----------------------------------------------------------------------------
3808e191 197
c8026dea
VZ
198void wxEventLoop::OnNextIteration()
199{
200#if wxUSE_THREADS
201 wxMutexGuiLeaveOrEnter();
202#endif // wxUSE_THREADS
3808e191
JS
203}
204
c8026dea 205void wxEventLoop::WakeUp()
3808e191 206{
f7550d73 207 ::PostMessage(NULL, WM_NULL, 0, 0);
3808e191
JS
208}
209
210// ----------------------------------------------------------------------------
211// wxEventLoop message processing dispatching
212// ----------------------------------------------------------------------------
213
214bool wxEventLoop::Pending() const
215{
216 MSG msg;
217 return ::PeekMessage(&msg, 0, 0, 0, PM_NOREMOVE) != 0;
218}
219
220bool wxEventLoop::Dispatch()
221{
3754265e 222 wxCHECK_MSG( IsRunning(), false, _T("can't call Dispatch() if not running") );
3808e191
JS
223
224 MSG msg;
225 BOOL rc = ::GetMessage(&msg, (HWND) NULL, 0, 0);
226
227 if ( rc == 0 )
228 {
229 // got WM_QUIT
3754265e 230 return false;
3808e191
JS
231 }
232
233 if ( rc == -1 )
234 {
235 // should never happen, but let's test for it nevertheless
236 wxLogLastError(wxT("GetMessage"));
237
238 // still break from the loop
3754265e 239 return false;
3808e191
JS
240 }
241
242#if wxUSE_THREADS
243 wxASSERT_MSG( wxThread::IsMain(),
244 wxT("only the main thread can process Windows messages") );
245
3754265e 246 static bool s_hadGuiLock = true;
9af08eb8 247 static wxMsgList s_aSavedMessages;
3808e191
JS
248
249 // if a secondary thread owning the mutex is doing GUI calls, save all
250 // messages for later processing - we can't process them right now because
251 // it will lead to recursive library calls (and we're not reentrant)
252 if ( !wxGuiOwnedByMainThread() )
253 {
3754265e 254 s_hadGuiLock = false;
3808e191
JS
255
256 // leave out WM_COMMAND messages: too dangerous, sometimes
257 // the message will be processed twice
6c0e8b4e 258 if ( !wxIsWaitingForThread() || msg.message != WM_COMMAND )
3808e191 259 {
9af08eb8
VZ
260 MSG* pMsg = new MSG(msg);
261 s_aSavedMessages.Append(pMsg);
3808e191
JS
262 }
263
3754265e 264 return true;
3808e191
JS
265 }
266 else
267 {
268 // have we just regained the GUI lock? if so, post all of the saved
269 // messages
270 //
271 // FIXME of course, it's not _exactly_ the same as processing the
272 // messages normally - expect some things to break...
273 if ( !s_hadGuiLock )
274 {
3754265e 275 s_hadGuiLock = true;
3808e191 276
9af08eb8
VZ
277 wxMsgList::compatibility_iterator node = s_aSavedMessages.GetFirst();
278 while (node)
3808e191 279 {
9af08eb8
VZ
280 MSG* pMsg = node->GetData();
281 s_aSavedMessages.Erase(node);
282
283 ProcessMessage(pMsg);
284 delete pMsg;
3808e191 285
9af08eb8
VZ
286 node = s_aSavedMessages.GetFirst();
287 }
3808e191
JS
288 }
289 }
290#endif // wxUSE_THREADS
291
3754265e 292 ProcessMessage(&msg);
3808e191 293
3754265e 294 return true;
3808e191
JS
295}
296