move default OnInternalIdle processing to wxWindowBase
[wxWidgets.git] / src / mgl / window.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/mgl/window.cpp
3 // Purpose: wxWindow
4 // Author: Vaclav Slavik
5 // (based on GTK & MSW implementations)
6 // RCS-ID: $Id$
7 // Copyright: (c) 2001-2002 SciTech Software, Inc. (www.scitechsoft.com)
8 // Licence: wxWindows licence
9 /////////////////////////////////////////////////////////////////////////////
10
11 // ===========================================================================
12 // declarations
13 // ===========================================================================
14
15 // ---------------------------------------------------------------------------
16 // headers
17 // ---------------------------------------------------------------------------
18
19 // For compilers that support precompilation, includes "wx.h".
20 #include "wx/wxprec.h"
21
22 #ifdef __BORLANDC__
23 #pragma hdrstop
24 #endif
25
26 #include "wx/window.h"
27
28 #ifndef WX_PRECOMP
29 #include "wx/msgdlg.h"
30 #include "wx/accel.h"
31 #include "wx/dc.h"
32 #include "wx/dcclient.h"
33 #include "wx/utils.h"
34 #include "wx/app.h"
35 #include "wx/panel.h"
36 #include "wx/intl.h"
37 #include "wx/log.h"
38 #include "wx/dcscreen.h"
39 #include "wx/menu.h"
40 #endif
41
42 #if wxUSE_DRAG_AND_DROP
43 #include "wx/dnd.h"
44 #endif
45
46 #include "wx/sysopt.h"
47 #include "wx/mgl/private.h"
48 #include "wx/caret.h"
49
50 #include <mgraph.hpp>
51
52 #if wxUSE_TOOLTIPS
53 #include "wx/tooltip.h"
54 #endif
55
56 // ---------------------------------------------------------------------------
57 // global variables
58 // ---------------------------------------------------------------------------
59
60 // MGL window manager and associated DC.
61 winmng_t *g_winMng = NULL;
62 MGLDevCtx *g_displayDC = NULL;
63
64 // the window that has keyboard focus:
65 static wxWindowMGL *gs_focusedWindow = NULL;
66 // the window that is about to be focused after currently focused
67 // one looses focus:
68 static wxWindow *gs_toBeFocusedWindow = NULL;
69 // the window that is currently under mouse cursor:
70 static wxWindowMGL *gs_windowUnderMouse = NULL;
71 // the window that has mouse capture
72 static wxWindowMGL *gs_mouseCapture = NULL;
73 // the frame that is currently active (i.e. its child has focus). It is
74 // used to generate wxActivateEvents
75 static wxWindowMGL *gs_activeFrame = NULL;
76 // track the mouse button state for wxGetMouseState()
77 unsigned long g_buttonState = 0;
78
79 // ---------------------------------------------------------------------------
80 // constants
81 // ---------------------------------------------------------------------------
82
83 // Custom identifiers used to distinguish between various event handlers
84 // and capture handlers passed to MGL_wm
85 enum
86 {
87 wxMGL_CAPTURE_MOUSE = 1,
88 wxMGL_CAPTURE_KEYB = 2
89 };
90
91
92 // ---------------------------------------------------------------------------
93 // private functions
94 // ---------------------------------------------------------------------------
95
96 // Returns toplevel grandparent of given window:
97 static wxWindowMGL* wxGetTopLevelParent(wxWindowMGL *win)
98 {
99 wxWindowMGL *p = win;
100 while (p && !p->IsTopLevel())
101 p = p->GetParent();
102 return p;
103 }
104
105 // An easy way to capture screenshots:
106 static void wxCaptureScreenshot(bool activeWindowOnly)
107 {
108 #ifdef __DOS__
109 #define SCREENSHOT_FILENAME wxT("sshot%03i.png")
110 #else
111 #define SCREENSHOT_FILENAME wxT("screenshot-%03i.png")
112 #endif
113 static int screenshot_num = 0;
114 wxString screenshot;
115
116 do
117 {
118 screenshot.Printf(SCREENSHOT_FILENAME, screenshot_num++);
119 } while ( wxFileExists(screenshot) && screenshot_num < 1000 );
120
121 wxRect r(0, 0, g_displayDC->sizex(), g_displayDC->sizey());
122
123 if ( activeWindowOnly && gs_activeFrame )
124 {
125 r.Intersect(gs_activeFrame->GetRect());
126 }
127
128 g_displayDC->savePNGFromDC(screenshot.mb_str(),
129 r.x, r. y, r.x+r.width, r.y+r.height);
130
131 wxMessageBox(wxString::Format(wxT("Screenshot captured: %s"),
132 screenshot.c_str()));
133 }
134
135 // ---------------------------------------------------------------------------
136 // MGL_WM hooks:
137 // ---------------------------------------------------------------------------
138
139 static void MGLAPI wxWindowPainter(window_t *wnd, MGLDC *dc)
140 {
141 wxWindowMGL *w = (wxWindow*) wnd->userData;
142
143 if ( w && !(w->GetWindowStyle() & wxTRANSPARENT_WINDOW) )
144 {
145 MGLDevCtx ctx(dc);
146 w->HandlePaint(&ctx);
147 }
148 }
149
150 static ibool MGLAPI wxWindowMouseHandler(window_t *wnd, event_t *e)
151 {
152 wxWindowMGL *win = (wxWindowMGL*)MGL_wmGetWindowUserData(wnd);
153 wxPoint orig(win->GetClientAreaOrigin());
154 wxPoint where;
155
156 g_buttonState = e->modifiers;
157
158 MGL_wmCoordGlobalToLocal(win->GetHandle(),
159 e->where_x, e->where_y, &where.x, &where.y);
160
161 for (wxWindowMGL *w = win; w; w = w->GetParent())
162 {
163 if ( !w->IsEnabled() )
164 return FALSE;
165 if ( w->IsTopLevel() )
166 break;
167 }
168
169 wxEventType type = wxEVT_NULL;
170 wxMouseEvent event;
171 event.SetEventObject(win);
172 event.SetTimestamp(e->when);
173 event.m_x = where.x - orig.x;
174 event.m_y = where.y - orig.y;
175 event.m_shiftDown = ( e->modifiers & EVT_SHIFTKEY ) != 0;
176 event.m_controlDown = ( e->modifiers & EVT_CTRLSTATE ) != 0;
177 event.m_altDown = ( e->modifiers & EVT_LEFTALT ) != 0;
178 event.m_metaDown = ( e->modifiers & EVT_RIGHTALT ) != 0;
179 event.m_leftDown = ( e->modifiers & EVT_LEFTBUT ) != 0;
180 event.m_middleDown = ( e->modifiers & EVT_MIDDLEBUT ) != 0;
181 event.m_rightDown = ( e->modifiers & EVT_RIGHTBUT ) != 0;
182
183 switch (e->what)
184 {
185 case EVT_MOUSEDOWN:
186 // Change focus if the user clicks outside focused window:
187 if ( win->CanAcceptFocus() && wxWindow::FindFocus() != win )
188 win->SetFocus();
189
190 if ( e->message & EVT_DBLCLICK )
191 {
192 if ( e->message & EVT_LEFTBMASK )
193 type = wxEVT_LEFT_DCLICK;
194 else if ( e->message & EVT_MIDDLEBMASK )
195 type = wxEVT_MIDDLE_DCLICK;
196 else if ( e->message & EVT_RIGHTBMASK )
197 type = wxEVT_RIGHT_DCLICK;
198 }
199 else
200 {
201 if ( e->message & EVT_LEFTBMASK )
202 type = wxEVT_LEFT_DOWN;
203 else if ( e->message & EVT_MIDDLEBMASK )
204 type = wxEVT_MIDDLE_DOWN;
205 else if ( e->message & EVT_RIGHTBMASK )
206 type = wxEVT_RIGHT_DOWN;
207 }
208
209 break;
210
211 case EVT_MOUSEUP:
212 if ( e->message & EVT_LEFTBMASK )
213 type = wxEVT_LEFT_UP;
214 else if ( e->message & EVT_MIDDLEBMASK )
215 type = wxEVT_MIDDLE_UP;
216 else if ( e->message & EVT_RIGHTBMASK )
217 type = wxEVT_RIGHT_UP;
218 break;
219
220 case EVT_MOUSEMOVE:
221 if ( !gs_mouseCapture )
222 {
223 if ( win != gs_windowUnderMouse )
224 {
225 if ( gs_windowUnderMouse )
226 {
227 wxMouseEvent event2(event);
228 MGL_wmCoordGlobalToLocal(gs_windowUnderMouse->GetHandle(),
229 e->where_x, e->where_y,
230 &event2.m_x, &event2.m_y);
231
232 wxPoint orig(gs_windowUnderMouse->GetClientAreaOrigin());
233 event2.m_x -= orig.x;
234 event2.m_y -= orig.y;
235
236 event2.SetEventObject(gs_windowUnderMouse);
237 event2.SetEventType(wxEVT_LEAVE_WINDOW);
238 gs_windowUnderMouse->HandleWindowEvent(event2);
239 }
240
241 wxMouseEvent event3(event);
242 event3.SetEventType(wxEVT_ENTER_WINDOW);
243 win->HandleWindowEvent(event3);
244
245 gs_windowUnderMouse = win;
246 }
247 }
248 else // gs_mouseCapture
249 {
250 bool inside = (where.x >= 0 &&
251 where.y >= 0 &&
252 where.x < win->GetSize().x &&
253 where.y < win->GetSize().y);
254 if ( (inside && gs_windowUnderMouse != win) ||
255 (!inside && gs_windowUnderMouse == win) )
256 {
257 wxMouseEvent evt(inside ?
258 wxEVT_ENTER_WINDOW : wxEVT_LEAVE_WINDOW);
259 evt.SetEventObject(win);
260 win->HandleWindowEvent(evt);
261 gs_windowUnderMouse = inside ? win : NULL;
262 }
263 }
264
265 type = wxEVT_MOTION;
266 break;
267
268 default:
269 break;
270 }
271
272 if ( type == wxEVT_NULL )
273 {
274 return FALSE;
275 }
276 else
277 {
278 event.SetEventType(type);
279 return win->HandleWindowEvent(event);
280 }
281 }
282
283 static long wxScanToKeyCode(event_t *event, bool translate)
284 {
285 // VS: make it __WXDEBUG__-only, since we have lots of wxLogTrace calls
286 // here and the arguments would be stored in non-debug executable even
287 // though wxLogTrace would be no-op...
288 #ifdef __WXDEBUG__
289 #define KEY(mgl_key,wx_key) \
290 case mgl_key: \
291 wxLogTrace(wxT("keyevents"), \
292 wxT("key " #mgl_key ", mapped to " #wx_key)); \
293 key = wx_key; \
294 break;
295 #else
296 #define KEY(mgl_key,wx_key) \
297 case mgl_key: key = wx_key; break;
298 #endif
299
300 long key = 0;
301
302 if ( translate )
303 {
304 bool numlock = (event->modifiers & EVT_NUMLOCK) != 0;
305
306 switch ( EVT_scanCode(event->message) )
307 {
308 KEY (KB_padMinus, WXK_NUMPAD_SUBTRACT)
309 KEY (KB_padPlus, WXK_NUMPAD_ADD)
310 KEY (KB_padTimes, WXK_NUMPAD_MULTIPLY)
311 KEY (KB_padDivide, WXK_NUMPAD_DIVIDE)
312 KEY (KB_padCenter, numlock ? WXK_NUMPAD5 : WXK_NUMPAD_SEPARATOR) // ?
313 KEY (KB_padLeft, numlock ? WXK_NUMPAD4 : WXK_NUMPAD_LEFT)
314 KEY (KB_padRight, numlock ? WXK_NUMPAD6 : WXK_NUMPAD_RIGHT)
315 KEY (KB_padUp, numlock ? WXK_NUMPAD8 : WXK_NUMPAD_UP)
316 KEY (KB_padDown, numlock ? WXK_NUMPAD2 : WXK_NUMPAD_DOWN)
317 KEY (KB_padInsert, numlock ? WXK_NUMPAD0 : WXK_NUMPAD_INSERT)
318 KEY (KB_padDelete, numlock ? WXK_DECIMAL : WXK_NUMPAD_DELETE)
319 KEY (KB_padHome, numlock ? WXK_NUMPAD7 : WXK_NUMPAD_HOME)
320 KEY (KB_padEnd, numlock ? WXK_NUMPAD1 : WXK_NUMPAD_END)
321 KEY (KB_padPageUp, numlock ? WXK_NUMPAD9 : WXK_NUMPAD_PAGEUP)
322 KEY (KB_padPageDown, numlock ? WXK_NUMPAD3 : WXK_NUMPAD_PAGEDOWN)
323 KEY (KB_1, '1')
324 KEY (KB_2, '2')
325 KEY (KB_3, '3')
326 KEY (KB_4, '4')
327 KEY (KB_5, '5')
328 KEY (KB_6, '6')
329 KEY (KB_7, '7')
330 KEY (KB_8, '8')
331 KEY (KB_9, '9')
332 KEY (KB_0, '0')
333 KEY (KB_minus, WXK_SUBTRACT)
334 KEY (KB_equals, WXK_ADD)
335 KEY (KB_backSlash, '\\')
336 KEY (KB_Q, 'Q')
337 KEY (KB_W, 'W')
338 KEY (KB_E, 'E')
339 KEY (KB_R, 'R')
340 KEY (KB_T, 'T')
341 KEY (KB_Y, 'Y')
342 KEY (KB_U, 'U')
343 KEY (KB_I, 'I')
344 KEY (KB_O, 'O')
345 KEY (KB_P, 'P')
346 KEY (KB_leftSquareBrace,'[')
347 KEY (KB_rightSquareBrace,']')
348 KEY (KB_A, 'A')
349 KEY (KB_S, 'S')
350 KEY (KB_D, 'D')
351 KEY (KB_F, 'F')
352 KEY (KB_G, 'G')
353 KEY (KB_H, 'H')
354 KEY (KB_J, 'J')
355 KEY (KB_K, 'K')
356 KEY (KB_L, 'L')
357 KEY (KB_semicolon, ';')
358 KEY (KB_apostrophe, '\'')
359 KEY (KB_Z, 'Z')
360 KEY (KB_X, 'X')
361 KEY (KB_C, 'C')
362 KEY (KB_V, 'V')
363 KEY (KB_B, 'B')
364 KEY (KB_N, 'N')
365 KEY (KB_M, 'M')
366 KEY (KB_comma, ',')
367 KEY (KB_period, '.')
368 KEY (KB_divide, WXK_DIVIDE)
369 KEY (KB_space, WXK_SPACE)
370 KEY (KB_tilde, '~')
371
372 default: break;
373 }
374 }
375
376 if ( key == 0 )
377 {
378 switch ( EVT_scanCode(event->message) )
379 {
380 KEY (KB_padEnter, WXK_NUMPAD_ENTER)
381 KEY (KB_F1, WXK_F1)
382 KEY (KB_F2, WXK_F2)
383 KEY (KB_F3, WXK_F3)
384 KEY (KB_F4, WXK_F4)
385 KEY (KB_F5, WXK_F5)
386 KEY (KB_F6, WXK_F6)
387 KEY (KB_F7, WXK_F7)
388 KEY (KB_F8, WXK_F8)
389 KEY (KB_F9, WXK_F9)
390 KEY (KB_F10, WXK_F10)
391 KEY (KB_F11, WXK_F11)
392 KEY (KB_F12, WXK_F12)
393 KEY (KB_left, WXK_LEFT)
394 KEY (KB_right, WXK_RIGHT)
395 KEY (KB_up, WXK_UP)
396 KEY (KB_down, WXK_DOWN)
397 KEY (KB_insert, WXK_INSERT)
398 KEY (KB_delete, WXK_DELETE)
399 KEY (KB_home, WXK_HOME)
400 KEY (KB_end, WXK_END)
401 KEY (KB_pageUp, WXK_PAGEUP)
402 KEY (KB_pageDown, WXK_PAGEDOWN)
403 KEY (KB_capsLock, WXK_CAPITAL)
404 KEY (KB_numLock, WXK_NUMLOCK)
405 KEY (KB_scrollLock, WXK_SCROLL)
406 KEY (KB_leftShift, WXK_SHIFT)
407 KEY (KB_rightShift, WXK_SHIFT)
408 KEY (KB_leftCtrl, WXK_CONTROL)
409 KEY (KB_rightCtrl, WXK_CONTROL)
410 KEY (KB_leftAlt, WXK_ALT)
411 KEY (KB_rightAlt, WXK_ALT)
412 KEY (KB_leftWindows, WXK_START)
413 KEY (KB_rightWindows, WXK_START)
414 KEY (KB_menu, WXK_MENU)
415 KEY (KB_sysReq, WXK_SNAPSHOT)
416 KEY (KB_esc, WXK_ESCAPE)
417 KEY (KB_backspace, WXK_BACK)
418 KEY (KB_tab, WXK_TAB)
419 KEY (KB_enter, WXK_RETURN)
420
421 default:
422 key = EVT_asciiCode(event->message);
423 break;
424 }
425 }
426
427 #undef KEY
428
429 return key;
430 }
431
432 static bool wxHandleSpecialKeys(wxKeyEvent& event)
433 {
434 // Add an easy way to capture screenshots:
435 if ( event.m_keyCode == WXK_SNAPSHOT
436 #ifdef __WXDEBUG__ // FIXME_MGL - remove when KB_sysReq works in MGL!
437 || (event.m_keyCode == WXK_F1 &&
438 event.m_shiftDown && event.m_controlDown)
439 #endif
440 )
441 {
442 wxCaptureScreenshot(event.m_altDown/*only active wnd?*/);
443 return true;
444 }
445
446 return false;
447 }
448
449 static ibool MGLAPI wxWindowKeybHandler(window_t *wnd, event_t *e)
450 {
451 wxWindowMGL *win = (wxWindowMGL*)MGL_wmGetWindowUserData(wnd);
452
453 if ( !win->IsEnabled() ) return FALSE;
454
455 wxPoint where;
456 MGL_wmCoordGlobalToLocal(win->GetHandle(),
457 e->where_x, e->where_y, &where.x, &where.y);
458
459 wxKeyEvent event;
460 event.SetEventObject(win);
461 event.SetTimestamp(e->when);
462 event.m_keyCode = wxScanToKeyCode(e, true);
463 event.m_x = where.x;
464 event.m_y = where.y;
465 event.m_shiftDown = ( e->modifiers & EVT_SHIFTKEY ) != 0;
466 event.m_controlDown = ( e->modifiers & EVT_CTRLSTATE ) != 0;
467 event.m_altDown = ( e->modifiers & EVT_LEFTALT ) != 0;
468 event.m_metaDown = ( e->modifiers & EVT_RIGHTALT ) != 0;
469
470 if ( e->what == EVT_KEYUP )
471 {
472 event.SetEventType(wxEVT_KEY_UP);
473 return win->HandleWindowEvent(event);
474 }
475 else
476 {
477 bool ret;
478 wxKeyEvent event2;
479
480 event.SetEventType(wxEVT_KEY_DOWN);
481 event2 = event;
482
483 ret = win->HandleWindowEvent(event);
484
485 // wxMSW doesn't send char events with Alt pressed
486 // Only send wxEVT_CHAR event if not processed yet. Thus, ALT-x
487 // will only be sent if it is not in an accelerator table:
488 event2.m_keyCode = wxScanToKeyCode(e, false);
489 if ( !ret && event2.m_keyCode != 0 )
490 {
491 event2.SetEventType(wxEVT_CHAR);
492 ret = win->HandleWindowEvent(event2);
493 }
494
495 // Synthetize navigation key event, but do it only if the TAB key
496 // wasn't handled yet:
497 if ( !ret && event.m_keyCode == WXK_TAB &&
498 win->GetParent() && win->GetParent()->HasFlag(wxTAB_TRAVERSAL) )
499 {
500 wxNavigationKeyEvent navEvent;
501 navEvent.SetEventObject(win->GetParent());
502 // Shift-TAB goes in reverse direction:
503 navEvent.SetDirection(!event.m_shiftDown);
504 // Ctrl-TAB changes the (parent) window, i.e. switch notebook page:
505 navEvent.SetWindowChange(event.m_controlDown);
506 navEvent.SetCurrentFocus(wxStaticCast(win, wxWindow));
507 ret = win->HandleWindowEvent(navEvent);
508 }
509
510 // Finally, process special meaning keys that are usually
511 // a responsibility of OS or window manager:
512 if ( !ret )
513 ret = wxHandleSpecialKeys(event);
514
515 return ret;
516 }
517 }
518
519 // ---------------------------------------------------------------------------
520 // event tables
521 // ---------------------------------------------------------------------------
522
523 // in wxUniv this class is abstract because it doesn't have DoPopupMenu()
524 IMPLEMENT_ABSTRACT_CLASS(wxWindowMGL, wxWindowBase)
525
526 BEGIN_EVENT_TABLE(wxWindowMGL, wxWindowBase)
527 END_EVENT_TABLE()
528
529 // ===========================================================================
530 // implementation
531 // ===========================================================================
532
533 // ----------------------------------------------------------------------------
534 // constructors and such
535 // ----------------------------------------------------------------------------
536
537 extern wxVideoMode wxGetDefaultDisplayMode();
538
539 void wxWindowMGL::Init()
540 {
541 // First of all, make sure window manager is up and running. If it is
542 // not the case, initialize it in default display mode
543 if ( !g_winMng )
544 {
545 if ( !wxTheApp->SetDisplayMode(wxGetDefaultDisplayMode()) )
546 {
547 wxLogFatalError(_("Cannot initialize display."));
548 }
549 }
550
551 // mgl specific:
552 m_wnd = NULL;
553 m_isShown = true;
554 m_paintMGLDC = NULL;
555 m_eraseBackground = -1;
556 }
557
558 // Destructor
559 wxWindowMGL::~wxWindowMGL()
560 {
561 SendDestroyEvent();
562
563 if ( gs_mouseCapture == this )
564 ReleaseMouse();
565
566 if (gs_activeFrame == this)
567 {
568 gs_activeFrame = NULL;
569 // activate next frame in Z-order:
570 if ( m_wnd->prev )
571 {
572 wxWindowMGL *win = (wxWindowMGL*)m_wnd->prev->userData;
573 win->SetFocus();
574 }
575 else if ( m_wnd->next )
576 {
577 wxWindowMGL *win = (wxWindowMGL*)m_wnd->next->userData;
578 win->SetFocus();
579 }
580 }
581
582 if ( gs_focusedWindow == this )
583 KillFocus();
584
585 if ( gs_windowUnderMouse == this )
586 gs_windowUnderMouse = NULL;
587
588 DestroyChildren();
589
590 if ( m_wnd )
591 MGL_wmDestroyWindow(m_wnd);
592 }
593
594 // real construction (Init() must have been called before!)
595 bool wxWindowMGL::Create(wxWindow *parent,
596 wxWindowID id,
597 const wxPoint& pos,
598 const wxSize& size,
599 long style,
600 const wxString& name)
601 {
602 if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
603 return false;
604
605 if ( parent )
606 parent->AddChild(this);
607
608 int x, y, w, h;
609 x = pos.x, y = pos.y;
610 if ( x == -1 )
611 x = 0; // FIXME_MGL, something better, see GTK+
612 if ( y == -1 )
613 y = 0; // FIXME_MGL, something better, see GTK+
614 AdjustForParentClientOrigin(x, y, 0);
615 w = WidthDefault(size.x);
616 h = HeightDefault(size.y);
617
618 long mgl_style = 0;
619 window_t *wnd_parent = parent ? parent->GetHandle() : NULL;
620
621 if ( style & wxFULL_REPAINT_ON_RESIZE )
622 {
623 mgl_style |= MGL_WM_FULL_REPAINT_ON_RESIZE;
624 }
625 if ( style & wxSTAY_ON_TOP )
626 {
627 mgl_style |= MGL_WM_ALWAYS_ON_TOP;
628 }
629 if ( style & wxPOPUP_WINDOW )
630 {
631 mgl_style |= MGL_WM_ALWAYS_ON_TOP;
632 // it is created hidden as other top level windows
633 m_isShown = false;
634 wnd_parent = NULL;
635 }
636
637 window_t *wnd = MGL_wmCreateWindow(g_winMng, wnd_parent, x, y, w, h);
638
639 MGL_wmSetWindowFlags(wnd, mgl_style);
640 MGL_wmShowWindow(wnd, m_isShown);
641
642 SetMGLwindow_t(wnd);
643
644 return true;
645 }
646
647 void wxWindowMGL::SetMGLwindow_t(struct window_t *wnd)
648 {
649 if ( m_wnd )
650 MGL_wmDestroyWindow(m_wnd);
651
652 m_wnd = wnd;
653 if ( !m_wnd ) return;
654
655 m_isShown = (bool)m_wnd->visible;
656
657 MGL_wmSetWindowUserData(m_wnd, (void*) this);
658 MGL_wmSetWindowPainter(m_wnd, wxWindowPainter);
659 MGL_wmPushWindowEventHandler(m_wnd, wxWindowMouseHandler, EVT_MOUSEEVT, 0);
660 MGL_wmPushWindowEventHandler(m_wnd, wxWindowKeybHandler, EVT_KEYEVT, 0);
661
662 if ( m_cursor.Ok() )
663 MGL_wmSetWindowCursor(m_wnd, *m_cursor.GetMGLCursor());
664 else
665 MGL_wmSetWindowCursor(m_wnd, *wxSTANDARD_CURSOR->GetMGLCursor());
666 }
667
668 // ---------------------------------------------------------------------------
669 // basic operations
670 // ---------------------------------------------------------------------------
671
672 void wxWindowMGL::SetFocus()
673 {
674 if ( gs_focusedWindow == this ) return;
675
676 wxWindowMGL *oldFocusedWindow = gs_focusedWindow;
677
678 if ( gs_focusedWindow )
679 {
680 gs_toBeFocusedWindow = (wxWindow*)this;
681 gs_focusedWindow->KillFocus();
682 gs_toBeFocusedWindow = NULL;
683 }
684
685 gs_focusedWindow = this;
686
687 MGL_wmCaptureEvents(GetHandle(), EVT_KEYEVT, wxMGL_CAPTURE_KEYB);
688
689 wxWindowMGL *active = wxGetTopLevelParent(this);
690 if ( !(m_windowStyle & wxPOPUP_WINDOW) && active != gs_activeFrame )
691 {
692 if ( gs_activeFrame )
693 {
694 wxActivateEvent event(wxEVT_ACTIVATE, false, gs_activeFrame->GetId());
695 event.SetEventObject(gs_activeFrame);
696 gs_activeFrame->HandleWindowEvent(event);
697 }
698
699 gs_activeFrame = active;
700 wxActivateEvent event(wxEVT_ACTIVATE, true, gs_activeFrame->GetId());
701 event.SetEventObject(gs_activeFrame);
702 gs_activeFrame->HandleWindowEvent(event);
703 }
704
705 // notify the parent keeping track of focus for the kbd navigation
706 // purposes that we got it
707 wxChildFocusEvent eventFocus((wxWindow*)this);
708 HandleWindowEvent(eventFocus);
709
710 wxFocusEvent event(wxEVT_SET_FOCUS, GetId());
711 event.SetEventObject(this);
712 event.SetWindow((wxWindow*)oldFocusedWindow);
713 HandleWindowEvent(event);
714
715 #if wxUSE_CARET
716 // caret needs to be informed about focus change
717 wxCaret *caret = GetCaret();
718 if ( caret )
719 caret->OnSetFocus();
720 #endif // wxUSE_CARET
721 }
722
723 void wxWindowMGL::KillFocus()
724 {
725 if ( gs_focusedWindow != this ) return;
726 gs_focusedWindow = NULL;
727
728 if ( m_isBeingDeleted ) return;
729
730 MGL_wmUncaptureEvents(GetHandle(), wxMGL_CAPTURE_KEYB);
731
732 #if wxUSE_CARET
733 // caret needs to be informed about focus change
734 wxCaret *caret = GetCaret();
735 if ( caret )
736 caret->OnKillFocus();
737 #endif // wxUSE_CARET
738
739 wxFocusEvent event(wxEVT_KILL_FOCUS, GetId());
740 event.SetEventObject(this);
741 event.SetWindow(gs_toBeFocusedWindow);
742 HandleWindowEvent(event);
743 }
744
745 // ----------------------------------------------------------------------------
746 // this wxWindowBase function is implemented here (in platform-specific file)
747 // because it is static and so couldn't be made virtual
748 // ----------------------------------------------------------------------------
749 wxWindow *wxWindowBase::DoFindFocus()
750 {
751 return (wxWindow*)gs_focusedWindow;
752 }
753
754 bool wxWindowMGL::Show(bool show)
755 {
756 if ( !wxWindowBase::Show(show) )
757 return false;
758
759 MGL_wmShowWindow(m_wnd, show);
760
761 if (!show && gs_activeFrame == this)
762 {
763 // activate next frame in Z-order:
764 if ( m_wnd->prev )
765 {
766 wxWindowMGL *win = (wxWindowMGL*)m_wnd->prev->userData;
767 win->SetFocus();
768 }
769 else if ( m_wnd->next )
770 {
771 wxWindowMGL *win = (wxWindowMGL*)m_wnd->next->userData;
772 win->SetFocus();
773 }
774 else
775 {
776 gs_activeFrame = NULL;
777 }
778 }
779
780 return true;
781 }
782
783 // Raise the window to the top of the Z order
784 void wxWindowMGL::Raise()
785 {
786 MGL_wmRaiseWindow(m_wnd);
787 }
788
789 // Lower the window to the bottom of the Z order
790 void wxWindowMGL::Lower()
791 {
792 MGL_wmLowerWindow(m_wnd);
793 }
794
795 void wxWindowMGL::DoCaptureMouse()
796 {
797 if ( gs_mouseCapture )
798 MGL_wmUncaptureEvents(gs_mouseCapture->m_wnd, wxMGL_CAPTURE_MOUSE);
799
800 gs_mouseCapture = this;
801 MGL_wmCaptureEvents(m_wnd, EVT_MOUSEEVT, wxMGL_CAPTURE_MOUSE);
802 }
803
804 void wxWindowMGL::DoReleaseMouse()
805 {
806 wxASSERT_MSG( gs_mouseCapture == this, wxT("attempt to release mouse, but this window hasn't captured it") );
807
808 MGL_wmUncaptureEvents(m_wnd, wxMGL_CAPTURE_MOUSE);
809 gs_mouseCapture = NULL;
810 }
811
812 /* static */ wxWindow *wxWindowBase::GetCapture()
813 {
814 return (wxWindow*)gs_mouseCapture;
815 }
816
817 bool wxWindowMGL::SetCursor(const wxCursor& cursor)
818 {
819 if ( !wxWindowBase::SetCursor(cursor) )
820 {
821 // no change
822 return false;
823 }
824
825 if ( m_cursor.Ok() )
826 MGL_wmSetWindowCursor(m_wnd, *m_cursor.GetMGLCursor());
827 else
828 MGL_wmSetWindowCursor(m_wnd, *wxSTANDARD_CURSOR->GetMGLCursor());
829
830 return true;
831 }
832
833 void wxWindowMGL::WarpPointer(int x, int y)
834 {
835 int w, h;
836 wxDisplaySize(&w, &h);
837
838 ClientToScreen(&x, &y);
839 if ( x < 0 )
840 x = 0;
841 if ( y < 0 )
842 y = 0;
843 if ( x >= w )
844 x = w-1;
845 if ( y >= h )
846 y = h-1;
847
848 EVT_setMousePos(x, y);
849 }
850
851 // Set this window to be the child of 'parent'.
852 bool wxWindowMGL::Reparent(wxWindowBase *parent)
853 {
854 if ( !wxWindowBase::Reparent(parent) )
855 return false;
856
857 MGL_wmReparentWindow(m_wnd, parent->GetHandle());
858
859 return true;
860 }
861
862
863 // ---------------------------------------------------------------------------
864 // drag and drop
865 // ---------------------------------------------------------------------------
866
867 #if wxUSE_DRAG_AND_DROP
868
869 void wxWindowMGL::SetDropTarget(wxDropTarget *pDropTarget)
870 {
871 if ( m_dropTarget != 0 ) {
872 m_dropTarget->Revoke(m_hWnd);
873 delete m_dropTarget;
874 }
875
876 m_dropTarget = pDropTarget;
877 if ( m_dropTarget != 0 )
878 m_dropTarget->Register(m_hWnd);
879 }
880 // FIXME_MGL
881 #endif // wxUSE_DRAG_AND_DROP
882
883 // old style file-manager drag&drop support: we retain the old-style
884 // DragAcceptFiles in parallel with SetDropTarget.
885 void wxWindowMGL::DragAcceptFiles(bool WXUNUSED(accept))
886 {
887 #if 0 // FIXME_MGL
888 HWND hWnd = GetHwnd();
889 if ( hWnd )
890 ::DragAcceptFiles(hWnd, (BOOL)accept);
891 #endif
892 }
893
894 // ---------------------------------------------------------------------------
895 // moving and resizing
896 // ---------------------------------------------------------------------------
897
898 // Get total size
899 void wxWindowMGL::DoGetSize(int *x, int *y) const
900 {
901 wxASSERT_MSG( m_wnd, wxT("invalid window") );
902
903 if (x) *x = m_wnd->width;
904 if (y) *y = m_wnd->height;
905 }
906
907 void wxWindowMGL::DoGetPosition(int *x, int *y) const
908 {
909 wxASSERT_MSG( m_wnd, wxT("invalid window") );
910
911 int pX = 0, pY = 0;
912 AdjustForParentClientOrigin(pX, pY, 0);
913
914 if (x) *x = m_wnd->x - pX;
915 if (y) *y = m_wnd->y - pY;
916 }
917
918 void wxWindowMGL::DoScreenToClient(int *x, int *y) const
919 {
920 int ax, ay;
921 MGL_wmCoordGlobalToLocal(m_wnd, 0, 0, &ax, &ay);
922 if (x)
923 (*x) += ax;
924 if (y)
925 (*y) += ay;
926 }
927
928 void wxWindowMGL::DoClientToScreen(int *x, int *y) const
929 {
930 int ax, ay;
931 MGL_wmCoordLocalToGlobal(m_wnd, 0, 0, &ax, &ay);
932 if (x)
933 (*x) += ax;
934 if (y)
935 (*y) += ay;
936 }
937
938 // Get size *available for subwindows* i.e. excluding menu bar etc.
939 void wxWindowMGL::DoGetClientSize(int *x, int *y) const
940 {
941 DoGetSize(x, y);
942 }
943
944 void wxWindowMGL::DoMoveWindow(int x, int y, int width, int height)
945 {
946 wxRect rcClient(GetClientRect());
947
948 MGL_wmSetWindowPosition(m_wnd, x, y, width, height);
949
950 // When the origin or a window stays fixed but the height or width
951 // changes, invalidate the old and new non-client areas
952 if ( !HasFlag(wxFULL_REPAINT_ON_RESIZE) &&
953 m_wnd->x == x && m_wnd->y == y &&
954 rcClient.Intersect(GetClientRect()) != wxRect(0, 0, width, height) )
955 {
956 wxRegion rgn(0, 0, width, height);
957 rgn.Subtract(rcClient);
958
959 // This should work I think, but doesn't seem to:
960 //MGL_wmInvalidateWindowRegion(m_wnd, rgn.GetMGLRegion().rgnPointer());
961
962 // Use MGL_wmInvalidateWindowRect instead:
963 for (wxRegionIterator it(rgn); it; it++)
964 {
965 rect_t rc;
966 rc.left = it.GetX();
967 rc.top = it.GetY();
968 rc.right = rc.left + it.GetW();
969 rc.bottom = rc.top + it.GetH();
970 MGL_wmInvalidateWindowRect(m_wnd, &rc);
971 }
972 }
973 }
974
975 // set the size of the window: if the dimensions are positive, just use them,
976 // but if any of them is equal to -1, it means that we must find the value for
977 // it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
978 // which case -1 is a valid value for x and y)
979 //
980 // If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
981 // the width/height to best suit our contents, otherwise we reuse the current
982 // width/height
983 void wxWindowMGL::DoSetSize(int x, int y, int width, int height, int sizeFlags)
984 {
985 // get the current size and position...
986 int currentX, currentY;
987 GetPosition(&currentX, &currentY);
988 int currentW,currentH;
989 GetSize(&currentW, &currentH);
990
991 // ... and don't do anything (avoiding flicker) if it's already ok
992 if ( x == currentX && y == currentY &&
993 width == currentW && height == currentH )
994 {
995 return;
996 }
997
998 if ( x == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
999 x = currentX;
1000 if ( y == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1001 y = currentY;
1002
1003 AdjustForParentClientOrigin(x, y, sizeFlags);
1004
1005 wxSize size(-1, -1);
1006 if ( width == -1 )
1007 {
1008 if ( sizeFlags & wxSIZE_AUTO_WIDTH )
1009 {
1010 size = DoGetBestSize();
1011 width = size.x;
1012 }
1013 else
1014 {
1015 // just take the current one
1016 width = currentW;
1017 }
1018 }
1019
1020 if ( height == -1 )
1021 {
1022 if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
1023 {
1024 if ( size.x == -1 )
1025 {
1026 size = DoGetBestSize();
1027 }
1028 //else: already called DoGetBestSize() above
1029
1030 height = size.y;
1031 }
1032 else
1033 {
1034 // just take the current one
1035 height = currentH;
1036 }
1037 }
1038
1039 int maxWidth = GetMaxWidth(),
1040 minWidth = GetMinWidth(),
1041 maxHeight = GetMaxHeight(),
1042 minHeight = GetMinHeight();
1043
1044 if ( minWidth != -1 && width < minWidth ) width = minWidth;
1045 if ( maxWidth != -1 && width > maxWidth ) width = maxWidth;
1046 if ( minHeight != -1 && height < minHeight ) height = minHeight;
1047 if ( maxHeight != -1 && height > maxHeight ) height = maxHeight;
1048
1049 if ( m_wnd->x != x || m_wnd->y != y ||
1050 (int)m_wnd->width != width || (int)m_wnd->height != height )
1051 {
1052 DoMoveWindow(x, y, width, height);
1053
1054 wxSize newSize(width, height);
1055 wxSizeEvent event(newSize, GetId());
1056 event.SetEventObject(this);
1057 HandleWindowEvent(event);
1058 }
1059 }
1060
1061 void wxWindowMGL::DoSetClientSize(int width, int height)
1062 {
1063 SetSize(width, height);
1064 }
1065
1066 // ---------------------------------------------------------------------------
1067 // text metrics
1068 // ---------------------------------------------------------------------------
1069
1070 int wxWindowMGL::GetCharHeight() const
1071 {
1072 wxScreenDC dc;
1073 dc.SetFont(m_font);
1074 return dc.GetCharHeight();
1075 }
1076
1077 int wxWindowMGL::GetCharWidth() const
1078 {
1079 wxScreenDC dc;
1080 dc.SetFont(m_font);
1081 return dc.GetCharWidth();
1082 }
1083
1084 void wxWindowMGL::DoGetTextExtent(const wxString& string,
1085 int *x, int *y,
1086 int *descent,
1087 int *externalLeading,
1088 const wxFont *theFont) const
1089 {
1090 wxScreenDC dc;
1091 if (!theFont)
1092 theFont = &m_font;
1093 dc.GetTextExtent(string, x, y, descent, externalLeading, (wxFont*)theFont);
1094 }
1095
1096
1097 // ---------------------------------------------------------------------------
1098 // painting
1099 // ---------------------------------------------------------------------------
1100
1101 void wxWindowMGL::Refresh(bool eraseBack, const wxRect *rect)
1102 {
1103 if ( m_eraseBackground == -1 )
1104 m_eraseBackground = eraseBack;
1105 else
1106 m_eraseBackground |= eraseBack;
1107
1108 if ( rect )
1109 {
1110 rect_t r;
1111 r.left = rect->GetLeft(), r.right = rect->GetRight();
1112 r.top = rect->GetTop(), r.bottom = rect->GetBottom();
1113 MGL_wmInvalidateWindowRect(GetHandle(), &r);
1114 }
1115 else
1116 MGL_wmInvalidateWindow(GetHandle());
1117 }
1118
1119 void wxWindowMGL::Update()
1120 {
1121 if ( !IsFrozen() )
1122 MGL_wmUpdateDC(g_winMng);
1123 }
1124
1125 void wxWindowMGL::DoFreeze()
1126 {
1127 m_refreshAfterThaw = false;
1128 }
1129
1130 void wxWindowMGL::DoThaw()
1131 {
1132 if ( m_refreshAfterThaw )
1133 Refresh();
1134 }
1135
1136 void wxWindowMGL::HandlePaint(MGLDevCtx *dc)
1137 {
1138 if ( IsFrozen() )
1139 {
1140 // Don't paint anything if the window is frozen.
1141 m_refreshAfterThaw = true;
1142 return;
1143 }
1144
1145 #if wxDEBUG_LEVEL >= 2
1146 // FIXME_MGL -- debugging stuff, to be removed!
1147 static int debugPaintEvents = -1;
1148 if ( debugPaintEvents == -1 )
1149 debugPaintEvents = wxGetEnv(wxT("WXMGL_DEBUG_PAINT_EVENTS"), NULL);
1150 if ( debugPaintEvents )
1151 {
1152 dc->setColorRGB(255,0,255);
1153 dc->fillRect(-1000,-1000,2000,2000);
1154 wxMilliSleep(50);
1155 }
1156 #endif // wxDEBUG_LEVEL >= 2
1157
1158 MGLRegion clip;
1159 dc->getClipRegion(clip);
1160 m_updateRegion = wxRegion(clip);
1161 m_paintMGLDC = dc;
1162
1163 #if wxUSE_CARET
1164 // must hide caret temporarily, otherwise we'd get rendering artifacts
1165 wxCaret *caret = GetCaret();
1166 if ( caret )
1167 caret->Hide();
1168 #endif // wxUSE_CARET
1169
1170 if ( m_eraseBackground != 0 )
1171 {
1172 wxWindowDC dc((wxWindow*)this);
1173 wxEraseEvent eventEr(m_windowId, &dc);
1174 eventEr.SetEventObject(this);
1175 HandleWindowEvent(eventEr);
1176 }
1177 m_eraseBackground = -1;
1178
1179 wxNcPaintEvent eventNc(GetId());
1180 eventNc.SetEventObject(this);
1181 HandleWindowEvent(eventNc);
1182
1183 wxPaintEvent eventPt(GetId());
1184 eventPt.SetEventObject(this);
1185 HandleWindowEvent(eventPt);
1186
1187 #if wxUSE_CARET
1188 if ( caret )
1189 caret->Show();
1190 #endif // wxUSE_CARET
1191
1192 m_paintMGLDC = NULL;
1193 m_updateRegion.Clear();
1194 }
1195
1196
1197 // Find the wxWindow at the current mouse position, returning the mouse
1198 // position.
1199 wxWindow* wxFindWindowAtPointer(wxPoint& pt)
1200 {
1201 return wxFindWindowAtPoint(pt = wxGetMousePosition());
1202 }
1203
1204 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
1205 {
1206 window_t *wnd = MGL_wmGetWindowAtPosition(g_winMng, pt.x, pt.y);
1207 return (wxWindow*)wnd->userData;
1208 }