]> git.saurik.com Git - wxWidgets.git/blobdiff - src/mgl/window.cpp
moved DLL import/export declarations from wx/defs.h to (new) wx/dlimpexp.h for GSocke...
[wxWidgets.git] / src / mgl / window.cpp
index 1ac85be6fa4268c6474338f5fe7d013fdc1a6268..86c0ae8534608fd1b251614e4296d296fa44bb89 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;
 
-extern wxList WXDLLEXPORT wxPendingDelete;
- // FIXME_MGL -- ???
-
-// the window that has keyboard+joystick focus: 
-static wxWindowMGL *g_focusedWindow = NULL;
+// 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 *g_windowUnderMouse = NULL;
+static wxWindowMGL *gs_windowUnderMouse = NULL;
+// the window that has mouse capture
+static wxWindowMGL *gs_mouseCapture = NULL;
+// the frame that is currently active (i.e. its child has focus). It is
+// used to generate wxActivateEvents
+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
 {
@@ -88,79 +94,425 @@ enum
 // private functions
 // ---------------------------------------------------------------------------
 
-// wxCreateMGL_WM creates MGL display DC and associates it with winmng_t
-// structure. Dimensions and depth of the DC are fetched from wxSystemOptions
-// object. 
-// This function is *not* called from wxApp's initialization but rather at
-// the time when WM is needed, i.e. when first wxWindow is created. This 
-// has two important effects:
-//   a) it is possible to write windowless wxMGL apps
-//   b) the app has plenty of time in wxApp::OnInit to feed wxSystemOptions
-//      with desired settings
-
-bool wxCreateMGL_WM()
-{
-    int mode;
-    int width = 640, height = 480, depth = 16;
-    int refresh = MGL_DEFAULT_REFRESH;
-    
-#if wxUSE_SYSTEM_OPTIONS
-    if ( wxSystemOptions::HasOption(wxT("mgl.screen-width") )
-        width = wxSystemOptions::GetOptionInt(wxT("mgl.screen-width"));
-    if ( wxSystemOptions::HasOption(wxT("mgl.screen-height") )
-        height = wxSystemOptions::GetOptionInt(wxT("mgl.screen-height"));
-    if ( wxSystemOptions::HasOption(wxT("mgl.screen-depth") )
-        depth = wxSystemOptions::GetOptionInt(wxT("mgl.screen-depth"));
-    if ( wxSystemOptions::HasOption(wxT("mgl.screen-refresh") )
-        refresh = wxSystemOptions::GetOptionInt(wxT("mgl.screen-refresh"));
+// Returns toplevel grandparent of given window:
+static wxWindowMGL* wxGetTopLevelParent(wxWindowMGL *win)
+{
+    wxWindowMGL *p = win;
+    while (p && !p->IsTopLevel())
+         p = p->GetParent();
+    return p;
+}
+
+// An easy way to capture screenshots:
+static void wxCaptureScreenshot(bool activeWindowOnly)
+{
+#ifdef __DOS__
+    #define SCREENSHOT_FILENAME _T("sshot%03i.png")
+#else
+    #define SCREENSHOT_FILENAME _T("screenshot-%03i.png")
 #endif
-        
-    mode = MGL_findMode(width, height, depth);
-    if ( mode == -1 )
+    static int screenshot_num = 0;
+    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()));
+}
+
+// ---------------------------------------------------------------------------
+// MGL_WM hooks:
+// ---------------------------------------------------------------------------
+
+static void MGLAPI wxWindowPainter(window_t *wnd, MGLDC *dc)
+{
+    wxWindowMGL *w = (wxWindow*) wnd->userData;
+
+    if ( w && !(w->GetWindowStyle() & wxTRANSPARENT_WINDOW) )
     {
-        wxLogWarning(_("Mode %ix%i-%i not available, falling back to default mode."), width, height, depth);
-        mode = 0; // always available
+        MGLDevCtx ctx(dc);
+        w->HandlePaint(&ctx);
     }
-    g_displayDC = new MGLDisplayDC(mode, 1, refresh);
-    if ( !g_displayDC->isValid() )
+}
+
+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(),
+                             e->where_x, e->where_y, &where.x, &where.y);
+
+    for (wxWindowMGL *w = win; w; w = w->GetParent())
     {
-        delete g_displayDC;
-        g_displayDC = NULL;
-        return FALSE;
+        if ( !w->IsEnabled() )
+            return FALSE;
+        if ( w->IsTopLevel() )
+            break;
     }
-    
-    g_winMng = MGL_wmCreate(g_displayDC->getDC());
-    if (!g_winMng)
+
+    wxEventType type = wxEVT_NULL;
+    wxMouseEvent event;
+    event.SetEventObject(win);
+    event.SetTimestamp(e->when);
+    event.m_x = where.x - orig.x;
+    event.m_y = where.y - orig.y;
+    event.m_shiftDown = e->modifiers & EVT_SHIFTKEY;
+    event.m_controlDown = e->modifiers & EVT_CTRLSTATE;
+    event.m_altDown = e->modifiers & EVT_LEFTALT;
+    event.m_metaDown = e->modifiers & EVT_RIGHTALT;
+    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:
+            // 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:
+            if ( e->message & EVT_LEFTBMASK )
+                type = wxEVT_LEFT_UP;
+            else if ( e->message & EVT_MIDDLEBMASK )
+                type = wxEVT_MIDDLE_UP;
+            else if ( e->message & EVT_RIGHTBMASK )
+                type = wxEVT_RIGHT_UP;
+            break;
+
+        case EVT_MOUSEMOVE:
+            if ( !gs_mouseCapture )
+            {
+                if ( win != gs_windowUnderMouse )
+                {
+                    if ( gs_windowUnderMouse )
+                    {
+                        wxMouseEvent event2(event);
+                        MGL_wmCoordGlobalToLocal(gs_windowUnderMouse->GetHandle(),
+                                                 e->where_x, e->where_y,
+                                                 &event2.m_x, &event2.m_y);
+
+                        wxPoint orig(gs_windowUnderMouse->GetClientAreaOrigin());
+                        event2.m_x -= orig.x;
+                        event2.m_y -= orig.y;
+
+                        event2.SetEventObject(gs_windowUnderMouse);
+                        event2.SetEventType(wxEVT_LEAVE_WINDOW);
+                        gs_windowUnderMouse->GetEventHandler()->ProcessEvent(event2);
+                    }
+
+                    wxMouseEvent event3(event);
+                    event3.SetEventType(wxEVT_ENTER_WINDOW);
+                    win->GetEventHandler()->ProcessEvent(event3);
+
+                    gs_windowUnderMouse = win;
+                }
+            }
+            else // gs_mouseCapture
+            {
+                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 ?
+                                     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;
-    
-    return TRUE;
+    }
+    else
+    {
+        event.SetEventType(type);
+        return win->GetEventHandler()->ProcessEvent(event);
+    }
 }
 
-void wxDestroyMGL_WM()
+static long wxScanToKeyCode(event_t *event, bool translate)
 {
-    if ( g_winMng )
+    // VS: make it __WXDEBUG__-only, since we have lots of wxLogTrace calls
+    //     here and the arguments would be stored in non-debug executable even
+    //     though wxLogTrace would be no-op...
+    #ifdef __WXDEBUG__
+      #define KEY(mgl_key,wx_key) \
+        case mgl_key: \
+          wxLogTrace(_T("keyevents"), \
+                     _T("key " #mgl_key ", mapped to " #wx_key)); \
+          key = wx_key; \
+          break;
+    #else
+      #define KEY(mgl_key,wx_key) \
+        case mgl_key: key = wx_key; break;
+    #endif
+
+    long key = 0;
+
+    if ( translate )
     {
-        MGL_wmDestroy(g_winMng);
-        g_winMng = NULL;
+        switch ( EVT_scanCode(event->message) )
+        {
+            KEY (KB_padMinus,       WXK_NUMPAD_SUBTRACT)
+            KEY (KB_padPlus,        WXK_NUMPAD_ADD)
+            KEY (KB_padTimes,       WXK_NUMPAD_MULTIPLY)
+            KEY (KB_padDivide,      WXK_NUMPAD_DIVIDE)
+            KEY (KB_padCenter,      WXK_NUMPAD_SEPARATOR) // ?
+            KEY (KB_padLeft,        WXK_NUMPAD_LEFT)
+            KEY (KB_padRight,       WXK_NUMPAD_RIGHT)
+            KEY (KB_padUp,          WXK_NUMPAD_UP)
+            KEY (KB_padDown,        WXK_NUMPAD_DOWN)
+            KEY (KB_padInsert,      WXK_NUMPAD_INSERT)
+            KEY (KB_padDelete,      WXK_NUMPAD_DELETE)
+            KEY (KB_padHome,        WXK_NUMPAD_HOME)
+            KEY (KB_padEnd,         WXK_NUMPAD_END)
+            KEY (KB_padPageUp,      WXK_NUMPAD_PAGEUP)
+          //KEY (KB_padPageUp,      WXK_NUMPAD_PRIOR)
+            KEY (KB_padPageDown,    WXK_NUMPAD_PAGEDOWN)
+          //KEY (KB_padPageDown,    WXK_NUMPAD_NEXT)
+            KEY (KB_1,              '1')
+            KEY (KB_2,              '2')
+            KEY (KB_3,              '3')
+            KEY (KB_4,              '4')
+            KEY (KB_5,              '5')
+            KEY (KB_6,              '6')
+            KEY (KB_7,              '7')
+            KEY (KB_8,              '8')
+            KEY (KB_9,              '9')
+            KEY (KB_0,              '0')
+            KEY (KB_minus,          WXK_SUBTRACT)
+            KEY (KB_equals,         WXK_ADD)
+            KEY (KB_backSlash,      '\\')
+            KEY (KB_Q,              'Q')
+            KEY (KB_W,              'W')
+            KEY (KB_E,              'E')
+            KEY (KB_R,              'R')
+            KEY (KB_T,              'T')
+            KEY (KB_Y,              'Y')
+            KEY (KB_U,              'U')
+            KEY (KB_I,              'I')
+            KEY (KB_O,              'O')
+            KEY (KB_P,              'P')
+            KEY (KB_leftSquareBrace,'[')
+            KEY (KB_rightSquareBrace,']')
+            KEY (KB_A,              'A')
+            KEY (KB_S,              'S')
+            KEY (KB_D,              'D')
+            KEY (KB_F,              'F')
+            KEY (KB_G,              'G')
+            KEY (KB_H,              'H')
+            KEY (KB_J,              'J')
+            KEY (KB_K,              'K')
+            KEY (KB_L,              'L')
+            KEY (KB_semicolon,      ';')
+            KEY (KB_apostrophe,     '\'')
+            KEY (KB_Z,              'Z')
+            KEY (KB_X,              'X')
+            KEY (KB_C,              'C')
+            KEY (KB_V,              'V')
+            KEY (KB_B,              'B')
+            KEY (KB_N,              'N')
+            KEY (KB_M,              'M')
+            KEY (KB_comma,          ',')
+            KEY (KB_period,         '.')
+            KEY (KB_divide,         WXK_DIVIDE)
+            KEY (KB_space,          WXK_SPACE)
+            KEY (KB_tilde,          '~')
+
+            default: break;
+        }
     }
-    if ( g_displayDC )
+
+    if ( key == 0 )
     {
-        delete g_displayDC;
-        g_displayDC = NULL;
+        switch ( EVT_scanCode(event->message) )
+        {
+            KEY (KB_padEnter,       WXK_NUMPAD_ENTER)
+            KEY (KB_F1,             WXK_F1)
+            KEY (KB_F2,             WXK_F2)
+            KEY (KB_F3,             WXK_F3)
+            KEY (KB_F4,             WXK_F4)
+            KEY (KB_F5,             WXK_F5)
+            KEY (KB_F6,             WXK_F6)
+            KEY (KB_F7,             WXK_F7)
+            KEY (KB_F8,             WXK_F8)
+            KEY (KB_F9,             WXK_F9)
+            KEY (KB_F10,            WXK_F10)
+            KEY (KB_F11,            WXK_F11)
+            KEY (KB_F12,            WXK_F12)
+            KEY (KB_left,           WXK_LEFT)
+            KEY (KB_right,          WXK_RIGHT)
+            KEY (KB_up,             WXK_UP)
+            KEY (KB_down,           WXK_DOWN)
+            KEY (KB_insert,         WXK_INSERT)
+            KEY (KB_delete,         WXK_DELETE)
+            KEY (KB_home,           WXK_HOME)
+            KEY (KB_end,            WXK_END)
+            KEY (KB_pageUp,         WXK_PAGEUP)
+            KEY (KB_pageDown,       WXK_PAGEDOWN)
+            KEY (KB_capsLock,       WXK_CAPITAL)
+            KEY (KB_numLock,        WXK_NUMLOCK)
+            KEY (KB_scrollLock,     WXK_SCROLL)
+            KEY (KB_leftShift,      WXK_SHIFT)
+            KEY (KB_rightShift,     WXK_SHIFT)
+            KEY (KB_leftCtrl,       WXK_CONTROL)
+            KEY (KB_rightCtrl,      WXK_CONTROL)
+            KEY (KB_leftAlt,        WXK_ALT)
+            KEY (KB_rightAlt,       WXK_ALT)
+            KEY (KB_leftWindows,    WXK_START)
+            KEY (KB_rightWindows,   WXK_START)
+            KEY (KB_menu,           WXK_MENU)
+            KEY (KB_sysReq,         WXK_SNAPSHOT)
+            KEY (KB_esc,            WXK_ESCAPE)
+            KEY (KB_backspace,      WXK_BACK)
+            KEY (KB_tab,            WXK_TAB)
+            KEY (KB_enter,          WXK_RETURN)
+
+            default:
+                key = EVT_asciiCode(event->message);
+                break;
+        }
     }
+
+    #undef KEY
+
+    return key;
 }
 
-// ---------------------------------------------------------------------------
-// MGL_WM hooks:
-// ---------------------------------------------------------------------------
+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 void wxWindowPainter(window_t *wnd, MGLDC *dc)
+static ibool MGLAPI wxWindowKeybHandler(window_t *wnd, event_t *e)
 {
-    wxWindowMGL *w = (wxWindow*) wnd->userData;
-    if (w)
+    wxWindowMGL *win = (wxWindowMGL*)MGL_wmGetWindowUserData(wnd);
+
+    if ( !win->IsEnabled() ) return FALSE;
+
+    wxPoint where;
+    MGL_wmCoordGlobalToLocal(win->GetHandle(),
+                             e->where_x, e->where_y, &where.x, &where.y);
+
+    wxKeyEvent event;
+    event.SetEventObject(win);
+    event.SetTimestamp(e->when);
+    event.m_keyCode = wxScanToKeyCode(e, TRUE);
+    event.m_scanCode = 0; // not used by wx at all
+    event.m_x = where.x;
+    event.m_y = where.y;
+    event.m_shiftDown = e->modifiers & EVT_SHIFTKEY;
+    event.m_controlDown = e->modifiers & EVT_CTRLSTATE;
+    event.m_altDown = e->modifiers & EVT_LEFTALT;
+    event.m_metaDown = e->modifiers & EVT_RIGHTALT;
+
+    if ( e->what == EVT_KEYUP )
     {
-        MGLDevCtx ctx(dc);
-        w->HandlePaint(&ctx);
+        event.SetEventType(wxEVT_KEY_UP);
+        return win->GetEventHandler()->ProcessEvent(event);
+    }
+    else
+    {
+        bool ret;
+        wxKeyEvent event2;
+
+        event.SetEventType(wxEVT_KEY_DOWN);
+        event2 = event;
+
+        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:
+        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:
+        if ( !ret && event.m_keyCode == WXK_TAB &&
+             win->GetParent() && win->GetParent()->HasFlag(wxTAB_TRAVERSAL) )
+        {
+            wxNavigationKeyEvent navEvent;
+            navEvent.SetEventObject(win->GetParent());
+            // Shift-TAB goes in reverse direction:
+            navEvent.SetDirection(!event.m_shiftDown);
+            // Ctrl-TAB changes the (parent) window, i.e. switch notebook page:
+            navEvent.SetWindowChange(event.m_controlDown);
+            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;
     }
 }
 
@@ -168,8 +520,7 @@ static void wxWindowPainter(window_t *wnd, MGLDC *dc)
 // event tables
 // ---------------------------------------------------------------------------
 
-// in wxUniv/MSW this class is abstract because it doesn't have DoPopupMenu()
-// method
+// in wxUniv this class is abstract because it doesn't have DoPopupMenu()
 IMPLEMENT_ABSTRACT_CLASS(wxWindowMGL, wxWindowBase)
 
 BEGIN_EVENT_TABLE(wxWindowMGL, wxWindowBase)
@@ -183,52 +534,64 @@ END_EVENT_TABLE()
 // constructors and such
 // ----------------------------------------------------------------------------
 
+extern wxDisplayModeInfo wxGetDefaultDisplayMode();
+
 void wxWindowMGL::Init()
 {
+    // First of all, make sure window manager is up and running. If it is
+    // not the case, initialize it in default display mode
+    if ( !g_winMng )
+    {
+        if ( !wxTheApp->SetDisplayMode(wxGetDefaultDisplayMode()) )
+            wxLogFatalError(_("Cannot initialize display."));
+    }
+
     // generic:
     InitBase();
 
     // mgl specific:
-    if ( !g_winMng && !wxCreateMGL_WM() )
-        wxFatalError(_T("Can't initalize MGL, aborting!"));
-
     m_wnd = NULL;
     m_isShown = TRUE;
     m_isBeingDeleted = FALSE;
     m_isEnabled = TRUE;
     m_frozen = FALSE;
     m_paintMGLDC = NULL;
+    m_eraseBackground = -1;
 }
 
 // Destructor
 wxWindowMGL::~wxWindowMGL()
 {
+    SendDestroyEvent();
+
     m_isBeingDeleted = TRUE;
 
-    if ( g_focusedWindow == this )
-        KillFocus();
+    if ( gs_mouseCapture == this )
+        ReleaseMouse();
 
-#if 0 // -- fixme - do we need this?
-    // VS: make sure there's no wxFrame with last focus set to us:
-    for (wxWindow *win = GetParent(); win; win = win->GetParent())
+    if (gs_activeFrame == this)
     {
-        wxFrame *frame = wxDynamicCast(win, wxFrame);
-        if ( frame )
+        gs_activeFrame = NULL;
+        // activate next frame in Z-order:
+        if ( m_wnd->prev )
         {
-            if ( frame->GetLastFocus() == this )
-                frame->SetLastFocus((wxWindow*)NULL);
-            break;
+            wxWindowMGL *win = (wxWindowMGL*)m_wnd->prev->userData;
+            win->SetFocus();
+        }
+        else if ( m_wnd->next )
+        {
+            wxWindowMGL *win = (wxWindowMGL*)m_wnd->next->userData;
+            win->SetFocus();
         }
     }
-#endif
 
-    // 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 ( gs_focusedWindow == this )
+        KillFocus();
+
+    if ( gs_windowUnderMouse == this )
+        gs_windowUnderMouse = NULL;
 
-    if ( m_parent )
-        m_parent->RemoveChild(this);
+    DestroyChildren();
 
     if ( m_wnd )
         MGL_wmDestroyWindow(m_wnd);
@@ -242,29 +605,70 @@ bool wxWindowMGL::Create(wxWindow *parent,
                          long style,
                          const wxString& name)
 {
-    // FIXME_MGL -- temporary!
-    //wxCHECK_MSG( parent, FALSE, wxT("can't create wxWindow without parent") );
-
     if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
         return FALSE;
 
-    if ( parent ) // FIXME_MGL temporary
+    if ( parent )
         parent->AddChild(this);
-    else
-        m_isShown=FALSE;// FIXME_MGL -- temporary, simulates wxTLW/wxFrame
 
+    int x, y, w, h;
+    x = pos.x, y = pos.y;
+    if ( x == -1 )
+        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 & wxFULL_REPAINT_ON_RESIZE )
+    {
+        mgl_style |= MGL_WM_FULL_REPAINT_ON_RESIZE;
+    }
+    if ( style & wxSTAY_ON_TOP )
+    {
+        mgl_style |= MGL_WM_ALWAYS_ON_TOP;
+    }
     if ( style & wxPOPUP_WINDOW )
     {
+        mgl_style |= MGL_WM_ALWAYS_ON_TOP;
         // it is created hidden as other top level windows
         m_isShown = FALSE;
+        wnd_parent = NULL;
     }
 
-    m_wnd = MGL_wmCreateWindow(g_winMng,
-                               parent ? parent->GetHandle() : NULL,
-                               pos.x, pos.y, size.x, size.y);
+    window_t *wnd = MGL_wmCreateWindow(g_winMng, wnd_parent, x, y, w, h);
+
+    MGL_wmSetWindowFlags(wnd, mgl_style);
+    MGL_wmShowWindow(wnd, m_isShown);
+
+    SetMGLwindow_t(wnd);
+
+    return TRUE;
+}
+
+void wxWindowMGL::SetMGLwindow_t(struct window_t *wnd)
+{
+    if ( m_wnd )
+        MGL_wmDestroyWindow(m_wnd);
+
+    m_wnd = wnd;
+    if ( !m_wnd ) return;
+
+    m_isShown = m_wnd->visible;
+
     MGL_wmSetWindowUserData(m_wnd, (void*) this);
     MGL_wmSetWindowPainter(m_wnd, wxWindowPainter);
-    return TRUE;
+    MGL_wmPushWindowEventHandler(m_wnd, wxWindowMouseHandler, EVT_MOUSEEVT, 0);
+    MGL_wmPushWindowEventHandler(m_wnd, wxWindowKeybHandler, EVT_KEYEVT, 0);
+
+    if ( m_cursor.Ok() )
+        MGL_wmSetWindowCursor(m_wnd, *m_cursor.GetMGLCursor());
+    else
+        MGL_wmSetWindowCursor(m_wnd, *wxSTANDARD_CURSOR->GetMGLCursor());
 }
 
 // ---------------------------------------------------------------------------
@@ -273,39 +677,57 @@ bool wxWindowMGL::Create(wxWindow *parent,
 
 void wxWindowMGL::SetFocus()
 {
-    if (g_focusedWindow)
-        g_focusedWindow->KillFocus();
-    
-    g_focusedWindow = this;
-    
-    MGL_wmCaptureEvents(GetHandle(), EVT_KEYEVT | EVT_JOYEVT, wxMGL_CAPTURE_KEYB);
+    if ( gs_focusedWindow == this ) return;
 
-#if wxUSE_CARET
-    // caret needs to be informed about focus change
-    wxCaret *caret = GetCaret();
-    if (caret)
-        caret->OnSetFocus();
-#endif // wxUSE_CARET
+    wxWindowMGL *oldFocusedWindow = gs_focusedWindow;
 
-    if (IsTopLevel())
+    if ( gs_focusedWindow )
     {
-        wxActivateEvent event(wxEVT_ACTIVATE, TRUE, GetId());
-        event.SetEventObject(this);
-        GetEventHandler()->ProcessEvent(event);
+        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);
+    if ( !(m_windowStyle & wxPOPUP_WINDOW) && active != gs_activeFrame )
+    {
+        if ( gs_activeFrame )
+        {
+            wxActivateEvent event(wxEVT_ACTIVATE, FALSE, gs_activeFrame->GetId());
+            event.SetEventObject(gs_activeFrame);
+            gs_activeFrame->GetEventHandler()->ProcessEvent(event);
+        }
+
+        gs_activeFrame = active;
+        wxActivateEvent event(wxEVT_ACTIVATE, TRUE, gs_activeFrame->GetId());
+        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
+    // caret needs to be informed about focus change
+    wxCaret *caret = GetCaret();
+    if ( caret )
+        caret->OnSetFocus();
+#endif // wxUSE_CARET
 }
 
 void wxWindowMGL::KillFocus()
 {
-    if ( g_focusedWindow != this ) return;
-    g_focusedWindow = NULL;
+    if ( gs_focusedWindow != this ) return;
+    gs_focusedWindow = NULL;
 
     if ( m_isBeingDeleted ) return;
-    
+
     MGL_wmUncaptureEvents(GetHandle(), wxMGL_CAPTURE_KEYB);
 
 #if wxUSE_CARET
@@ -315,15 +737,9 @@ void wxWindowMGL::KillFocus()
         caret->OnKillFocus();
 #endif // wxUSE_CARET
 
-    if ( IsTopLevel() )
-    {
-        wxActivateEvent event(wxEVT_ACTIVATE, FALSE, GetId());
-        event.SetEventObject(this);
-        GetEventHandler()->ProcessEvent(event);
-    }
-
     wxFocusEvent event(wxEVT_KILL_FOCUS, GetId());
     event.SetEventObject(this);
+    event.SetWindow(gs_toBeFocusedWindow);
     GetEventHandler()->ProcessEvent(event);
 }
 
@@ -333,7 +749,7 @@ void wxWindowMGL::KillFocus()
 // ----------------------------------------------------------------------------
 wxWindow *wxWindowBase::FindFocus()
 {
-    return (wxWindow*)g_focusedWindow;
+    return (wxWindow*)gs_focusedWindow;
 }
 
 bool wxWindowMGL::Show(bool show)
@@ -342,6 +758,26 @@ 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();
+        }
+        else if ( m_wnd->next )
+        {
+            wxWindowMGL *win = (wxWindowMGL*)m_wnd->next->userData;
+            win->SetFocus();
+        }
+        else
+        {
+            gs_activeFrame = NULL;
+        }
+    }
+
     return TRUE;
 }
 
@@ -357,24 +793,26 @@ void wxWindowMGL::Lower()
     MGL_wmLowerWindow(m_wnd);
 }
 
-void wxWindowMGL::CaptureMouse()
+void wxWindowMGL::DoCaptureMouse()
 {
+    if ( gs_mouseCapture )
+        MGL_wmUncaptureEvents(gs_mouseCapture->m_wnd, wxMGL_CAPTURE_MOUSE);
+
+    gs_mouseCapture = this;
     MGL_wmCaptureEvents(m_wnd, EVT_MOUSEEVT, wxMGL_CAPTURE_MOUSE);
 }
 
-void wxWindowMGL::ReleaseMouse()
+void wxWindowMGL::DoReleaseMouse()
 {
+    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;
 }
 
 /* static */ wxWindow *wxWindowBase::GetCapture()
 {
-    for (captureentry_t *c = g_winMng->capturedEvents; c; c = c->next)
-    {
-        if ( c->id == wxMGL_CAPTURE_MOUSE )
-            return (wxWindow*)c->wnd->userData;
-    }
-    return NULL;
+    return (wxWindow*)gs_mouseCapture;
 }
 
 bool wxWindowMGL::SetCursor(const wxCursor& cursor)
@@ -387,46 +825,29 @@ bool wxWindowMGL::SetCursor(const wxCursor& cursor)
 
     if ( m_cursor.Ok() )
         MGL_wmSetWindowCursor(m_wnd, *m_cursor.GetMGLCursor());
+    else
+        MGL_wmSetWindowCursor(m_wnd, *wxSTANDARD_CURSOR->GetMGLCursor());
 
     return TRUE;
 }
 
 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)
@@ -478,40 +899,41 @@ 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
 {
     int ax, ay;
-    wxPoint co = GetClientAreaOrigin();
-
-    MGL_wmCoordGlobalToLocal(m_wnd, m_wnd->x, m_wnd->y, &ax, &ay);
-    ax -= co.x;
-    ay -= co.y;
+    MGL_wmCoordGlobalToLocal(m_wnd, 0, 0, &ax, &ay);
     if (x)
-        *x = ax;
+        (*x) += ax;
     if (y)
-        *y = ay;
+        (*y) += ay;
 }
 
 void wxWindowMGL::DoClientToScreen(int *x, int *y) const
 {
     int ax, ay;
-    wxPoint co = GetClientAreaOrigin();
-
-    MGL_wmCoordGlobalToLocal(m_wnd, m_wnd->x+co.x, m_wnd->y+co.y, &ax, &ay);
+    MGL_wmCoordLocalToGlobal(m_wnd, 0, 0, &ax, &ay);
     if (x)
-        *x = ax;
+        (*x) += ax;
     if (y)
-        *y = ay;
+        (*y) += ay;
 }
 
 // Get size *available for subwindows* i.e. excluding menu bar etc.
@@ -553,9 +975,7 @@ void wxWindowMGL::DoSetSize(int x, int y, int width, int height, int sizeFlags)
     if ( y == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
         y = currentY;
 
-#if 0 // FIXME_MGL -- what's this good for?
     AdjustForParentClientOrigin(x, y, sizeFlags);
-#endif
 
     wxSize size(-1, -1);
     if ( width == -1 )
@@ -591,11 +1011,25 @@ void wxWindowMGL::DoSetSize(int x, int y, int width, int height, int sizeFlags)
         }
     }
 
-    DoMoveWindow(x, y, width, height);
+    int maxWidth = GetMaxWidth(),
+        minWidth = GetMinWidth(),
+        maxHeight = GetMaxHeight(),
+        minHeight = GetMinHeight();
 
-    wxSizeEvent event(wxSize(width, height), GetId());
-    event.SetEventObject(this);
-    GetEventHandler()->ProcessEvent(event);
+    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);
+
+        wxSizeEvent event(wxSize(width, height), GetId());
+        event.SetEventObject(this);
+        GetEventHandler()->ProcessEvent(event);
+    }
 }
 
 void wxWindowMGL::DoSetClientSize(int width, int height)
@@ -632,48 +1066,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
@@ -687,8 +1079,14 @@ void wxWindowMGL::Clear()
     dc.Clear();
 }
 
-void wxWindowMGL::Refresh(bool WXUNUSED(eraseBack), const wxRect *rect)
+#include "wx/menu.h"
+void wxWindowMGL::Refresh(bool eraseBack, const wxRect *rect)
 {
+    if ( m_eraseBackground == -1 )
+        m_eraseBackground = eraseBack;
+    else
+        m_eraseBackground |= eraseBack;
+
     if ( rect )
     {
         rect_t r;
@@ -702,7 +1100,6 @@ void wxWindowMGL::Refresh(bool WXUNUSED(eraseBack), const wxRect *rect)
 
 void wxWindowMGL::Update()
 {
-    Refresh();
     if ( !m_frozen )
         MGL_wmUpdateDC(g_winMng);
 }
@@ -724,31 +1121,60 @@ 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;
     }
 
-    region_t clip;
-    MGL_getClipRegionDC(*dc, &clip);
-    m_updateRegion = wxRegion(MGLRegion(&clip));
+#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;
+    dc->getClipRegion(clip);
+    m_updateRegion = wxRegion(clip);
     m_paintMGLDC = dc;
 
+#if wxUSE_CARET
+    // must hide caret temporarily, otherwise we'd get rendering artifacts
+    wxCaret *caret = GetCaret();
+    if ( caret )
+        caret->Hide();
+#endif // wxUSE_CARET
+
+    if ( m_eraseBackground != 0 )
     {
-    wxWindowDC dc((wxWindow*)this);
-    wxEraseEvent eventEr(m_windowId, &dc);
-    eventEr.SetEventObject(this);
-    GetEventHandler()->ProcessEvent(eventEr);
+        wxWindowDC dc((wxWindow*)this);
+        wxEraseEvent eventEr(m_windowId, &dc);
+        eventEr.SetEventObject(this);
+        GetEventHandler()->ProcessEvent(eventEr);
     }
+    m_eraseBackground = -1;
 
     wxNcPaintEvent eventNc(GetId());
     eventNc.SetEventObject(this);
     GetEventHandler()->ProcessEvent(eventNc);
-    
+
     wxPaintEvent eventPt(GetId());
     eventPt.SetEventObject(this);
     GetEventHandler()->ProcessEvent(eventPt);
 
+#if wxUSE_CARET
+    if ( caret )
+        caret->Show();
+#endif // wxUSE_CARET
+
     m_paintMGLDC = NULL;
+    m_updateRegion.Clear();
 }
 
 
@@ -764,3 +1190,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);
+}