src/generic/panelg.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/generic/panelg.cpp
   3 // Purpose:     wxPanel and the keyboard handling code
   4 // Author:      Julian Smart, Robert Roebling, Vadim Zeitlin
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart and Markus Holzem
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #ifdef __GNUG__
  21     #pragma implementation "panelg.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 #ifndef WX_PRECOMP
  32     #include "wx/object.h"
  33     #include "wx/font.h"
  34     #include "wx/colour.h"
  35     #include "wx/settings.h"
  36     #include "wx/log.h"
  37 #endif
  38
  39 #include "wx/toolbar.h"
  40 #include "wx/statusbr.h"
  41
  42 #include "wx/generic/panelg.h"
  43
  44 // ----------------------------------------------------------------------------
  45 // wxWin macros
  46 // ----------------------------------------------------------------------------
  47
  48 IMPLEMENT_DYNAMIC_CLASS(wxPanel, wxWindow)
  49
  50 BEGIN_EVENT_TABLE(wxPanel, wxWindow)
  51   EVT_SYS_COLOUR_CHANGED(wxPanel::OnSysColourChanged)
  52   EVT_SET_FOCUS(wxPanel::OnFocus)
  53   EVT_NAVIGATION_KEY(wxPanel::OnNavigationKey)
  54   EVT_SIZE(wxPanel::OnSize)
  55 END_EVENT_TABLE()
  56
  57 // ============================================================================
  58 // implementation
  59 // ============================================================================
  60
  61 // ----------------------------------------------------------------------------
  62 // wxPanel creation
  63 // ----------------------------------------------------------------------------
  64
  65 void wxPanel::Init()
  66 {
  67     m_winLastFocused = (wxWindow *)NULL;
  68     m_btnDefault = (wxButton *)NULL;
  69 }
  70
  71 bool wxPanel::Create(wxWindow *parent, wxWindowID id,
  72                      const wxPoint& pos,
  73                      const wxSize& size,
  74                      long style,
  75                      const wxString& name)
  76 {
  77     return wxWindow::Create(parent, id, pos, size, style, name);
  78 }
  79
  80 // ----------------------------------------------------------------------------
  81 // misc
  82 // ----------------------------------------------------------------------------
  83
  84 void wxPanel::InitDialog()
  85 {
  86     wxInitDialogEvent event(GetId());
  87     event.SetEventObject(this);
  88     GetEventHandler()->ProcessEvent(event);
  89 }
  90
  91 // Responds to colour changes, and passes event on to children.
  92 void wxPanel::OnSysColourChanged(wxSysColourChangedEvent& event)
  93 {
  94     SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE));
  95     Refresh();
  96
  97     // Propagate the event to the non-top-level children
  98     wxWindow::OnSysColourChanged(event);
  99 }
 100
 101 void wxPanel::OnSize(wxSizeEvent& WXUNUSED(event))
 102 {
 103 #if wxUSE_CONSTRAINTS
 104     if (GetAutoLayout())
 105         Layout();
 106 #endif
 107 }
 108
 109 // ----------------------------------------------------------------------------
 110 // Keyboard handling - this is the place where the TAB traversal logic is
 111 // implemented. As this code is common to all ports, this ensures consistent
 112 // behaviour even if we don't specify how exactly the wxNavigationKeyEvent are
 113 // generated and this is done in platform specific code which also ensures that
 114 // we can follow the given platform standards.
 115 // ----------------------------------------------------------------------------
 116
 117 void wxPanel::OnNavigationKey( wxNavigationKeyEvent& event )
 118 {
 119     // the event is propagated downwards if the event emitter was our parent
 120     bool goingDown = event.GetEventObject() == GetParent();
 121
 122     const wxWindowList& children = GetChildren();
 123
 124     // there is not much to do if we don't have children and we're not
 125     // interested in "notebook page change" events here
 126     if ( !children.GetCount() || event.IsWindowChange() )
 127     {
 128         // let the parent process it unless it already comes from our parent
 129         // of we don't have any
 130         wxWindow *parent = GetParent();
 131         if ( goingDown ||
 132              !parent || !parent->GetEventHandler()->ProcessEvent(event) )
 133         {
 134             event.Skip();
 135         }
 136
 137         return;
 138     }
 139
 140     // where are we going?
 141     bool forward = event.GetDirection();
 142
 143     // the node of the children list from which we should start looking for the
 144     // next acceptable child
 145     wxWindowList::Node *node, *start_node;
 146
 147     // we should start from the first/last control and not from the one which
 148     // had focus the last time if we're propagating the event downwards because
 149     // for our parent we look like a single control
 150     if ( goingDown )
 151     {
 152         // just to be sure it's not used (normally this is not necessary, but
 153         // doesn't hurt neither)
 154         m_winLastFocused = (wxWindow *)NULL;
 155
 156         // start from first or last depending on where we're going
 157         node = forward ? children.GetFirst() : children.GetLast();
 158
 159         // we want to cycle over all nodes
 160         start_node = (wxWindowList::Node *)NULL;
 161     }
 162     else
 163     {
 164         // try to find the child which has the focus currently
 165
 166         // the event emitter might have done this for us
 167         wxWindow *winFocus = event.GetCurrentFocus();
 168
 169         // but if not, we might know where the focus was ourselves
 170         if (!winFocus)
 171             winFocus = m_winLastFocused;
 172
 173         // if still no luck, do it the hard way
 174         if (!winFocus)
 175             winFocus = wxWindow::FindFocus();
 176
 177         if ( winFocus )
 178         {
 179             // ok, we found the focus - now is it our child?
 180             start_node = children.Find( winFocus );
 181         }
 182         else
 183         {
 184             start_node = (wxWindowList::Node *)NULL;
 185         }
 186
 187         if ( !start_node && m_winLastFocused )
 188         {
 189             // window which has focus isn't our child, fall back to the one
 190             // which had the focus the last time
 191             start_node = children.Find( m_winLastFocused );
 192         }
 193
 194         // if we still didn't find anything, we should start with the first one
 195         if ( !start_node )
 196         {
 197             start_node = children.GetFirst();
 198         }
 199
 200         // and the first child which we can try setting focus to is the next or
 201         // the previous one
 202         node = forward ? start_node->GetNext() : start_node->GetPrevious();
 203     }
 204
 205     // we want to cycle over all elements passing by NULL
 206     while ( node != start_node )
 207     {
 208         // Have we come to the last or first item on the panel?
 209         if ( !node )
 210         {
 211             if ( !goingDown )
 212             {
 213                 // Check if our (may be grand) parent is another panel: if this
 214                 // is the case, they will know what to do with this navigation
 215                 // key and so give them the chance to process it instead of
 216                 // looping inside this panel (normally, the focus will go to
 217                 // the next/previous item after this panel in the parent
 218                 // panel).
 219                 wxWindow *focussed_child_of_parent = this;
 220                 for ( wxWindow *parent = GetParent();
 221                       parent;
 222                       parent = parent->GetParent() )
 223                 {
 224                     // we don't want to tab into a different dialog or frame
 225                     if ( focussed_child_of_parent->IsTopLevel() )
 226                         break;
 227
 228                     event.SetCurrentFocus( focussed_child_of_parent );
 229                     if (parent->GetEventHandler()->ProcessEvent( event ))
 230                         return;
 231
 232                     focussed_child_of_parent = parent;
 233                 }
 234             }
 235             //else: as the focus came from our parent, we definitely don't want
 236             //      to send it back to it!
 237
 238             // no, we are not inside another panel so process this ourself
 239             node = forward ? children.GetFirst() : children.GetLast();
 240
 241             continue;
 242         }
 243
 244         wxWindow *child = node->GetData();
 245
 246         if ( child->AcceptsFocus() )
 247         {
 248             m_winLastFocused = child;  // should be redundant, but it is not
 249
 250             // if we're setting the focus to a child panel we should prevent it
 251             // from giving it to the child which had the focus the last time
 252             // and instead give it to the first/last child depending from which
 253             // direction we're coming
 254             wxPanel *subpanel = wxDynamicCast(child, wxPanel);
 255             if ( subpanel )
 256             {
 257                 // trick the panel into thinking that it got the navigation
 258                 // event - instead of duplicating all the code here
 259                 //
 260                 // make sure that we do trick it by setting all the parameters
 261                 // correctly (consistently with the code in this very function
 262                 // above) and that it starts from the very beginning/end by
 263                 // using SetLastFocus(NULL)
 264                 subpanel->SetLastFocus((wxWindow *)NULL);
 265             }
 266
 267             event.SetEventObject(this);
 268             if ( !child->GetEventHandler()->ProcessEvent(event) )
 269             {
 270                 // everything is simple: just give focus to it
 271                 child->SetFocus();
 272             }
 273             //else: the child manages its focus itself
 274
 275             event.Skip( FALSE );
 276             return;
 277         }
 278
 279         node = forward ? node->GetNext() : node->GetPrevious();
 280     }
 281
 282     // we cycled through all of our children and none of them wanted to accept
 283     // focus
 284     event.Skip();
 285 }
 286
 287 void wxPanel::SetFocus()
 288 {
 289     wxLogTrace(_T("focus"), _T("SetFocus on wxPanel 0x%08x."), GetHandle());
 290
 291     // If the panel gets the focus *by way of getting it set directly*
 292     // we move the focus to the first window that can get it.
 293
 294     // VZ: no, we set the focus to the last window too. I don't understand why
 295     //     should we make this distinction: if an app wants to set focus to
 296     //     some precise control, it may always do it directly, but if we don't
 297     //     use m_winLastFocused here, the focus won't be set correctly after a
 298     //     notebook page change nor after frame activation under MSW (it calls
 299     //     SetFocus too)
 300     //
 301     // RR: yes, when I the tab key to navigate in a panel with some controls and
 302     //     a notebook and the focus jumps to the notebook (typically coming from
 303     //     a button at the top) the notebook should focus the first child in the
 304     //     current notebook page, not the last one which would otherwise get the
 305     //     focus if you used the tab key to navigate from the current notebook
 306     //     page to button at the bottom. See every page in the controls sample.
 307     //
 308     // VZ: ok, but this still doesn't (at least I don't see how it can) take
 309     //     care of first/last child problem: i.e. if Shift-TAB is pressed in a
 310     //     situation like above, the focus should be given to the last child,
 311     //     not the first one (and not to the last focused one neither) - I
 312     //     think my addition to OnNavigationKey() above takes care of it.
 313     //     Keeping #ifdef __WXGTK__ for now, but please try removing it and see
 314     //     what happens.
 315     //
 316     // RR: Removed for now. Let's see what happens..
 317
 318     if ( !SetFocusToChild() )
 319     {
 320         wxWindow::SetFocus();
 321     }
 322 }
 323
 324 void wxPanel::OnFocus(wxFocusEvent& event)
 325 {
 326     wxLogTrace(_T("focus"), _T("OnFocus on wxPanel 0x%08x, name: %s"), GetHandle(), GetName().c_str() );
 327
 328     // If the panel gets the focus *by way of getting clicked on*
 329     // we move the focus to either the last window that had the
 330     // focus or the first one that can get it.
 331     (void)SetFocusToChild();
 332
 333     event.Skip();
 334 }
 335
 336 bool wxPanel::SetFocusToChild()
 337 {
 338     return wxSetFocusToChild(this, &m_winLastFocused);
 339 }
 340
 341 // ----------------------------------------------------------------------------
 342 // SetFocusToChild(): this function is used by wxPanel but also by wxFrame in
 343 // wxMSW, this is why it is outside of wxPanel class
 344 // ----------------------------------------------------------------------------
 345
 346 bool wxSetFocusToChild(wxWindow *win, wxWindow **childLastFocused)
 347 {
 348     wxCHECK_MSG( win, FALSE, _T("wxSetFocusToChild(): invalid window") );
 349
 350     if ( *childLastFocused )
 351     {
 352         // It might happen that the window got reparented or no longer accepts
 353         // the focus.
 354         if ( (*childLastFocused)->GetParent() == win &&
 355              (*childLastFocused)->AcceptsFocus() )
 356         {
 357             wxLogTrace(_T("focus"),
 358                        _T("SetFocusToChild() => last child (0x%08x)."),
 359                        (*childLastFocused)->GetHandle());
 360
 361             (*childLastFocused)->SetFocus();
 362             return TRUE;
 363         }
 364         else
 365         {
 366             // it doesn't count as such any more
 367             *childLastFocused = (wxWindow *)NULL;
 368         }
 369     }
 370
 371     // set the focus to the first child who wants it
 372     wxWindowList::Node *node = win->GetChildren().GetFirst();
 373     while ( node )
 374     {
 375         wxWindow *child = node->GetData();
 376
 377         if ( child->AcceptsFocus()
 378              && !child->IsTopLevel()
 379 #if wxUSE_TOOLBAR
 380              && !wxDynamicCast(child, wxToolBar)
 381 #endif // wxUSE_TOOLBAR
 382 #if wxUSE_STATUSBAR
 383              && !wxDynamicCast(child, wxStatusBar)
 384 #endif // wxUSE_STATUSBAR
 385            )
 386         {
 387             wxLogTrace(_T("focus"),
 388                        _T("SetFocusToChild() => first child (0x%08x)."),
 389                        child->GetHandle());
 390
 391             *childLastFocused = child;  // should be redundant, but it is not
 392             child->SetFocus();
 393             return TRUE;
 394         }
 395
 396         node = node->GetNext();
 397     }
 398
 399     return FALSE;
 400 }