// globals
// ----------------------------------------------------------------------------
-extern wxWindowList wxModelessWindows;
extern wxList WXDLLEXPORT wxPendingDelete;
#if wxUSE_MENUS_NATIVE
#if wxUSE_STATUSBAR
#if wxUSE_NATIVE_STATUSBAR
- bool wxFrame::m_bUseNativeStatusBar = TRUE;
+ bool wxFrame::m_bUseNativeStatusBar = true;
#else
- bool wxFrame::m_bUseNativeStatusBar = FALSE;
+ bool wxFrame::m_bUseNativeStatusBar = false;
#endif
#endif //wxUSE_STATUSBAR
m_nFsStatusBarHeight = 0;
m_nFsToolBarHeight = 0;
m_hWndToolTip = 0L;
- m_bWasMinimized = FALSE;
+ m_bWasMinimized = false;
m_frameMenuBar = NULL;
memset(&m_vSwpVScroll, 0, sizeof(SWP));
memset(&m_vSwpStatusBar, 0, sizeof(SWP));
memset(&m_vSwpToolBar, 0, sizeof(SWP));
- m_bIconized = FALSE;
+ m_bIconized = false;
} // end of wxFrame::Init
-bool wxFrame::Create(
- wxWindow* pParent
-, wxWindowID vId
-, const wxString& rsTitle
-, const wxPoint& rPos
-, const wxSize& rSize
-, long lStyle
-, const wxString& rsName
-)
+bool wxFrame::Create( wxWindow* pParent,
+ wxWindowID vId,
+ const wxString& rsTitle,
+ const wxPoint& rPos,
+ const wxSize& rSize,
+ long lStyle,
+ const wxString& rsName )
{
if (!wxTopLevelWindow::Create( pParent
,vId
,lStyle
,rsName
))
- return FALSE;
- wxModelessWindows.Append(this);
- return TRUE;
+ return false;
+ return true;
} // end of wxFrame::Create
wxFrame::~wxFrame()
{
- m_isBeingDeleted = TRUE;
+ m_isBeingDeleted = true;
DeleteAllBars();
} // end of wxFrame::~wxFrame
//
// Set the client size (i.e. leave the calculation of borders etc.
-// to wxWindows)
+// to wxWidgets)
//
void wxFrame::DoSetClientSize(
int nWidth
, int nHeight
)
{
- wxStatusBar* pStatusBar = GetStatusBar();
-
//
// Statusbars are not part of the OS/2 Client but parent frame
// so no statusbar consideration
)
{
wxStatusBar* pStatusBar = NULL;
- SWP vSwp;
- ERRORID vError;
wxString sError;
pStatusBar = wxFrameBase::OnCreateStatusBar( nNumber
// Set the height according to the font and the border size
//
vDC.SetFont(pStatusBar->GetFont()); // Screws up the menues for some reason
- vDC.GetTextExtent( "X"
+ vDC.GetTextExtent( wxT("X")
,NULL
,&nY
);
int nHeight = ((11 * nY) / 10 + 2 * pStatusBar->GetBorderY());
- pStatusBar->SetSize( -1
- ,-1
- ,-1
+ pStatusBar->SetSize( wxDefaultCoord
+ ,wxDefaultCoord
+ ,wxDefaultCoord
,nHeight
);
int nY;
int nStatbarWidth;
int nStatbarHeight;
- HWND hWndClient;
RECTL vRect;
RECTL vFRect;
{
vError = ::WinGetLastError(vHabmain);
sError = wxPMErrorToStr(vError);
- wxLogError("Error setting parent for StautsBar. Error: %s\n", sError);
+ wxLogError(_T("Error setting parent for StautsBar. Error: %s\n"), sError.c_str());
return;
}
}
wxMenuBar* pMenuBar
)
{
- ERRORID vError;
wxString sError;
- HWND hTitlebar = NULLHANDLE;
- HWND hHScroll = NULLHANDLE;
- HWND hVScroll = NULLHANDLE;
- HWND hMenuBar = NULLHANDLE;
- SWP vSwp;
- SWP vSwpTitlebar;
- SWP vSwpVScroll;
- SWP vSwpHScroll;
- SWP vSwpMenu;
if (!pMenuBar)
{
//
// Can set a menubar several times.
// TODO: how to prevent a memory leak if you have a currently-unattached
- // menubar? wxWindows assumes that the frame will delete the menu (otherwise
+ // menubar? wxWidgets assumes that the frame will delete the menu (otherwise
// there are problems for MDI).
//
if (pMenuBar->GetHMenu())
{
vError = ::WinGetLastError(vHabmain);
sError = wxPMErrorToStr(vError);
- wxLogError("Error setting parent for submenu. Error: %s\n", sError);
+ wxLogError(_T("Error setting parent for submenu. Error: %s\n"), sError.c_str());
}
if (!::WinSetOwner(m_hMenu, m_hFrame))
{
vError = ::WinGetLastError(vHabmain);
sError = wxPMErrorToStr(vError);
- wxLogError("Error setting parent for submenu. Error: %s\n", sError);
+ wxLogError(_T("Error setting parent for submenu. Error: %s\n"), sError.c_str());
}
::WinSendMsg(m_hFrame, WM_UPDATEFRAME, (MPARAM)FCF_MENU, (MPARAM)0);
} // end of wxFrame::InternalSetMenuBar
wxWindow::OnSysColourChanged(rEvent);
} // end of wxFrame::OnSysColourChanged
-// Pass TRUE to show full screen, FALSE to restore.
-bool wxFrame::ShowFullScreen(
- bool bShow
-, long lStyle
-)
+// Pass true to show full screen, false to restore.
+bool wxFrame::ShowFullScreen( bool bShow, long lStyle )
{
if (bShow)
{
if (IsFullScreen())
- return FALSE;
+ return false;
- m_bFsIsShowing = TRUE;
+ m_bFsIsShowing = true;
m_lFsStyle = lStyle;
#if wxUSE_TOOLBAR
//
if ((lStyle & wxFULLSCREEN_NOTOOLBAR) && pTheToolBar)
{
- pTheToolBar->SetSize(-1,0);
- pTheToolBar->Show(FALSE);
+ pTheToolBar->SetSize(wxDefaultCoord,0);
+ pTheToolBar->Show(false);
}
#endif //wxUSE_TOOLBAR
//
// Decide which window style flags to turn off
//
- LONG lNewStyle = m_lFsOldWindowStyle;
- LONG lOffFlags = 0;
+ LONG lNewStyle = m_lFsOldWindowStyle;
+ LONG lOffFlags = 0;
if (lStyle & wxFULLSCREEN_NOBORDER)
lOffFlags |= FCF_BORDER;
//
nHeight = vRect.yTop - vRect.yBottom;
- SetSize( nWidth
- ,nHeight
- );
+ SetSize( nWidth, nHeight);
//
// Now flush the window style cache and actually go full-screen
,SWP_SIZE | SWP_SHOW
);
- wxSizeEvent vEvent( wxSize( nWidth
- ,nHeight
- )
- ,GetId()
- );
+ wxSize sz( nWidth, nHeight );
+ wxSizeEvent vEvent( sz, GetId() );
GetEventHandler()->ProcessEvent(vEvent);
- return TRUE;
+ return true;
}
else
{
if (!IsFullScreen())
- return FALSE;
+ return false;
- m_bFsIsShowing = FALSE;
+ m_bFsIsShowing = false;
#if wxUSE_TOOLBAR
wxToolBar* pTheToolBar = GetToolBar();
//
if (pTheToolBar && (m_lFsStyle & wxFULLSCREEN_NOTOOLBAR))
{
- pTheToolBar->SetSize(-1, m_nFsToolBarHeight);
- pTheToolBar->Show(TRUE);
+ pTheToolBar->SetSize(wxDefaultCoord, m_nFsToolBarHeight);
+ pTheToolBar->Show(true);
}
#endif //wxUSE_TOOLBAR
if (!pToolBar)
return;
- HWND hWndClient;
RECTL vRect;
RECTL vFRect;
- SWP vSwp;
wxPoint vPos;
::WinQueryWindowRect(m_hFrame, &vRect);
// Windows behaviour where child frames float independently of the parent one
// on the desktop, but are iconized/restored with it
//
-void wxFrame::IconizeChildFrames(
- bool bIconize
-)
+void wxFrame::IconizeChildFrames( bool WXUNUSED(bIconize) )
{
+ // FIXME: Generic MDI does not use Frames for the Childs, so this does _not_
+ // work. Possibly, the right thing is simply to eliminate this
+ // functions and all the calls to it from within this file.
+#if 0
for (wxWindowList::Node* pNode = GetChildren().GetFirst();
pNode;
pNode = pNode->GetNext() )
pFrame->Iconize(bIconize);
}
}
+#endif
} // end of wxFrame::IconizeChildFrames
WXHICON wxFrame::GetDefaultIcon() const
// ---------------------------------------------------------------------------
// preprocessing
// ---------------------------------------------------------------------------
-bool wxFrame::OS2TranslateMessage(
- WXMSG* pMsg
-)
+bool wxFrame::OS2TranslateMessage( WXMSG* pMsg )
{
//
// try the menu bar accels
//
- wxMenuBar* pMenuBar = GetMenuBar();
+ wxMenuBar* pMenuBar = GetMenuBar();
if (!pMenuBar)
- return FALSE;
+ return false;
#if wxUSE_ACCEL && wxUSE_MENUS_NATIVE
const wxAcceleratorTable& rAcceleratorTable = pMenuBar->GetAccelTable();
return rAcceleratorTable.Translate(GetHWND(), pMsg);
#else
- return FALSE;
+ return false;
#endif //wxUSE_ACCEL
} // end of wxFrame::OS2TranslateMessage
// ---------------------------------------------------------------------------
bool wxFrame::HandlePaint()
{
- RECTL vRect;
+ RECTL vRect;
if (::WinQueryUpdateRect(GetHWND(), &vRect))
{
if (hIcon)
{
- HWND hWndClient;
RECTL vRect3;
::WinQueryWindowRect(GetHwnd(), &vRect3);
+#if !(defined(__WATCOMC__) && __WATCOMC__ < 1240 )
+// Open Watcom 1.3 had incomplete headers
+// that's reported and should be fixed for OW 1.4
+
static const int nIconWidth = 32;
static const int nIconHeight = 32;
int nIconX = (int)((vRect3.xRight - nIconWidth)/2);
int nIconY = (int)((vRect3.yBottom + nIconHeight)/2);
::WinDrawPointer(hPs, nIconX, nIconY, hIcon, DP_NORMAL);
+#endif
}
::WinEndPaint(hPs);
- return TRUE;
}
else
{
,&vRect
,GetBackgroundColour().GetPixel()
);
- ::WinEndPaint(hPS);
+ ::WinEndPaint(hPS);
}
}
- return TRUE;
}
}
- else
- {
- // nothing to paint - processed
- return TRUE;
- }
- return FALSE;
+
+ return true;
} // end of wxFrame::HandlePaint
-bool wxFrame::HandleSize(
- int nX
-, int nY
-, WXUINT nId
-)
+bool wxFrame::HandleSize( int nX, int nY, WXUINT nId )
{
- bool bProcessed = FALSE;
+ bool bProcessed = false;
switch (nId)
{
//
// restore all child frames too
//
- IconizeChildFrames(FALSE);
- (void)SendIconizeEvent(FALSE);
+ IconizeChildFrames(false);
+ (void)SendIconizeEvent(false);
//
// fall through
//
case kSizeMax:
- m_bIconized = FALSE;
+ m_bIconized = false;
break;
case kSizeMin:
//
// Iconize all child frames too
//
- IconizeChildFrames(TRUE);
+ IconizeChildFrames(true);
(void)SendIconizeEvent();
- m_bIconized = TRUE;
+ m_bIconized = true;
break;
}
return bProcessed;
} // end of wxFrame::HandleSize
-bool wxFrame::HandleCommand(
- WXWORD nId
-, WXWORD nCmd
-, WXHWND hControl
-)
+bool wxFrame::HandleCommand( WXWORD nId,
+ WXWORD nCmd,
+ WXHWND hControl )
{
if (hControl)
{
wxWindow* pWin = wxFindWinFromHandle(hControl);
if (pWin)
- return pWin->OS2Command( nCmd
- ,nId
- );
+ return pWin->OS2Command( nCmd, nId );
}
//
wxCurrentPopupMenu = NULL;
- return pPopupMenu->OS2Command( nCmd
- ,nId
- );
- return TRUE;
+ return pPopupMenu->OS2Command( nCmd, nId );
}
#endif
if (ProcessCommand(nId))
{
- return TRUE;
+ return true;
}
}
- return FALSE;
+ return false;
} // end of wxFrame::HandleCommand
-bool wxFrame::HandleMenuSelect(
- WXWORD nItem
-, WXWORD nFlags
-, WXHMENU hMenu
-)
+bool wxFrame::HandleMenuSelect( WXWORD nItem,
+ WXWORD nFlags,
+ WXHMENU hMenu )
{
if( !nFlags )
{
}
else
{
- DoGiveHelp(wxEmptyString, FALSE);
- return FALSE;
+ DoGiveHelp(wxEmptyString, false);
+ return false;
}
}
- return TRUE;
+ return true;
} // end of wxFrame::HandleMenuSelect
// ---------------------------------------------------------------------------
// Main Frame window proc
// ---------------------------------------------------------------------------
-MRESULT EXPENTRY wxFrameMainWndProc(
- HWND hWnd
-, ULONG ulMsg
-, MPARAM wParam
-, MPARAM lParam
-)
+MRESULT EXPENTRY wxFrameMainWndProc( HWND hWnd,
+ ULONG ulMsg,
+ MPARAM wParam,
+ MPARAM lParam )
{
- MRESULT rc = (MRESULT)0;
- bool bProcessed = FALSE;
- wxFrame* pWnd = NULL;
+ MRESULT rc = (MRESULT)0;
+ bool bProcessed = false;
+ wxFrame* pWnd = NULL;
pWnd = (wxFrame*) wxFindWinFromHandle((WXHWND) hWnd);
switch (ulMsg)
}
else
{
- pSWP[i].x = vRectl.xLeft;
+ pSWP[i].x = vRectl.xLeft + nWidth;
pSWP[i].y = vRectl.yBottom + nHeight;
pSWP[i].cx = vRectl.xRight - (vRectl.xLeft + nWidth);
pSWP[i].cy = vRectl.yTop - vRectl.yBottom - nHeight;
pSWP[i].hwndInsertBehind = HWND_TOP;
}
}
- bProcessed = TRUE;
+ bProcessed = true;
rc = MRFROMSHORT(nItemCount);
}
break;
//
MRESULT rc = (MRESULT)0;
- bool bProcessed = FALSE;
//
// Stop right here if we don't have a valid handle in our wxWindow object.
return rc;
} // end of wxFrameWndProc
-MRESULT wxFrame::OS2WindowProc(
- WXUINT uMessage
-, WXWPARAM wParam
-, WXLPARAM lParam
-)
+MRESULT wxFrame::OS2WindowProc( WXUINT uMessage,
+ WXWPARAM wParam,
+ WXLPARAM lParam )
{
- MRESULT mRc = 0L;
- bool bProcessed = FALSE;
+ MRESULT mRc = 0L;
+ bool bProcessed = false;
switch (uMessage)
{
case WM_SIZE:
{
- SHORT nScxold = SHORT1FROMMP(wParam); // Old horizontal size.
- SHORT nScyold = SHORT2FROMMP(wParam); // Old vertical size.
SHORT nScxnew = SHORT1FROMMP(lParam); // New horizontal size.
SHORT nScynew = SHORT2FROMMP(lParam); // New vertical size.
return (MRESULT)mRc;
} // wxFrame::OS2WindowProc
-void wxFrame::SetClient(WXHWND c_Hwnd)
+void wxFrame::SetClient(WXHWND WXUNUSED(c_Hwnd))
{
// Duh...nothing to do under OS/2
}
-void wxFrame::SetClient(
- wxWindow* pWindow
-)
+void wxFrame::SetClient( wxWindow* pWindow )
{
- wxWindow* pOldClient = this->GetClient();
- bool bClientHasFocus = pOldClient && (pOldClient == wxWindow::FindFocus());
+ wxWindow* pOldClient = this->GetClient();
+ bool bClientHasFocus = pOldClient && (pOldClient == wxWindow::FindFocus());
if(pOldClient == pWindow) // nothing to do
return;
if(bClientHasFocus )
this->SetFocus();
- pOldClient->Enable( FALSE );
- pOldClient->Show( FALSE );
+ pOldClient->Enable( false );
+ pOldClient->Show( false );
::WinSetWindowUShort(pOldClient->GetHWND(), QWS_ID, (USHORT)pOldClient->GetId());
// to avoid OS/2 bug need to update frame
::WinSendMsg((HWND)this->GetFrame(), WM_UPDATEFRAME, (MPARAM)~0, 0);
::WinEnableWindowUpdate((HWND)GetHWND(), FALSE);
if(pOldClient)
{
- pOldClient->Enable(FALSE);
- pOldClient->Show(FALSE);
+ pOldClient->Enable(false);
+ pOldClient->Show(false);
::WinSetWindowUShort(pOldClient->GetHWND(), QWS_ID, (USHORT)pOldClient->GetId());
}
pWindow->Reparent(this);
{
return wxFindWinFromHandle((WXHWND)::WinWindowFromID(m_hFrame, FID_CLIENT));
}
+
+void wxFrame::SendSizeEvent()
+{
+ if (!m_bIconized)
+ {
+ RECTL vRect = wxGetWindowRect(GetHwnd());
+
+ ::WinPostMsg( GetHwnd()
+ ,WM_SIZE
+ ,MPFROM2SHORT( vRect.xRight - vRect.xLeft
+ ,vRect.xRight - vRect.xLeft
+ )
+ ,MPFROM2SHORT( vRect.yTop - vRect.yBottom
+ ,vRect.yTop - vRect.yBottom
+ )
+ );
+ }
+}