]> git.saurik.com Git - wxWidgets.git/blobdiff - src/mgl/window.cpp
supporting events also for root control (needed for event handling of mouse and paint...
[wxWidgets.git] / src / mgl / window.cpp
index 36e2e1344379ce1f979c204b3151772276d6389d..ae6e6e017708c3f04cf741083015c63c3133d147 100644 (file)
@@ -4,8 +4,8 @@
 // Author:      Vaclav Slavik
 //              (based on GTK & MSW implementations)
 // RCS-ID:      $Id$
-// Copyright:   (c) 2001 SciTech Software, Inc. (www.scitechsoft.com)
-// Licence:     wxWindows license
+// Copyright:   (c) 2001-2002 SciTech Software, Inc. (www.scitechsoft.com)
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
 // ===========================================================================
@@ -16,7 +16,7 @@
 // headers
 // ---------------------------------------------------------------------------
 
-#ifdef __GNUG__
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
     #pragma implementation "window.h"
 #endif
 
@@ -29,6 +29,7 @@
 
 #ifndef WX_PRECOMP
     #include "wx/window.h"
+    #include "wx/msgdlg.h"
     #include "wx/accel.h"
     #include "wx/setup.h"
     #include "wx/dc.h"
 winmng_t *g_winMng = NULL;
 MGLDevCtx *g_displayDC = NULL;
 
-// the window that has keyboard focus: 
+// the window that has keyboard focus:
 static wxWindowMGL *gs_focusedWindow = NULL;
+// the window that is about to be focused after currently focused
+// one looses focus:
+static wxWindow *gs_toBeFocusedWindow = NULL;
 // the window that is currently under mouse cursor:
 static wxWindowMGL *gs_windowUnderMouse = NULL;
 // the window that has mouse capture
@@ -77,7 +81,7 @@ static wxWindowMGL *gs_activeFrame = NULL;
 // constants
 // ---------------------------------------------------------------------------
 
-// Custom identifiers used to distinguish between various event handlers 
+// Custom identifiers used to distinguish between various event handlers
 // and capture handlers passed to MGL_wm
 enum
 {
@@ -99,20 +103,35 @@ static wxWindowMGL* wxGetTopLevelParent(wxWindowMGL *win)
     return p;
 }
 
-#ifdef __WXDEBUG__
-// Add an easy way to capture screenshots:
-static void CaptureScreenshot()
+// An easy way to capture screenshots:
+static void wxCaptureScreenshot(bool activeWindowOnly)
 {
-    wxBusyCursor bcur;
-    
+#ifdef __DOS__
+    #define SCREENSHOT_FILENAME _T("sshot%03i.png")
+#else
+    #define SCREENSHOT_FILENAME _T("screenshot-%03i.png")
+#endif
     static int screenshot_num = 0;
-    char screenshot[128];
-    sprintf(screenshot, "screenshot-%03i.png", screenshot_num++);
-    g_displayDC->savePNGFromDC(screenshot, 0, 0, 
-                               g_displayDC->sizex(), 
-                               g_displayDC->sizey());
+    wxString screenshot;
+
+    do
+    {
+        screenshot.Printf(SCREENSHOT_FILENAME, screenshot_num++);
+    } while ( wxFileExists(screenshot) && screenshot_num < 1000 );
+
+    wxRect r(0, 0, g_displayDC->sizex(), g_displayDC->sizey());
+
+    if ( activeWindowOnly && gs_activeFrame )
+    {
+        r.Intersect(gs_activeFrame->GetRect());
+    }
+
+    g_displayDC->savePNGFromDC(screenshot.mb_str(),
+                               r.x, r. y, r.x+r.width, r.y+r.height);
+
+    wxMessageBox(wxString::Format(_T("Screenshot captured: %s"),
+                                  screenshot.c_str()));
 }
-#endif
 
 // ---------------------------------------------------------------------------
 // MGL_WM hooks:
@@ -121,7 +140,7 @@ static void CaptureScreenshot()
 static void MGLAPI wxWindowPainter(window_t *wnd, MGLDC *dc)
 {
     wxWindowMGL *w = (wxWindow*) wnd->userData;
-    
+
     if ( w && !(w->GetWindowStyle() & wxTRANSPARENT_WINDOW) )
     {
         MGLDevCtx ctx(dc);
@@ -134,18 +153,18 @@ static ibool MGLAPI wxWindowMouseHandler(window_t *wnd, event_t *e)
     wxWindowMGL *win = (wxWindowMGL*)MGL_wmGetWindowUserData(wnd);
     wxPoint orig(win->GetClientAreaOrigin());
     wxPoint where;
-    
-    MGL_wmCoordGlobalToLocal(win->GetHandle(), 
+
+    MGL_wmCoordGlobalToLocal(win->GetHandle(),
                              e->where_x, e->where_y, &where.x, &where.y);
 
     for (wxWindowMGL *w = win; w; w = w->GetParent())
     {
-        if ( !w->IsEnabled() ) 
+        if ( !w->IsEnabled() )
             return FALSE;
         if ( w->IsTopLevel() )
             break;
     }
-    
+
     wxEventType type = wxEVT_NULL;
     wxMouseEvent event;
     event.SetEventObject(win);
@@ -159,23 +178,33 @@ static ibool MGLAPI wxWindowMouseHandler(window_t *wnd, event_t *e)
     event.m_leftDown = e->modifiers & EVT_LEFTBUT;
     event.m_middleDown = e->modifiers & EVT_MIDDLEBUT;
     event.m_rightDown = e->modifiers & EVT_RIGHTBUT;
-    
+
     switch (e->what)
     {
         case EVT_MOUSEDOWN:
-            if ( e->message & EVT_LEFTBMASK )
-                type = (e->message & EVT_DBLCLICK) ?
-                        wxEVT_LEFT_DCLICK : wxEVT_LEFT_DOWN;
-            else if ( e->message & EVT_MIDDLEBMASK )
-                type = (e->message & EVT_DBLCLICK) ?
-                        wxEVT_MIDDLE_DCLICK : wxEVT_MIDDLE_DOWN;
-            else if ( e->message & EVT_RIGHTBMASK )
-                type = (e->message & EVT_DBLCLICK) ? 
-                        wxEVT_RIGHT_DCLICK : wxEVT_RIGHT_DOWN;
-
+            // Change focus if the user clicks outside focused window:
             if ( win->AcceptsFocus() && wxWindow::FindFocus() != win )
                 win->SetFocus();
 
+            if ( e->message & EVT_DBLCLICK )
+            {
+                if ( e->message & EVT_LEFTBMASK )
+                    type = wxEVT_LEFT_DCLICK;
+                else if ( e->message & EVT_MIDDLEBMASK )
+                    type = wxEVT_MIDDLE_DCLICK;
+                else if ( e->message & EVT_RIGHTBMASK )
+                    type = wxEVT_RIGHT_DCLICK;
+            }
+            else
+            {
+                if ( e->message & EVT_LEFTBMASK )
+                    type = wxEVT_LEFT_DOWN;
+                else if ( e->message & EVT_MIDDLEBMASK )
+                    type = wxEVT_MIDDLE_DOWN;
+                else if ( e->message & EVT_RIGHTBMASK )
+                    type = wxEVT_RIGHT_DOWN;
+            }
+
             break;
 
         case EVT_MOUSEUP:
@@ -195,8 +224,8 @@ static ibool MGLAPI wxWindowMouseHandler(window_t *wnd, event_t *e)
                     if ( gs_windowUnderMouse )
                     {
                         wxMouseEvent event2(event);
-                        MGL_wmCoordGlobalToLocal(gs_windowUnderMouse->GetHandle(), 
-                                                 e->where_x, e->where_y, 
+                        MGL_wmCoordGlobalToLocal(gs_windowUnderMouse->GetHandle(),
+                                                 e->where_x, e->where_y,
                                                  &event2.m_x, &event2.m_y);
 
                         wxPoint orig(gs_windowUnderMouse->GetClientAreaOrigin());
@@ -217,28 +246,28 @@ static ibool MGLAPI wxWindowMouseHandler(window_t *wnd, event_t *e)
             }
             else // gs_mouseCapture
             {
-                bool inside = (where.x >= 0 && 
+                bool inside = (where.x >= 0 &&
                                where.y >= 0 &&
                                where.x < win->GetSize().x &&
                                where.y < win->GetSize().y);
                 if ( (inside && gs_windowUnderMouse != win) ||
                      (!inside && gs_windowUnderMouse == win) )
                 {
-                    wxMouseEvent evt(inside ? 
+                    wxMouseEvent evt(inside ?
                                      wxEVT_ENTER_WINDOW : wxEVT_LEAVE_WINDOW);
                     evt.SetEventObject(win);
                     win->GetEventHandler()->ProcessEvent(evt);
                     gs_windowUnderMouse = inside ? win : NULL;
                 }
             }
-            
+
             type = wxEVT_MOTION;
             break;
 
         default:
             break;
     }
-    
+
     if ( type == wxEVT_NULL )
     {
         return FALSE;
@@ -264,11 +293,11 @@ static long wxScanToKeyCode(event_t *event, bool translate)
           break;
     #else
       #define KEY(mgl_key,wx_key) \
-        case mgl_key: key = wx_key; break; 
+        case mgl_key: key = wx_key; break;
     #endif
 
     long key = 0;
-    
+
     if ( translate )
     {
         switch ( EVT_scanCode(event->message) )
@@ -342,7 +371,7 @@ static long wxScanToKeyCode(event_t *event, bool translate)
             default: break;
         }
     }
-    
+
     if ( key == 0 )
     {
         switch ( EVT_scanCode(event->message) )
@@ -386,10 +415,10 @@ static long wxScanToKeyCode(event_t *event, bool translate)
             KEY (KB_esc,            WXK_ESCAPE)
             KEY (KB_backspace,      WXK_BACK)
             KEY (KB_tab,            WXK_TAB)
-            KEY (KB_enter,          WXK_RETURN) 
+            KEY (KB_enter,          WXK_RETURN)
 
-            default:                  
-                key = EVT_asciiCode(event->message); 
+            default:
+                key = EVT_asciiCode(event->message);
                 break;
         }
     }
@@ -399,6 +428,23 @@ static long wxScanToKeyCode(event_t *event, bool translate)
     return key;
 }
 
+static bool wxHandleSpecialKeys(wxKeyEvent& event)
+{
+    // Add an easy way to capture screenshots:
+    if ( event.m_keyCode == WXK_SNAPSHOT
+    #ifdef __WXDEBUG__ // FIXME_MGL - remove when KB_sysReq works in MGL!
+         || (event.m_keyCode == WXK_F1 &&
+            event.m_shiftDown && event.m_controlDown)
+    #endif
+       )
+    {
+        wxCaptureScreenshot(event.m_altDown/*only active wnd?*/);
+        return TRUE;
+    }
+
+    return FALSE;
+}
+
 static ibool MGLAPI wxWindowKeybHandler(window_t *wnd, event_t *e)
 {
     wxWindowMGL *win = (wxWindowMGL*)MGL_wmGetWindowUserData(wnd);
@@ -406,9 +452,9 @@ static ibool MGLAPI wxWindowKeybHandler(window_t *wnd, event_t *e)
     if ( !win->IsEnabled() ) return FALSE;
 
     wxPoint where;
-    MGL_wmCoordGlobalToLocal(win->GetHandle(), 
+    MGL_wmCoordGlobalToLocal(win->GetHandle(),
                              e->where_x, e->where_y, &where.x, &where.y);
-    
+
     wxKeyEvent event;
     event.SetEventObject(win);
     event.SetTimestamp(e->when);
@@ -433,47 +479,21 @@ static ibool MGLAPI wxWindowKeybHandler(window_t *wnd, event_t *e)
 
         event.SetEventType(wxEVT_KEY_DOWN);
         event2 = event;
-    
-        ret = win->GetEventHandler()->ProcessEvent(event);
 
-
-#ifdef __WXDEBUG__
-        // Add an easy way to capture screenshots:
-        if ( event.m_keyCode == WXK_F1 && 
-             event.m_shiftDown && event.m_controlDown )
-            CaptureScreenshot();
-#endif
-
-#if wxUSE_ACCEL
-        if ( !ret )
-        {
-            for (wxWindowMGL *w = win; w; w = w->GetParent())
-            {
-                int command = w->GetAcceleratorTable()->GetCommand(event);
-                if ( command != -1 )
-                {
-                    wxCommandEvent eventc(wxEVT_COMMAND_MENU_SELECTED, command);
-                    ret = w->GetEventHandler()->ProcessEvent(eventc);
-                    break;
-                }
-                if ( w->IsTopLevel() )
-                    break;
-            }
-        }
-#endif // wxUSE_ACCEL
+        ret = win->GetEventHandler()->ProcessEvent(event);
 
         // wxMSW doesn't send char events with Alt pressed
         // Only send wxEVT_CHAR event if not processed yet. Thus, ALT-x
-        // will only be sent if it is not in an accelerator table.
+        // will only be sent if it is not in an accelerator table:
         event2.m_keyCode = wxScanToKeyCode(e, FALSE);
         if ( !ret && event2.m_keyCode != 0 )
         {
             event2.SetEventType(wxEVT_CHAR);
             ret = win->GetEventHandler()->ProcessEvent(event2);
         }
-        
+
         // Synthetize navigation key event, but do it only if the TAB key
-        // wasn't handled yet.
+        // wasn't handled yet:
         if ( !ret && event.m_keyCode == WXK_TAB &&
              win->GetParent() && win->GetParent()->HasFlag(wxTAB_TRAVERSAL) )
         {
@@ -486,7 +506,12 @@ static ibool MGLAPI wxWindowKeybHandler(window_t *wnd, event_t *e)
             navEvent.SetCurrentFocus(wxStaticCast(win, wxWindow));
             ret = win->GetParent()->GetEventHandler()->ProcessEvent(navEvent);
         }
-        
+
+        // Finally, process special meaning keys that are usually
+        // a responsibility of OS or window manager:
+        if ( !ret )
+            ret = wxHandleSpecialKeys(event);
+
         return ret;
     }
 }
@@ -509,7 +534,7 @@ END_EVENT_TABLE()
 // constructors and such
 // ----------------------------------------------------------------------------
 
-extern wxDisplayModeInfo wxGetDefaultDisplayMode();
+extern wxVideoMode wxGetDefaultDisplayMode();
 
 void wxWindowMGL::Init()
 {
@@ -518,17 +543,12 @@ void wxWindowMGL::Init()
     if ( !g_winMng )
     {
         if ( !wxTheApp->SetDisplayMode(wxGetDefaultDisplayMode()) )
-            wxFatalError(_("Cannot initialize display."));
+            wxLogFatalError(_("Cannot initialize display."));
     }
 
-    // generic:
-    InitBase();
-
     // mgl specific:
     m_wnd = NULL;
     m_isShown = TRUE;
-    m_isBeingDeleted = FALSE;
-    m_isEnabled = TRUE;
     m_frozen = FALSE;
     m_paintMGLDC = NULL;
     m_eraseBackground = -1;
@@ -537,6 +557,8 @@ void wxWindowMGL::Init()
 // Destructor
 wxWindowMGL::~wxWindowMGL()
 {
+    SendDestroyEvent();
+
     m_isBeingDeleted = TRUE;
 
     if ( gs_mouseCapture == this )
@@ -544,29 +566,28 @@ wxWindowMGL::~wxWindowMGL()
 
     if (gs_activeFrame == this)
     {
-       gs_activeFrame = NULL;
-       // activate next frame in Z-order:
-       if ( m_wnd->prev )
-       {
-           wxWindowMGL *win = (wxWindowMGL*)m_wnd->prev->userData;
-           win->SetFocus();
+        gs_activeFrame = NULL;
+        // activate next frame in Z-order:
+        if ( m_wnd->prev )
+        {
+            wxWindowMGL *win = (wxWindowMGL*)m_wnd->prev->userData;
+            win->SetFocus();
+        }
+        else if ( m_wnd->next )
+        {
+            wxWindowMGL *win = (wxWindowMGL*)m_wnd->next->userData;
+            win->SetFocus();
         }
     }
-    
+
     if ( gs_focusedWindow == this )
         KillFocus();
 
     if ( gs_windowUnderMouse == this )
         gs_windowUnderMouse = NULL;
 
-    // VS: destroy children first and _then_ detach *this from its parent.
-    //     If we'd do it the other way around, children wouldn't be able
-    //     find their parent frame (see above).
     DestroyChildren();
 
-    if ( m_parent )
-        m_parent->RemoveChild(this);
-
     if ( m_wnd )
         MGL_wmDestroyWindow(m_wnd);
 }
@@ -591,13 +612,14 @@ bool wxWindowMGL::Create(wxWindow *parent,
         x = 0; // FIXME_MGL, something better, see GTK+
     if ( y == -1 )
         y = 0; // FIXME_MGL, something better, see GTK+
+    AdjustForParentClientOrigin(x, y, 0);
     w = WidthDefault(size.x);
     h = HeightDefault(size.y);
-    
+
     long mgl_style = 0;
     window_t *wnd_parent = parent ? parent->GetHandle() : NULL;
 
-    if ( !(style & wxNO_FULL_REPAINT_ON_RESIZE) )
+    if ( style & wxFULL_REPAINT_ON_RESIZE )
     {
         mgl_style |= MGL_WM_FULL_REPAINT_ON_RESIZE;
     }
@@ -617,7 +639,7 @@ bool wxWindowMGL::Create(wxWindow *parent,
 
     MGL_wmSetWindowFlags(wnd, mgl_style);
     MGL_wmShowWindow(wnd, m_isShown);
-    
+
     SetMGLwindow_t(wnd);
 
     return TRUE;
@@ -630,7 +652,7 @@ void wxWindowMGL::SetMGLwindow_t(struct window_t *wnd)
 
     m_wnd = wnd;
     if ( !m_wnd ) return;
-    
+
     m_isShown = m_wnd->visible;
 
     MGL_wmSetWindowUserData(m_wnd, (void*) this);
@@ -652,11 +674,17 @@ void wxWindowMGL::SetFocus()
 {
     if ( gs_focusedWindow == this ) return;
 
+    wxWindowMGL *oldFocusedWindow = gs_focusedWindow;
+
     if ( gs_focusedWindow )
+    {
+        gs_toBeFocusedWindow = (wxWindow*)this;
         gs_focusedWindow->KillFocus();
-    
+        gs_toBeFocusedWindow = NULL;
+    }
+
     gs_focusedWindow = this;
-    
+
     MGL_wmCaptureEvents(GetHandle(), EVT_KEYEVT, wxMGL_CAPTURE_KEYB);
 
     wxWindowMGL *active = wxGetTopLevelParent(this);
@@ -674,9 +702,10 @@ void wxWindowMGL::SetFocus()
         event.SetEventObject(gs_activeFrame);
         gs_activeFrame->GetEventHandler()->ProcessEvent(event);
     }
-    
+
     wxFocusEvent event(wxEVT_SET_FOCUS, GetId());
     event.SetEventObject(this);
+    event.SetWindow((wxWindow*)oldFocusedWindow);
     GetEventHandler()->ProcessEvent(event);
 
 #if wxUSE_CARET
@@ -693,7 +722,7 @@ void wxWindowMGL::KillFocus()
     gs_focusedWindow = NULL;
 
     if ( m_isBeingDeleted ) return;
-    
+
     MGL_wmUncaptureEvents(GetHandle(), wxMGL_CAPTURE_KEYB);
 
 #if wxUSE_CARET
@@ -705,6 +734,7 @@ void wxWindowMGL::KillFocus()
 
     wxFocusEvent event(wxEVT_KILL_FOCUS, GetId());
     event.SetEventObject(this);
+    event.SetWindow(gs_toBeFocusedWindow);
     GetEventHandler()->ProcessEvent(event);
 }
 
@@ -723,14 +753,23 @@ bool wxWindowMGL::Show(bool show)
         return FALSE;
 
     MGL_wmShowWindow(m_wnd, show);
-    
+
     if (!show && gs_activeFrame == this)
     {
-       // activate next frame in Z-order:
-       if ( m_wnd->prev )
-       {
-           wxWindowMGL *win = (wxWindowMGL*)m_wnd->prev->userData;
-           win->SetFocus();
+        // activate next frame in Z-order:
+        if ( m_wnd->prev )
+        {
+            wxWindowMGL *win = (wxWindowMGL*)m_wnd->prev->userData;
+            win->SetFocus();
+        }
+        else if ( m_wnd->next )
+        {
+            wxWindowMGL *win = (wxWindowMGL*)m_wnd->next->userData;
+            win->SetFocus();
+        }
+        else
+        {
+            gs_activeFrame = NULL;
         }
     }
 
@@ -760,8 +799,8 @@ void wxWindowMGL::DoCaptureMouse()
 
 void wxWindowMGL::DoReleaseMouse()
 {
-    wxASSERT_MSG( gs_mouseCapture == this, wxT("attempt to release mouse, but this window hasn't captured it") )
-    
+    wxASSERT_MSG( gs_mouseCapture == this, wxT("attempt to release mouse, but this window hasn't captured it") );
+
     MGL_wmUncaptureEvents(m_wnd, wxMGL_CAPTURE_MOUSE);
     gs_mouseCapture = NULL;
 }
@@ -789,40 +828,21 @@ bool wxWindowMGL::SetCursor(const wxCursor& cursor)
 
 void wxWindowMGL::WarpPointer(int x, int y)
 {
-    ClientToScreen(&x, &y);
-    EVT_setMousePos(x, y);
-}
+    int w, h;
+    wxDisplaySize(&w, &h);
 
-#if WXWIN_COMPATIBILITY
-// If nothing defined for this, try the parent.
-// E.g. we may be a button loaded from a resource, with no callback function
-// defined.
-void wxWindowMGL::OnCommand(wxWindow& win, wxCommandEvent& event)
-{
-    if ( GetEventHandler()->ProcessEvent(event)  )
-        return;
-    if ( m_parent )
-        m_parent->GetEventHandler()->OnCommand(win, event);
-}
-#endif // WXWIN_COMPATIBILITY_2
+    ClientToScreen(&x, &y);
+    if ( x < 0 )
+        x = 0;
+    if ( y < 0 )
+        y = 0;
+    if ( x >= w )
+        x = w-1;
+    if ( y >= h )
+        y = h-1;
 
-#if WXWIN_COMPATIBILITY
-wxObject* wxWindowMGL::GetChild(int number) const
-{
-    // Return a pointer to the Nth object in the Panel
-    wxNode *node = GetChildren().First();
-    int n = number;
-    while (node && n--)
-        node = node->Next();
-    if ( node )
-    {
-        wxObject *obj = (wxObject *)node->Data();
-        return(obj);
-    }
-    else
-        return NULL;
+    EVT_setMousePos(x, y);
 }
-#endif // WXWIN_COMPATIBILITY
 
 // Set this window to be the child of 'parent'.
 bool wxWindowMGL::Reparent(wxWindowBase *parent)
@@ -874,14 +894,21 @@ void wxWindowMGL::DragAcceptFiles(bool accept)
 // Get total size
 void wxWindowMGL::DoGetSize(int *x, int *y) const
 {
+    wxASSERT_MSG( m_wnd, wxT("invalid window") );
+
     if (x) *x = m_wnd->width;
     if (y) *y = m_wnd->height;
 }
 
 void wxWindowMGL::DoGetPosition(int *x, int *y) const
 {
-    if (x) *x = m_wnd->x;
-    if (y) *y = m_wnd->y;
+    wxASSERT_MSG( m_wnd, wxT("invalid window") );
+
+    int pX = 0, pY = 0;
+    AdjustForParentClientOrigin(pX, pY, 0);
+
+    if (x) *x = m_wnd->x - pX;
+    if (y) *y = m_wnd->y - pY;
 }
 
 void wxWindowMGL::DoScreenToClient(int *x, int *y) const
@@ -979,7 +1006,17 @@ void wxWindowMGL::DoSetSize(int x, int y, int width, int height, int sizeFlags)
         }
     }
 
-    if ( m_wnd->x != x || m_wnd->y != y || 
+    int maxWidth = GetMaxWidth(),
+        minWidth = GetMinWidth(),
+        maxHeight = GetMaxHeight(),
+        minHeight = GetMinHeight();
+
+    if ( minWidth != -1 && width < minWidth ) width = minWidth;
+    if ( maxWidth != -1 && width > maxWidth ) width = maxWidth;
+    if ( minHeight != -1 && height < minHeight ) height = minHeight;
+    if ( maxHeight != -1 && height > maxHeight ) height = maxHeight;
+
+    if ( m_wnd->x != x || m_wnd->y != y ||
          (int)m_wnd->width != width || (int)m_wnd->height != height )
     {
         DoMoveWindow(x, y, width, height);
@@ -1024,48 +1061,6 @@ void wxWindowMGL::GetTextExtent(const wxString& string,
     dc.GetTextExtent(string, x, y, descent, externalLeading, (wxFont*)theFont);
 }
 
-#if wxUSE_CARET && WXWIN_COMPATIBILITY
-// ---------------------------------------------------------------------------
-// Caret manipulation
-// ---------------------------------------------------------------------------
-
-void wxWindowMGL::CreateCaret(int w, int h)
-{
-    SetCaret(new wxCaret(this, w, h));
-}
-
-void wxWindowMGL::CreateCaret(const wxBitmap *WXUNUSED(bitmap))
-{
-    wxFAIL_MSG("not implemented");
-}
-
-void wxWindowMGL::ShowCaret(bool show)
-{
-    wxCHECK_RET( m_caret, "no caret to show" );
-
-    m_caret->Show(show);
-}
-
-void wxWindowMGL::DestroyCaret()
-{
-    SetCaret(NULL);
-}
-
-void wxWindowMGL::SetCaretPos(int x, int y)
-{
-    wxCHECK_RET( m_caret, "no caret to move" );
-
-    m_caret->Move(x, y);
-}
-
-void wxWindowMGL::GetCaretPos(int *x, int *y) const
-{
-    wxCHECK_RET( m_caret, "no caret to get position of" );
-
-    m_caret->GetPosition(x, y);
-}
-#endif // wxUSE_CARET
-
 
 // ---------------------------------------------------------------------------
 // painting
@@ -1086,7 +1081,7 @@ void wxWindowMGL::Refresh(bool eraseBack, const wxRect *rect)
         m_eraseBackground = eraseBack;
     else
         m_eraseBackground |= eraseBack;
-        
+
     if ( rect )
     {
         rect_t r;
@@ -1121,15 +1116,22 @@ void wxWindowMGL::HandlePaint(MGLDevCtx *dc)
 {
     if ( m_frozen )
     {
-        // Don't paint anything if the window is frozen. 
+        // Don't paint anything if the window is frozen.
         m_refreshAfterThaw = TRUE;
         return;
     }
-    
-#if 0 // FIXME_MGL -- debugging stuff!
-    dc->setColorRGB(255,0,255);
-    dc->fillRect(-1000,-1000,2000,2000);
-    wxUsleep(50);
+
+#ifdef __WXDEBUG__
+    // FIXME_MGL -- debugging stuff, to be removed!
+    static int debugPaintEvents = -1;
+    if ( debugPaintEvents == -1 )
+        debugPaintEvents = wxGetEnv(wxT("WXMGL_DEBUG_PAINT_EVENTS"), NULL);
+    if ( debugPaintEvents )
+    {
+        dc->setColorRGB(255,0,255);
+        dc->fillRect(-1000,-1000,2000,2000);
+        wxUsleep(50);
+    }
 #endif
 
     MGLRegion clip;
@@ -1156,7 +1158,7 @@ void wxWindowMGL::HandlePaint(MGLDevCtx *dc)
     wxNcPaintEvent eventNc(GetId());
     eventNc.SetEventObject(this);
     GetEventHandler()->ProcessEvent(eventNc);
-    
+
     wxPaintEvent eventPt(GetId());
     eventPt.SetEventObject(this);
     GetEventHandler()->ProcessEvent(eventPt);
@@ -1183,3 +1185,14 @@ wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
     window_t *wnd = MGL_wmGetWindowAtPosition(g_winMng, pt.x, pt.y);
     return (wxWindow*)wnd->userData;
 }
+
+
+// ---------------------------------------------------------------------------
+// idle events processing
+// ---------------------------------------------------------------------------
+
+void wxWindowMGL::OnInternalIdle()
+{
+    if (wxUpdateUIEvent::CanUpdate(this))
+        UpdateWindowUI(wxUPDATE_UI_FROMIDLE);
+}