]> git.saurik.com Git - wxWidgets.git/blame - src/mac/carbon/notebmac.cpp
readability cleanup
[wxWidgets.git] / src / mac / carbon / notebmac.cpp
CommitLineData
ee6b1d97 1///////////////////////////////////////////////////////////////////////////////
90c0f5a9 2// Name: src/mac/carbon/notebmac.cpp
ee6b1d97 3// Purpose: implementation of wxNotebook
a31a5f85 4// Author: Stefan Csomor
5aed9d50 5// Modified by:
a31a5f85 6// Created: 1998-01-01
ee6b1d97 7// RCS-ID: $Id$
a31a5f85 8// Copyright: (c) Stefan Csomor
65571936 9// Licence: wxWindows licence
ee6b1d97
SC
10///////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
3d1a4878
SC
19#include "wx/wxprec.h"
20
179e085f
RN
21#if wxUSE_NOTEBOOK
22
799690a0 23#include "wx/app.h"
d497dca4
GD
24#include "wx/string.h"
25#include "wx/log.h"
26#include "wx/imaglist.h"
061174e3 27#include "wx/image.h"
d497dca4
GD
28#include "wx/notebook.h"
29#include "wx/mac/uma.h"
ee6b1d97
SC
30// ----------------------------------------------------------------------------
31// macros
32// ----------------------------------------------------------------------------
33
34// check that the page index is valid
19c43a77 35#define IS_VALID_PAGE(nPage) ((nPage) < GetPageCount())
ee6b1d97 36
ee6b1d97
SC
37
38// ----------------------------------------------------------------------------
39// event table
40// ----------------------------------------------------------------------------
41
5b781a67
SC
42DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED)
43DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING)
44
ee6b1d97 45BEGIN_EVENT_TABLE(wxNotebook, wxControl)
90c0f5a9 46 EVT_NOTEBOOK_PAGE_CHANGED(wxID_ANY, wxNotebook::OnSelChange)
e40298d5 47
461fe6e2
SC
48 EVT_SIZE(wxNotebook::OnSize)
49 EVT_SET_FOCUS(wxNotebook::OnSetFocus)
50 EVT_NAVIGATION_KEY(wxNotebook::OnNavigationKey)
ee6b1d97
SC
51END_EVENT_TABLE()
52
53IMPLEMENT_DYNAMIC_CLASS(wxNotebook, wxControl)
54IMPLEMENT_DYNAMIC_CLASS(wxNotebookEvent, wxCommandEvent)
ee6b1d97
SC
55
56// ============================================================================
57// implementation
58// ============================================================================
59
5aed9d50
RD
60// ----------------------------------------------------------------------------
61// wxNotebook construction
62// ----------------------------------------------------------------------------
63
64// common part of all ctors
65void wxNotebook::Init()
66{
ee6b1d97
SC
67 m_nSelection = -1;
68}
69
70// default for dynamic class
71wxNotebook::wxNotebook()
72{
73 Init();
74}
75
76// the same arguments as for wxControl
77wxNotebook::wxNotebook(wxWindow *parent,
78 wxWindowID id,
79 const wxPoint& pos,
80 const wxSize& size,
81 long style,
82 const wxString& name)
83{
84 Init();
5aed9d50 85
ee6b1d97
SC
86 Create(parent, id, pos, size, style, name);
87}
88
89// Create() function
90bool wxNotebook::Create(wxWindow *parent,
91 wxWindowID id,
92 const wxPoint& pos,
93 const wxSize& size,
94 long style,
95 const wxString& name)
96{
90c0f5a9
WS
97 m_macIsUserPane = false ;
98
b45ed7a2
VZ
99 if ( !wxNotebookBase::Create(parent, id, pos, size, style, name) )
100 return false;
101
facd6764 102 Rect bounds = wxMacGetBoundsForControl( this , pos , size ) ;
5aed9d50 103
facd6764
SC
104 if( bounds.right <= bounds.left )
105 bounds.right = bounds.left + 100 ;
106 if ( bounds.bottom <= bounds.top )
107 bounds.bottom = bounds.top + 100 ;
5aed9d50 108
facd6764 109 UInt16 tabstyle = kControlTabDirectionNorth ;
90c0f5a9 110 if ( HasFlag(wxBK_LEFT) )
facd6764 111 tabstyle = kControlTabDirectionWest ;
90c0f5a9 112 else if ( HasFlag( wxBK_RIGHT ) )
facd6764 113 tabstyle = kControlTabDirectionEast ;
90c0f5a9 114 else if ( HasFlag( wxBK_BOTTOM ) )
facd6764 115 tabstyle = kControlTabDirectionSouth ;
90c0f5a9 116
facd6764
SC
117 ControlTabSize tabsize = kControlTabSizeLarge ;
118 if ( GetWindowVariant() == wxWINDOW_VARIANT_SMALL )
119 tabsize = kControlTabSizeSmall ;
120 else if ( GetWindowVariant() == wxWINDOW_VARIANT_MINI )
121 {
122 if (UMAGetSystemVersion() >= 0x1030 )
90c0f5a9 123 tabsize = 3 ;
facd6764 124 else
90c0f5a9 125 tabsize = kControlSizeSmall;
facd6764 126 }
5aed9d50 127
b905d6cc 128 m_peer = new wxMacControl(this) ;
4c37f124 129 verify_noerr ( CreateTabsControl( MAC_WXHWND(parent->MacGetTopLevelWindowRef()) , &bounds ,
90c0f5a9
WS
130 tabsize , tabstyle, 0, NULL, m_peer->GetControlRefAddr() ) );
131
132
facd6764 133 MacPostControlCreate(pos,size) ;
90c0f5a9 134 return true ;
ee6b1d97
SC
135}
136
137// dtor
138wxNotebook::~wxNotebook()
139{
ee6b1d97
SC
140}
141
142// ----------------------------------------------------------------------------
143// wxNotebook accessors
144// ----------------------------------------------------------------------------
90b959ae
SC
145
146void wxNotebook::SetPadding(const wxSize& padding)
147{
63ff6f53 148 // unsupported by OS
90b959ae
SC
149}
150
151void wxNotebook::SetTabSize(const wxSize& sz)
ee6b1d97 152{
63ff6f53 153 // unsupported by OS
ee6b1d97
SC
154}
155
90b959ae 156void wxNotebook::SetPageSize(const wxSize& size)
ee6b1d97 157{
63ff6f53
SC
158 SetSize( CalcSizeFromPage( size ) );
159}
160
161wxSize wxNotebook::CalcSizeFromPage(const wxSize& sizePage) const
162{
facd6764 163 return DoGetSizeFromClientSize( sizePage ) ;
63ff6f53
SC
164}
165
8f83dfee 166int wxNotebook::SetSelection(size_t nPage)
ee6b1d97 167{
90c0f5a9 168 wxCHECK_MSG( IS_VALID_PAGE(nPage), wxNOT_FOUND, wxT("notebook page out of range") );
5aed9d50 169
461fe6e2
SC
170 if ( int(nPage) != m_nSelection )
171 {
172 wxNotebookEvent event(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING, m_windowId);
173 event.SetSelection(nPage);
174 event.SetOldSelection(m_nSelection);
175 event.SetEventObject(this);
176 if ( !GetEventHandler()->ProcessEvent(event) || event.IsAllowed() )
177 {
178 // program allows the page change
179 event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED);
180 (void)GetEventHandler()->ProcessEvent(event);
181
182 ChangePage(m_nSelection, nPage);
183 }
184 }
5aed9d50 185
ee6b1d97
SC
186 return m_nSelection;
187}
188
8f83dfee 189bool wxNotebook::SetPageText(size_t nPage, const wxString& strText)
ee6b1d97
SC
190{
191 wxASSERT( IS_VALID_PAGE(nPage) );
5aed9d50 192
90b959ae 193 wxNotebookPage *page = m_pages[nPage];
c854c7d9
GD
194 page->SetLabel(strText);
195 MacSetupTabs();
5aed9d50 196
c854c7d9 197 return true;
ee6b1d97
SC
198}
199
8f83dfee 200wxString wxNotebook::GetPageText(size_t nPage) const
ee6b1d97
SC
201{
202 wxASSERT( IS_VALID_PAGE(nPage) );
5aed9d50 203
90b959ae 204 wxNotebookPage *page = m_pages[nPage];
c854c7d9 205 return page->GetLabel();
ee6b1d97
SC
206}
207
8f83dfee 208int wxNotebook::GetPageImage(size_t nPage) const
ee6b1d97 209{
90c0f5a9 210 wxCHECK_MSG( IS_VALID_PAGE(nPage), wxNOT_FOUND, _T("invalid notebook page") );
5aed9d50 211
2b5f62a0 212 return m_images[nPage];
ee6b1d97
SC
213}
214
19c43a77 215bool wxNotebook::SetPageImage(size_t nPage, int nImage)
ee6b1d97 216{
90c0f5a9 217 wxCHECK_MSG( IS_VALID_PAGE(nPage), false, _T("invalid notebook page") );
5aed9d50 218
90c0f5a9 219 wxCHECK_MSG( m_imageList && nImage < m_imageList->GetImageCount(), false,
e40298d5 220 _T("invalid image index in SetPageImage()") );
5aed9d50 221
2b5f62a0
VZ
222 if ( nImage != m_images[nPage] )
223 {
224 // if the item didn't have an icon before or, on the contrary, did have
225 // it but has lost it now, its size will change - but if the icon just
226 // changes, it won't
227 m_images[nPage] = nImage;
5aed9d50 228
e40298d5 229 MacSetupTabs() ;
2b5f62a0 230 }
5aed9d50 231
90c0f5a9 232 return true;
ee6b1d97
SC
233}
234
ee6b1d97
SC
235// ----------------------------------------------------------------------------
236// wxNotebook operations
237// ----------------------------------------------------------------------------
238
90b959ae 239// remove one page from the notebook, without deleting the window
8f83dfee 240wxNotebookPage* wxNotebook::DoRemovePage(size_t nPage)
ee6b1d97 241{
90b959ae
SC
242 wxCHECK( IS_VALID_PAGE(nPage), NULL );
243 wxNotebookPage* page = m_pages[nPage] ;
3ef585df 244 m_pages.RemoveAt(nPage);
5aed9d50 245
c854c7d9 246 MacSetupTabs();
5aed9d50 247
19c43a77 248 if(m_nSelection >= (int)GetPageCount()) {
c854c7d9
GD
249 m_nSelection = GetPageCount() - 1;
250 }
251 if(m_nSelection >= 0) {
90b959ae 252 m_pages[m_nSelection]->Show(true);
c854c7d9 253 }
37144cf0 254 InvalidateBestSize();
90b959ae 255 return page;
ee6b1d97
SC
256}
257
258// remove all pages
259bool wxNotebook::DeleteAllPages()
260{
90b959ae 261 WX_CLEAR_ARRAY(m_pages) ;
c854c7d9 262 MacSetupTabs();
061174e3 263 m_nSelection = -1 ;
37144cf0 264 InvalidateBestSize();
90c0f5a9 265 return true;
ee6b1d97
SC
266}
267
ee6b1d97
SC
268
269// same as AddPage() but does it at given position
8f83dfee 270bool wxNotebook::InsertPage(size_t nPage,
ee6b1d97
SC
271 wxNotebookPage *pPage,
272 const wxString& strText,
273 bool bSelect,
274 int imageId)
275{
19c43a77
VZ
276 if ( !wxNotebookBase::InsertPage(nPage, pPage, strText, bSelect, imageId) )
277 return false;
5aed9d50 278
461fe6e2
SC
279 wxASSERT_MSG( pPage->GetParent() == this,
280 _T("notebook pages must have notebook as parent") );
281
282 // don't show pages by default (we'll need to adjust their size first)
283 pPage->Show( false ) ;
284
c854c7d9 285 pPage->SetLabel(strText);
5aed9d50 286
2b5f62a0 287 m_images.Insert(imageId, nPage);
5aed9d50 288
c854c7d9 289 MacSetupTabs();
5aed9d50 290
63ff6f53
SC
291 wxRect rect = GetPageRect() ;
292 pPage->SetSize(rect);
c854c7d9
GD
293 if ( pPage->GetAutoLayout() ) {
294 pPage->Layout();
295 }
5aed9d50 296
461fe6e2
SC
297
298 // now deal with the selection
299 // ---------------------------
300
301 // if the inserted page is before the selected one, we must update the
302 // index of the selected page
303
90c0f5a9 304 if ( int(nPage) <= m_nSelection )
461fe6e2
SC
305 {
306 m_nSelection++;
307 // while this still is the same page showing, we need to update the tabs
5ca0d812 308 m_peer->SetValue( m_nSelection + 1 ) ;
461fe6e2 309 }
90c0f5a9 310
461fe6e2
SC
311 // some page should be selected: either this one or the first one if there
312 // is still no selection
313 int selNew = -1;
314 if ( bSelect )
315 selNew = nPage;
316 else if ( m_nSelection == -1 )
317 selNew = 0;
318
319 if ( selNew != -1 )
320 SetSelection(selNew);
321
37144cf0 322 InvalidateBestSize();
c854c7d9
GD
323 return true;
324}
325
3c3e6970
SC
326int wxNotebook::HitTest(const wxPoint& pt, long * flags) const
327{
328 int resultV = wxNOT_FOUND;
329#if TARGET_API_MAC_OSX
0df4335d 330 const int countPages = GetPageCount();
3c3e6970
SC
331
332 HIPoint hipoint= { pt.x , pt.y } ;
333 HIViewPartCode outPart = 0 ;
334 OSStatus err = HIViewGetPartHit (
335 m_peer->GetControlRef() ,
336 &hipoint ,
337 &outPart
338 );
339
0df4335d 340 int max = m_peer->GetMaximum() ;
3c3e6970
SC
341 if ( outPart == 0 && max > 0 )
342 {
343 // this is a hack, as unfortunately a hit on an already selected tab returns 0,
344 // so we have to go some extra miles to make sure we select something different
345 // and try again ..
0df4335d 346 int val = m_peer->GetValue() ;
3c3e6970
SC
347 int maxval = max ;
348 if ( max == 1 )
349 {
0df4335d 350 m_peer->SetMaximum( 2 ) ;
3c3e6970
SC
351 maxval = 2 ;
352 }
353
354 if ( val == 1 )
0df4335d 355 m_peer->SetValue( maxval ) ;
3c3e6970 356 else
0df4335d 357 m_peer->SetValue( 1 ) ;
3c3e6970 358
0df4335d 359 err = HIViewGetPartHit (
3c3e6970
SC
360 m_peer->GetControlRef() ,
361 &hipoint ,
362 &outPart
363 );
364
0df4335d 365 m_peer->SetValue( val ) ;
3c3e6970
SC
366 if ( max == 1 )
367 {
0df4335d 368 m_peer->SetMaximum( 1 ) ;
3c3e6970
SC
369 }
370 }
371
f885b815 372 if ( outPart >= 1 && (size_t)outPart <= countPages )
3c3e6970
SC
373 {
374 resultV = outPart ;
375 }
f885b815
VZ
376#endif // TARGET_API_MAC_OSX
377
3c3e6970
SC
378 if (flags != NULL)
379 {
380 *flags = 0;
381
382 // we cannot differentiate better
383 if (resultV >= 1)
384 *flags |= wxNB_HITTEST_ONLABEL;
385 else
386 *flags |= wxNB_HITTEST_NOWHERE;
387 }
388 return resultV;
389}
390
c854c7d9 391/* Added by Mark Newsam
e40298d5 392* When a page is added or deleted to the notebook this function updates
21fd5529 393* information held in the control so that it matches the order
e40298d5
JS
394* the user would expect.
395*/
c854c7d9
GD
396void wxNotebook::MacSetupTabs()
397{
5ca0d812 398 m_peer->SetMaximum( GetPageCount() ) ;
5aed9d50 399
c854c7d9 400 wxNotebookPage *page;
5324268e 401 ControlTabInfoRecV1 info;
5aed9d50 402
19c43a77
VZ
403 const size_t countPages = GetPageCount();
404 for(size_t ii = 0; ii < countPages; ii++)
c854c7d9 405 {
90b959ae 406 page = m_pages[ii];
5324268e 407 info.version = kControlTabInfoVersionOne;
c854c7d9 408 info.iconSuiteID = 0;
5324268e
SC
409 wxMacCFStringHolder cflabel( page->GetLabel() , m_font.GetEncoding() ) ;
410 info.name = cflabel ;
411 m_peer->SetData<ControlTabInfoRecV1>( ii+1, kControlTabInfoTag, &info ) ;
20b69855 412
2b5f62a0
VZ
413 if ( GetImageList() && GetPageImage(ii) >= 0 && UMAGetSystemVersion() >= 0x1020 )
414 {
b337acd7
SC
415 const wxBitmap bmap = GetImageList()->GetBitmap( GetPageImage(ii ) ) ;
416 if ( bmap.Ok() )
061174e3 417 {
061174e3 418 ControlButtonContentInfo info ;
20b69855 419
b337acd7 420 wxMacCreateBitmapButton( &info , bmap ) ;
81e2cbc6
VZ
421#ifdef __WXDEBUG__
422 OSStatus err =
423#endif // __WXDEBUG__
424 m_peer->SetData<ControlButtonContentInfo>( ii+1,kControlTabImageContentTag, &info );
061174e3 425 wxASSERT_MSG( err == noErr , wxT("Error when setting icon on tab") ) ;
20b69855 426 wxMacReleaseBitmapButton( &info ) ;
061174e3 427 }
2b5f62a0 428 }
5324268e 429 m_peer->SetTabEnabled( ii + 1 , true ) ;
c854c7d9
GD
430 }
431 Rect bounds;
5ca0d812 432 m_peer->GetRectInWindowCoords( &bounds ) ;
facd6764 433 InvalWindowRect((WindowRef)MacGetTopLevelWindowRef(), &bounds);
ee6b1d97
SC
434}
435
63ff6f53
SC
436wxRect wxNotebook::GetPageRect() const
437{
facd6764
SC
438 wxSize size = GetClientSize() ;
439 return wxRect( 0 , 0 , size.x , size.y ) ;
63ff6f53 440}
ee6b1d97
SC
441// ----------------------------------------------------------------------------
442// wxNotebook callbacks
443// ----------------------------------------------------------------------------
444
445// @@@ OnSize() is used for setting the font when it's called for the first
446// time because doing it in ::Create() doesn't work (for unknown reasons)
447void wxNotebook::OnSize(wxSizeEvent& event)
448{
5aed9d50 449
90b959ae 450 unsigned int nCount = m_pages.Count();
63ff6f53 451 wxRect rect = GetPageRect() ;
ee6b1d97 452 for ( unsigned int nPage = 0; nPage < nCount; nPage++ ) {
90b959ae 453 wxNotebookPage *pPage = m_pages[nPage];
63ff6f53 454 pPage->SetSize(rect);
c854c7d9 455 if ( pPage->GetAutoLayout() ) {
ee6b1d97 456 pPage->Layout();
c854c7d9 457 }
ee6b1d97 458 }
5aed9d50 459
ee6b1d97
SC
460 // Processing continues to next OnSize
461 event.Skip();
462}
463
464void wxNotebook::OnSelChange(wxNotebookEvent& event)
465{
466 // is it our tab control?
467 if ( event.GetEventObject() == this )
468 ChangePage(event.GetOldSelection(), event.GetSelection());
5aed9d50 469
ee6b1d97
SC
470 // we want to give others a chance to process this message as well
471 event.Skip();
472}
473
474void wxNotebook::OnSetFocus(wxFocusEvent& event)
475{
476 // set focus to the currently selected page if any
477 if ( m_nSelection != -1 )
90b959ae 478 m_pages[m_nSelection]->SetFocus();
5aed9d50 479
ee6b1d97
SC
480 event.Skip();
481}
482
483void wxNotebook::OnNavigationKey(wxNavigationKeyEvent& event)
484{
485 if ( event.IsWindowChange() ) {
486 // change pages
487 AdvanceSelection(event.GetDirection());
488 }
489 else {
461fe6e2
SC
490 // we get this event in 2 cases
491 //
492 // a) one of our pages might have generated it because the user TABbed
493 // out from it in which case we should propagate the event upwards and
494 // our parent will take care of setting the focus to prev/next sibling
495 //
496 // or
497 //
498 // b) the parent panel wants to give the focus to us so that we
499 // forward it to our selected page. We can't deal with this in
500 // OnSetFocus() because we don't know which direction the focus came
501 // from in this case and so can't choose between setting the focus to
502 // first or last panel child
503 wxWindow *parent = GetParent();
504 // the cast is here to fic a GCC ICE
505 if ( ((wxWindow*)event.GetEventObject()) == parent )
506 {
507 // no, it doesn't come from child, case (b): forward to a page
508 if ( m_nSelection != -1 )
509 {
510 // so that the page knows that the event comes from it's parent
511 // and is being propagated downwards
512 event.SetEventObject(this);
513
514 wxWindow *page = m_pages[m_nSelection];
515 if ( !page->GetEventHandler()->ProcessEvent(event) )
516 {
517 page->SetFocus();
518 }
519 //else: page manages focus inside it itself
520 }
521 else
522 {
523 // we have no pages - still have to give focus to _something_
524 SetFocus();
525 }
526 }
527 else
528 {
529 // it comes from our child, case (a), pass to the parent
530 if ( parent ) {
531 event.SetCurrentFocus(this);
532 parent->GetEventHandler()->ProcessEvent(event);
533 }
ee6b1d97
SC
534 }
535 }
536}
537
538// ----------------------------------------------------------------------------
539// wxNotebook base class virtuals
540// ----------------------------------------------------------------------------
541
461fe6e2
SC
542#if wxUSE_CONSTRAINTS
543
ee6b1d97
SC
544// override these 2 functions to do nothing: everything is done in OnSize
545
461fe6e2 546void wxNotebook::SetConstraintSizes(bool WXUNUSED(recurse))
ee6b1d97 547{
90c0f5a9
WS
548 // don't set the sizes of the pages - their correct size is not yet known
549 wxControl::SetConstraintSizes(false);
ee6b1d97
SC
550}
551
461fe6e2 552bool wxNotebook::DoPhase(int WXUNUSED(nPhase))
ee6b1d97 553{
90c0f5a9 554 return true;
ee6b1d97
SC
555}
556
461fe6e2
SC
557#endif // wxUSE_CONSTRAINTS
558
ee6b1d97
SC
559void wxNotebook::Command(wxCommandEvent& event)
560{
427ff662 561 wxFAIL_MSG(wxT("wxNotebook::Command not implemented"));
ee6b1d97
SC
562}
563
564// ----------------------------------------------------------------------------
565// wxNotebook helper functions
566// ----------------------------------------------------------------------------
567
568// hide the currently active panel and show the new one
569void wxNotebook::ChangePage(int nOldSel, int nSel)
570{
90c0f5a9 571 if ( nOldSel != -1 )
461fe6e2 572 {
90c0f5a9 573 m_pages[nOldSel]->Show(false);
461fe6e2
SC
574 }
575
576 if ( nSel != -1 )
c854c7d9 577 {
90b959ae 578 wxNotebookPage *pPage = m_pages[nSel];
90c0f5a9 579 pPage->Show(true);
c854c7d9 580 pPage->SetFocus();
c854c7d9 581 }
90c0f5a9 582
ee6b1d97 583 m_nSelection = nSel;
5ca0d812 584 m_peer->SetValue( m_nSelection + 1 ) ;
ee6b1d97
SC
585}
586
90c0f5a9 587wxInt32 wxNotebook::MacControlHit(WXEVENTHANDLERREF WXUNUSED(handler) , WXEVENTREF WXUNUSED(event) )
799690a0 588{
4c37f124 589 OSStatus status = eventNotHandledErr ;
90c0f5a9 590
5ca0d812 591 SInt32 newSel = m_peer->GetValue() - 1 ;
4c37f124 592 if ( newSel != m_nSelection )
e40298d5 593 {
4c37f124
SC
594 wxNotebookEvent changing(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING, m_windowId,
595 newSel , m_nSelection);
596 changing.SetEventObject(this);
597 GetEventHandler()->ProcessEvent(changing);
5aed9d50 598
4c37f124 599 if(changing.IsAllowed())
e40298d5 600 {
4c37f124
SC
601 wxNotebookEvent event(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED, m_windowId,
602 newSel, m_nSelection);
603 event.SetEventObject(this);
5aed9d50 604
4c37f124
SC
605 GetEventHandler()->ProcessEvent(event);
606 }
607 else
608 {
5ca0d812 609 m_peer->SetValue( m_nSelection + 1 ) ;
e40298d5 610 }
4c37f124 611 status = noErr ;
e40298d5 612 }
4c37f124 613 return status ;
ee6b1d97
SC
614}
615
179e085f 616#endif