#include "wx/intl.h"
#include "wx/frame.h"
#include "wx/control.h"
+ #include "wx/containr.h" // wxSetFocusToChild()
#endif //WX_PRECOMP
#include "wx/os2/private.h"
case WM_INITDLG:
//
// For this message, returning TRUE tells system to set focus to
- // the first control in the dialog box, but as we set the focus
- // ourselves, we return FALSE from here as well, so fall through
+ // the first control in the dialog box, but we set the focus
+ // ourselves, however in OS/2 we must return true to enable the dialog
//
+ return (MRESULT)TRUE;
default:
//
// For all the other ones, FALSE means that we didn't process the
,nY
,nWidth
,nHeight
- ,SWP_MOVE | SWP_SIZE | SWP_ZORDER | SWP_SHOW
+ ,SWP_MOVE | SWP_SIZE | SWP_ZORDER | SWP_SHOW | SWP_ACTIVATE
);
::WinQueryWindowPos(GetHwnd(), GetSwp());
m_hFrame = m_hWnd;
wxTopLevelWindowOS2::~wxTopLevelWindowOS2()
{
- wxTopLevelWindows.DeleteObject(this);
+ if (this == m_spHiddenParent)
+ {
+ //
+ // Stop [infinite] recursion which would otherwise happen when we do
+ // "delete ms_hiddenParent" below -- and we're not interested in doing
+ // anything of the rest below for that window because the rest of
+ // wxWindows doesn't even know about it
+ //
+ return;
+ }
if (wxModelessWindows.Find(this))
wxModelessWindows.DeleteObject(this);
//
- // If this is the last top-level window, exit.
+ // After destroying an owned window, Windows activates the next top level
+ // window in Z order but it may be different from our owner (to reproduce
+ // this simply Alt-TAB to another application and back before closing the
+ // owned frame) whereas we always want to yield activation to our parent
+ //
+ if (HasFlag(wxFRAME_FLOAT_ON_PARENT))
+ {
+ wxWindow* pParent = GetParent();
+
+ if (pParent)
+ {
+ ::WinSetWindowPos( GetHwndOf(pParent)
+ ,HWND_TOP
+ ,0, 0, 0, 0
+ ,SWP_ZORDER
+ );
+ }
+ }
+
+ //
+ // If this is the last top-level window, we're going to exit and we should
+ // delete ms_hiddenParent now to avoid leaking it
//
- if (wxTheApp && (wxTopLevelWindows.Number() == 0))
+ if (IsLastBeforeExit())
{
- wxTheApp->SetTopWindow(NULL);
- if ( wxTheApp->GetExitOnFrameDelete() )
+ if (m_spHiddenParent)
{
- ::WinPostMsg(NULL, WM_QUIT, 0, 0);
+ delete m_spHiddenParent;
+ m_spHiddenParent = NULL;
}
}
} // end of wxTopLevelWindowOS2::~wxTopLevelWindowOS2
::WinQueryWindowPos(hWndParent, &vSwp);
m_bIconized = vSwp.fl & SWP_MINIMIZE;
- if (hWndParent)
- ::WinSetWindowPos( hWndParent
- ,HWND_TOP
- ,vSwp.x
- ,vSwp.y
- ,vSwp.cx
- ,vSwp.cy
- ,SWP_ZORDER | SWP_ACTIVATE | SWP_SHOW | SWP_MOVE
- );
::WinEnableWindow(hWndParent, TRUE);
}
}