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