/////////////////////////////////////////////////////////////////////////////
-// Name: panelg.cpp
-// Purpose: wxPanel
-// Author: Julian Smart
+// Name: src/generic/panelg.cpp
+// Purpose: wxPanel and the keyboard handling code
+// Author: Julian Smart, Robert Roebling, Vadim Zeitlin
// Modified by:
// Created: 04/01/98
// RCS-ID: $Id$
// Licence: wxWindows license
/////////////////////////////////////////////////////////////////////////////
+// ============================================================================
+// declarations
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// headers
+// ----------------------------------------------------------------------------
+
#ifdef __GNUG__
-#pragma implementation "panelg.h"
+ #pragma implementation "panelg.h"
#endif
// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
#ifdef __BORLANDC__
-#pragma hdrstop
+ #pragma hdrstop
#endif
#ifndef WX_PRECOMP
-#include "wx/object.h"
-#include "wx/font.h"
-#include "wx/colour.h"
-#include "wx/settings.h"
-#include "wx/log.h"
+ #include "wx/object.h"
+ #include "wx/font.h"
+ #include "wx/colour.h"
+ #include "wx/settings.h"
+ #include "wx/log.h"
#endif
-#include "wx/generic/panelg.h"
+#include "wx/containr.h"
+#include "wx/panel.h"
+
+// ----------------------------------------------------------------------------
+// wxWin macros
+// ----------------------------------------------------------------------------
IMPLEMENT_DYNAMIC_CLASS(wxPanel, wxWindow)
BEGIN_EVENT_TABLE(wxPanel, wxWindow)
- EVT_SYS_COLOUR_CHANGED(wxPanel::OnSysColourChanged)
- EVT_SET_FOCUS(wxPanel::OnFocus)
- EVT_NAVIGATION_KEY(wxPanel::OnNavigationKey)
- EVT_SIZE(wxPanel::OnSize)
+ EVT_SYS_COLOUR_CHANGED(wxPanel::OnSysColourChanged)
+
+ EVT_SIZE(wxPanel::OnSize)
+
+ WX_EVENT_TABLE_CONTROL_CONTAINER(wxPanel)
END_EVENT_TABLE()
+// ============================================================================
+// implementation
+// ============================================================================
+
+WX_DELEGATE_TO_CONTROL_CONTAINER(wxPanel)
+
+// ----------------------------------------------------------------------------
+// wxPanel creation
+// ----------------------------------------------------------------------------
void wxPanel::Init()
{
- m_winLastFocused = (wxWindow *)NULL;
- m_btnDefault = (wxButton *)NULL;
+ m_container.SetContainerWindow(this);
}
bool wxPanel::Create(wxWindow *parent, wxWindowID id,
long style,
const wxString& name)
{
- bool ret = wxWindow::Create(parent, id, pos, size, style, name);
-
- if ( ret )
- {
- SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE));
- SetFont(wxSystemSettings::GetSystemFont(wxSYS_DEFAULT_GUI_FONT));
- }
+ return wxWindow::Create(parent, id, pos, size, style, name);
+}
- return ret;
+wxPanel::~wxPanel()
+{
}
-void wxPanel::InitDialog(void)
+void wxPanel::InitDialog()
{
wxInitDialogEvent event(GetId());
event.SetEventObject(this);
GetEventHandler()->ProcessEvent(event);
}
+// ----------------------------------------------------------------------------
+// event handlers
+// ----------------------------------------------------------------------------
+
// Responds to colour changes, and passes event on to children.
void wxPanel::OnSysColourChanged(wxSysColourChangedEvent& event)
{
- SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE));
+ SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
Refresh();
// Propagate the event to the non-top-level children
wxWindow::OnSysColourChanged(event);
}
-void wxPanel::OnNavigationKey( wxNavigationKeyEvent& event )
-{
- // there is not much to do if we have only one child (or not at all)
- if (GetChildren().GetCount() < 2)
- {
- event.Skip();
- return;
- }
-
- // don't process these ones here
- if (event.IsWindowChange())
- {
- event.Skip();
- return;
- }
-
- // Did the event emitter tell us where the last focus was?
- // wxGTK does this in wxWindow, but wxMSW does not. It is
- // also done in wxPanel if the event is propagated up.
- wxWindow *winFocus = event.GetCurrentFocus();
-
- // Do we know where the focus was ourselves, then?
- if (!winFocus)
- winFocus = m_winLastFocused;
-
- if (!winFocus)
- winFocus = wxWindow::FindFocus();
-
- if (!winFocus)
- {
- event.Skip();
- return;
- }
-
- wxWindowList::Node *start_node = GetChildren().Find( winFocus );
- if ( !start_node )
- start_node = GetChildren().Find( m_winLastFocused );
- if ( !start_node )
- start_node = GetChildren().GetFirst();
-
- wxWindowList::Node *node = event.GetDirection() ? start_node->GetNext()
- : start_node->GetPrevious();
-
- while ( node != start_node )
- {
- // Have we come to the last or first item on the panel?
- if ( !node )
- {
- // Check if our (may be grand) parent is another panel: if this is
- // the case, they will know what to do with this navigation key and
- // so give them the chance to process it instead of looping inside
- // this panel (normally, the focus will go to the next/previous
- // item after this panel in the parent panel).
- wxWindow *focussed_child_of_parent = this;
- for ( wxWindow *parent = GetParent(); parent; parent = parent->GetParent() )
- {
- // we don't want to tab into a different dialog or frame
- if ( focussed_child_of_parent->IsTopLevel() )
- break;
-
- // is the parent a panel?
- wxPanel *panel = wxDynamicCast(parent, wxPanel);
- if (panel)
- {
- event.SetCurrentFocus( focussed_child_of_parent );
- if (parent->GetEventHandler()->ProcessEvent( event ))
- return;
- }
-
- focussed_child_of_parent = parent;
- }
-
- // no, we are not inside another panel so process this ourself
- node = event.GetDirection() ? GetChildren().GetFirst()
- : GetChildren().GetLast();
-
- continue;
- }
-
- wxWindow *child = node->GetData();
-
- if ( child->AcceptsFocus() )
- {
- m_winLastFocused = child; // should be redundant, but it is not
- child->SetFocus();
- return;
- }
-
- node = event.GetDirection() ? node->GetNext() : node->GetPrevious();
- }
-
- // we cycled through all of our children and none of them wanted to accept
- // focus
- event.Skip();
-}
-
-
-void wxPanel::OnSize(wxSizeEvent& WXUNUSED(event))
+void wxPanel::OnSize(wxSizeEvent& event)
{
#if wxUSE_CONSTRAINTS
if (GetAutoLayout())
Layout();
-#endif
-}
+#endif // wxUSE_CONSTRAINTS
-void wxPanel::SetFocus()
-{
- wxLogTrace(_T("focus"), _T("SetFocus on wxPanel 0x%08x."), GetHandle());
-
- // If the panel gets the focus *by way of getting it set directly*
- // we move the focus to the first window that can get it.
-
- // VZ: no, we set the focus to the last window too. I don't understand why
- // should we make this distinction: if an app wants to set focus to
- // some precise control, it may always do it directly, but if we don't
- // use m_winLastFocused here, the focus won't be set correctly after a
- // notebook page change nor after frame activation under MSW (it calls
- // SetFocus too)
//
- // RR: yes, when I the tab key to navigate in a panel with some controls and
- // a notebook and the focus jumps to the notebook (typically coming from
- // a button at the top) the notebook should focus the first child in the
- // current notebook page, not the last one which would otherwise get the
- // focus if you used the tab key to navigate from the current notebook
- // page to button at the bottom. See every page in the controls sample.
-
-#ifdef __WXGTK__
- m_winLastFocused = (wxWindow *)NULL;
-#endif // 0
-
- if ( !SetFocusToChild() )
- {
- wxWindow::SetFocus();
- }
-}
-
-void wxPanel::OnFocus(wxFocusEvent& event)
-{
- wxLogTrace(_T("focus"), _T("OnFocus on wxPanel 0x%08x."), GetHandle());
-
- // If the panel gets the focus *by way of getting clicked on*
- // we move the focus to either the last window that had the
- // focus or the first one that can get it.
- (void)SetFocusToChild();
-
- event.Skip();
-}
-
-bool wxPanel::SetFocusToChild()
-{
- if ( m_winLastFocused )
+ // Need to properly move child windows under OS/2
+ //
+#if defined(__WXPM__)
+ else
{
- // It might happen that the window got reparented or no longer accepts
- // the focus.
- if ( (m_winLastFocused->GetParent() == this) &&
- m_winLastFocused->AcceptsFocus() )
- {
- wxLogTrace(_T("focus"),
- _T("SetFocusToChild() => last child (0x%08x)."),
- m_winLastFocused->GetHandle());
+ PSWP pWinSwp = GetSwp();
- m_winLastFocused->SetFocus();
- return TRUE;
- }
+ if (pWinSwp->cx == 0 && pWinSwp->cy == 0 && pWinSwp->fl == 0)
+ //
+ // Uninitialized
+ //
+ ::WinQueryWindowPos(GetHWND(), pWinSwp);
else
{
- // it doesn't count as such any more
- m_winLastFocused = (wxWindow *)NULL;
+ SWP vSwp;
+ int nYDiff;
+
+ ::WinQueryWindowPos(GetHWND(), &vSwp);
+ nYDiff = pWinSwp->cy - vSwp.cy;
+ MoveChildren(nYDiff);
+ pWinSwp->cx = vSwp.cx;
+ pWinSwp->cy = vSwp.cy;
}
}
-
- // set the focus to the first child who wants it
- wxWindowList::Node *node = GetChildren().GetFirst();
- while ( node )
- {
- wxWindow *child = node->GetData();
- if ( child->AcceptsFocus() )
- {
- wxLogTrace(_T("focus"),
- _T("SetFocusToChild() => first child (0x%08x)."),
- child->GetHandle());
-
- m_winLastFocused = child; // should be redundant, but it is not
- child->SetFocus();
- return TRUE;
- }
-
- node = node->GetNext();
- }
-
- return FALSE;
+#endif
+ event.Skip();
}
+