]> git.saurik.com Git - wxWidgets.git/blob - src/msw/notebook.cpp
Copied gsockmsw.c revision 1.20
[wxWidgets.git] / src / msw / notebook.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: msw/notebook.cpp
3 // Purpose: implementation of wxNotebook
4 // Author: Vadim Zeitlin
5 // Modified by:
6 // Created: 11.06.98
7 // RCS-ID: $Id$
8 // Copyright: (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
9 // Licence: wxWindows licence
10 ///////////////////////////////////////////////////////////////////////////////
11
12 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
13 #pragma implementation "notebook.h"
14 #endif
15
16 // For compilers that support precompilation, includes "wx.h".
17 #include "wx/wxprec.h"
18
19 #ifdef __BORLANDC__
20 #pragma hdrstop
21 #endif
22
23 #if wxUSE_NOTEBOOK
24
25 // wxWindows
26 #ifndef WX_PRECOMP
27 #include "wx/string.h"
28 #endif // WX_PRECOMP
29
30 #include "wx/log.h"
31 #include "wx/imaglist.h"
32 #include "wx/event.h"
33 #include "wx/control.h"
34 #include "wx/notebook.h"
35 #include "wx/app.h"
36
37 #include "wx/msw/private.h"
38
39 // Windows standard headers
40 #ifndef __WIN95__
41 #error "wxNotebook is only supported Windows 95 and above"
42 #endif //Win95
43
44 #include <windowsx.h> // for SetWindowFont
45
46 #ifdef __GNUWIN32_OLD__
47 #include "wx/msw/gnuwin32/extra.h"
48 #endif
49
50 #if defined(__WIN95__) && !(defined(__GNUWIN32_OLD__) && !defined(__CYGWIN10__))
51 #include <commctrl.h>
52 #endif
53
54 #include "wx/msw/winundef.h"
55
56 #if wxUSE_UXTHEME
57 #include "wx/msw/uxtheme.h"
58
59 #include "wx/radiobut.h"
60 #include "wx/radiobox.h"
61 #include "wx/checkbox.h"
62 #include "wx/bmpbuttn.h"
63 #include "wx/statline.h"
64 #include "wx/statbox.h"
65 #include "wx/stattext.h"
66 #include "wx/slider.h"
67 #include "wx/scrolwin.h"
68 #include "wx/panel.h"
69 #endif
70
71 // ----------------------------------------------------------------------------
72 // macros
73 // ----------------------------------------------------------------------------
74
75 // check that the page index is valid
76 #define IS_VALID_PAGE(nPage) ((nPage) < GetPageCount())
77
78 // hide the ugly cast
79 #define m_hwnd (HWND)GetHWND()
80
81 // ----------------------------------------------------------------------------
82 // constants
83 // ----------------------------------------------------------------------------
84
85 // This is a work-around for missing defines in gcc-2.95 headers
86 #ifndef TCS_RIGHT
87 #define TCS_RIGHT 0x0002
88 #endif
89
90 #ifndef TCS_VERTICAL
91 #define TCS_VERTICAL 0x0080
92 #endif
93
94 #ifndef TCS_BOTTOM
95 #define TCS_BOTTOM TCS_RIGHT
96 #endif
97
98 // ----------------------------------------------------------------------------
99 // event table
100 // ----------------------------------------------------------------------------
101
102 #include <wx/listimpl.cpp>
103
104 WX_DEFINE_LIST( wxNotebookPageInfoList ) ;
105
106 DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED)
107 DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING)
108
109 BEGIN_EVENT_TABLE(wxNotebook, wxControl)
110 EVT_NOTEBOOK_PAGE_CHANGED(-1, wxNotebook::OnSelChange)
111
112 EVT_SIZE(wxNotebook::OnSize)
113
114 EVT_NAVIGATION_KEY(wxNotebook::OnNavigationKey)
115 END_EVENT_TABLE()
116
117 #if wxUSE_EXTENDED_RTTI
118 WX_DEFINE_FLAGS( wxNotebookStyle )
119
120 wxBEGIN_FLAGS( wxNotebookStyle )
121 // new style border flags, we put them first to
122 // use them for streaming out
123 wxFLAGS_MEMBER(wxBORDER_SIMPLE)
124 wxFLAGS_MEMBER(wxBORDER_SUNKEN)
125 wxFLAGS_MEMBER(wxBORDER_DOUBLE)
126 wxFLAGS_MEMBER(wxBORDER_RAISED)
127 wxFLAGS_MEMBER(wxBORDER_STATIC)
128 wxFLAGS_MEMBER(wxBORDER_NONE)
129
130 // old style border flags
131 wxFLAGS_MEMBER(wxSIMPLE_BORDER)
132 wxFLAGS_MEMBER(wxSUNKEN_BORDER)
133 wxFLAGS_MEMBER(wxDOUBLE_BORDER)
134 wxFLAGS_MEMBER(wxRAISED_BORDER)
135 wxFLAGS_MEMBER(wxSTATIC_BORDER)
136 wxFLAGS_MEMBER(wxBORDER)
137
138 // standard window styles
139 wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
140 wxFLAGS_MEMBER(wxCLIP_CHILDREN)
141 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
142 wxFLAGS_MEMBER(wxWANTS_CHARS)
143 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
144 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
145 wxFLAGS_MEMBER(wxVSCROLL)
146 wxFLAGS_MEMBER(wxHSCROLL)
147
148 wxFLAGS_MEMBER(wxNB_FIXEDWIDTH)
149 wxFLAGS_MEMBER(wxNB_LEFT)
150 wxFLAGS_MEMBER(wxNB_RIGHT)
151 wxFLAGS_MEMBER(wxNB_BOTTOM)
152
153 wxEND_FLAGS( wxNotebookStyle )
154
155 IMPLEMENT_DYNAMIC_CLASS_XTI(wxNotebook, wxControl,"wx/notebook.h")
156 IMPLEMENT_DYNAMIC_CLASS_XTI(wxNotebookPageInfo, wxObject , "wx/notebook.h" )
157
158 wxCOLLECTION_TYPE_INFO( wxNotebookPageInfo * , wxNotebookPageInfoList ) ;
159
160 template<> void wxCollectionToVariantArray( wxNotebookPageInfoList const &theList, wxxVariantArray &value)
161 {
162 wxListCollectionToVariantArray<wxNotebookPageInfoList::compatibility_iterator>( theList , value ) ;
163 }
164
165 wxBEGIN_PROPERTIES_TABLE(wxNotebook)
166 wxEVENT_PROPERTY( PageChanging , wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING , wxNotebookEvent )
167 wxEVENT_PROPERTY( PageChanged , wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED , wxNotebookEvent )
168
169 wxPROPERTY_COLLECTION( PageInfos , wxNotebookPageInfoList , wxNotebookPageInfo* , AddPageInfo , GetPageInfos , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
170 wxPROPERTY_FLAGS( WindowStyle , wxNotebookStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
171 wxEND_PROPERTIES_TABLE()
172
173 wxBEGIN_HANDLERS_TABLE(wxNotebook)
174 wxEND_HANDLERS_TABLE()
175
176 wxCONSTRUCTOR_5( wxNotebook , wxWindow* , Parent , wxWindowID , Id , wxPoint , Position , wxSize , Size , long , WindowStyle)
177
178
179 wxBEGIN_PROPERTIES_TABLE(wxNotebookPageInfo)
180 wxREADONLY_PROPERTY( Page , wxNotebookPage* , GetPage , , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
181 wxREADONLY_PROPERTY( Text , wxString , GetText , wxString() , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
182 wxREADONLY_PROPERTY( Selected , bool , GetSelected , false, 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
183 wxREADONLY_PROPERTY( ImageId , int , GetImageId , -1 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
184 wxEND_PROPERTIES_TABLE()
185
186 wxBEGIN_HANDLERS_TABLE(wxNotebookPageInfo)
187 wxEND_HANDLERS_TABLE()
188
189 wxCONSTRUCTOR_4( wxNotebookPageInfo , wxNotebookPage* , Page , wxString , Text , bool , Selected , int , ImageId )
190
191 #else
192 IMPLEMENT_DYNAMIC_CLASS(wxNotebook, wxControl)
193 IMPLEMENT_DYNAMIC_CLASS(wxNotebookPageInfo, wxObject )
194 #endif
195 IMPLEMENT_DYNAMIC_CLASS(wxNotebookEvent, wxNotifyEvent)
196
197 // ============================================================================
198 // implementation
199 // ============================================================================
200
201 // ----------------------------------------------------------------------------
202 // wxNotebook construction
203 // ----------------------------------------------------------------------------
204
205 const wxNotebookPageInfoList& wxNotebook::GetPageInfos() const
206 {
207 wxNotebookPageInfoList* list = const_cast< wxNotebookPageInfoList* >( &m_pageInfos ) ;
208 WX_CLEAR_LIST( wxNotebookPageInfoList , *list ) ;
209 for( size_t i = 0 ; i < GetPageCount() ; ++i )
210 {
211 wxNotebookPageInfo *info = new wxNotebookPageInfo() ;
212 info->Create( const_cast<wxNotebook*>(this)->GetPage(i) , GetPageText(i) , GetSelection() == int(i) , GetPageImage(i) ) ;
213 list->Append( info ) ;
214 }
215 return m_pageInfos ;
216 }
217
218 // common part of all ctors
219 void wxNotebook::Init()
220 {
221 m_imageList = NULL;
222 m_nSelection = -1;
223 }
224
225 // default for dynamic class
226 wxNotebook::wxNotebook()
227 {
228 Init();
229 }
230
231 // the same arguments as for wxControl
232 wxNotebook::wxNotebook(wxWindow *parent,
233 wxWindowID id,
234 const wxPoint& pos,
235 const wxSize& size,
236 long style,
237 const wxString& name)
238 {
239 Init();
240
241 Create(parent, id, pos, size, style, name);
242 }
243
244 // Create() function
245 bool wxNotebook::Create(wxWindow *parent,
246 wxWindowID id,
247 const wxPoint& pos,
248 const wxSize& size,
249 long style,
250 const wxString& name)
251 {
252 // Does ComCtl32 support non-top tabs?
253 int verComCtl32 = wxApp::GetComCtl32Version();
254 if ( verComCtl32 < 470 || verComCtl32 >= 600 )
255 {
256 if (style & wxNB_BOTTOM)
257 style &= ~wxNB_BOTTOM;
258
259 if (style & wxNB_LEFT)
260 style &= ~wxNB_LEFT;
261
262 if (style & wxNB_RIGHT)
263 style &= ~wxNB_RIGHT;
264 }
265
266 if ( !CreateControl(parent, id, pos, size, style | wxTAB_TRAVERSAL,
267 wxDefaultValidator, name) )
268 return false;
269
270 if ( !MSWCreateControl(WC_TABCONTROL, wxEmptyString, pos, size) )
271 return false;
272
273 SetBackgroundColour(wxColour(::GetSysColor(COLOR_BTNFACE)));
274
275 return true;
276 }
277
278 WXDWORD wxNotebook::MSWGetStyle(long style, WXDWORD *exstyle) const
279 {
280 WXDWORD tabStyle = wxControl::MSWGetStyle(style, exstyle);
281
282 tabStyle |= WS_TABSTOP | TCS_TABS;
283
284 if ( style & wxNB_MULTILINE )
285 tabStyle |= TCS_MULTILINE;
286 if ( style & wxNB_FIXEDWIDTH )
287 tabStyle |= TCS_FIXEDWIDTH;
288
289 if ( style & wxNB_BOTTOM )
290 tabStyle |= TCS_RIGHT;
291 else if ( style & wxNB_LEFT )
292 tabStyle |= TCS_VERTICAL;
293 else if ( style & wxNB_RIGHT )
294 tabStyle |= TCS_VERTICAL | TCS_RIGHT;
295
296 // ex style
297 if ( exstyle )
298 {
299 // note that we never want to have the default WS_EX_CLIENTEDGE style
300 // as it looks too ugly for the notebooks
301 *exstyle = 0;
302 }
303
304 return tabStyle;
305 }
306
307 // ----------------------------------------------------------------------------
308 // wxNotebook accessors
309 // ----------------------------------------------------------------------------
310
311 size_t wxNotebook::GetPageCount() const
312 {
313 // consistency check
314 wxASSERT( (int)m_pages.Count() == TabCtrl_GetItemCount(m_hwnd) );
315
316 return m_pages.Count();
317 }
318
319 int wxNotebook::GetRowCount() const
320 {
321 return TabCtrl_GetRowCount(m_hwnd);
322 }
323
324 int wxNotebook::SetSelection(size_t nPage)
325 {
326 wxCHECK_MSG( IS_VALID_PAGE(nPage), -1, wxT("notebook page out of range") );
327
328 if ( int(nPage) != m_nSelection )
329 {
330 wxNotebookEvent event(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING, m_windowId);
331 event.SetSelection(nPage);
332 event.SetOldSelection(m_nSelection);
333 event.SetEventObject(this);
334 if ( !GetEventHandler()->ProcessEvent(event) || event.IsAllowed() )
335 {
336 // program allows the page change
337 event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED);
338 (void)GetEventHandler()->ProcessEvent(event);
339
340 TabCtrl_SetCurSel(m_hwnd, nPage);
341 }
342 }
343
344 return m_nSelection;
345 }
346
347 bool wxNotebook::SetPageText(size_t nPage, const wxString& strText)
348 {
349 wxCHECK_MSG( IS_VALID_PAGE(nPage), false, wxT("notebook page out of range") );
350
351 TC_ITEM tcItem;
352 tcItem.mask = TCIF_TEXT;
353 tcItem.pszText = (wxChar *)strText.c_str();
354
355 return TabCtrl_SetItem(m_hwnd, nPage, &tcItem) != 0;
356 }
357
358 wxString wxNotebook::GetPageText(size_t nPage) const
359 {
360 wxCHECK_MSG( IS_VALID_PAGE(nPage), wxEmptyString, wxT("notebook page out of range") );
361
362 wxChar buf[256];
363 TC_ITEM tcItem;
364 tcItem.mask = TCIF_TEXT;
365 tcItem.pszText = buf;
366 tcItem.cchTextMax = WXSIZEOF(buf);
367
368 wxString str;
369 if ( TabCtrl_GetItem(m_hwnd, nPage, &tcItem) )
370 str = tcItem.pszText;
371
372 return str;
373 }
374
375 int wxNotebook::GetPageImage(size_t nPage) const
376 {
377 wxCHECK_MSG( IS_VALID_PAGE(nPage), -1, wxT("notebook page out of range") );
378
379 TC_ITEM tcItem;
380 tcItem.mask = TCIF_IMAGE;
381
382 return TabCtrl_GetItem(m_hwnd, nPage, &tcItem) ? tcItem.iImage : -1;
383 }
384
385 bool wxNotebook::SetPageImage(size_t nPage, int nImage)
386 {
387 wxCHECK_MSG( IS_VALID_PAGE(nPage), false, wxT("notebook page out of range") );
388
389 TC_ITEM tcItem;
390 tcItem.mask = TCIF_IMAGE;
391 tcItem.iImage = nImage;
392
393 return TabCtrl_SetItem(m_hwnd, nPage, &tcItem) != 0;
394 }
395
396 void wxNotebook::SetImageList(wxImageList* imageList)
397 {
398 wxNotebookBase::SetImageList(imageList);
399
400 if ( imageList )
401 {
402 TabCtrl_SetImageList(m_hwnd, (HIMAGELIST)imageList->GetHIMAGELIST());
403 }
404 }
405
406 // ----------------------------------------------------------------------------
407 // wxNotebook size settings
408 // ----------------------------------------------------------------------------
409
410 void wxNotebook::SetPageSize(const wxSize& size)
411 {
412 // transform the page size into the notebook size
413 RECT rc;
414 rc.left =
415 rc.top = 0;
416 rc.right = size.x;
417 rc.bottom = size.y;
418
419 TabCtrl_AdjustRect(GetHwnd(), true, &rc);
420
421 // and now set it
422 SetSize(rc.right - rc.left, rc.bottom - rc.top);
423 }
424
425 void wxNotebook::SetPadding(const wxSize& padding)
426 {
427 TabCtrl_SetPadding(GetHwnd(), padding.x, padding.y);
428 }
429
430 // Windows-only at present. Also, you must use the wxNB_FIXEDWIDTH
431 // style.
432 void wxNotebook::SetTabSize(const wxSize& sz)
433 {
434 ::SendMessage(GetHwnd(), TCM_SETITEMSIZE, 0, MAKELPARAM(sz.x, sz.y));
435 }
436
437 wxSize wxNotebook::CalcSizeFromPage(const wxSize& sizePage) const
438 {
439 wxSize sizeTotal = sizePage;
440
441 // We need to make getting tab size part of the wxWindows API.
442 wxSize tabSize(0, 0);
443 if (GetPageCount() > 0)
444 {
445 RECT rect;
446 TabCtrl_GetItemRect((HWND) GetHWND(), 0, & rect);
447 tabSize.x = rect.right - rect.left;
448 tabSize.y = rect.bottom - rect.top;
449 }
450 if ( HasFlag(wxNB_LEFT) || HasFlag(wxNB_RIGHT) )
451 {
452 sizeTotal.x += tabSize.x + 7;
453 sizeTotal.y += 7;
454 }
455 else
456 {
457 sizeTotal.x += 7;
458 sizeTotal.y += tabSize.y + 7;
459 }
460
461 return sizeTotal;
462 }
463
464 void wxNotebook::AdjustPageSize(wxNotebookPage *page)
465 {
466 wxCHECK_RET( page, _T("NULL page in wxNotebook::AdjustPageSize") );
467
468 RECT rc;
469 rc.left =
470 rc.top = 0;
471
472 // get the page size from the notebook size
473 GetSize((int *)&rc.right, (int *)&rc.bottom);
474 TabCtrl_AdjustRect(m_hwnd, false, &rc);
475
476 page->SetSize(rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top);
477 }
478
479 // ----------------------------------------------------------------------------
480 // wxNotebook operations
481 // ----------------------------------------------------------------------------
482
483 // remove one page from the notebook, without deleting
484 wxNotebookPage *wxNotebook::DoRemovePage(size_t nPage)
485 {
486 wxNotebookPage *pageRemoved = wxNotebookBase::DoRemovePage(nPage);
487 if ( !pageRemoved )
488 return NULL;
489
490 TabCtrl_DeleteItem(m_hwnd, nPage);
491
492 if ( m_pages.IsEmpty() )
493 {
494 // no selection any more, the notebook becamse empty
495 m_nSelection = -1;
496 }
497 else // notebook still not empty
498 {
499 int selNew = TabCtrl_GetCurSel(m_hwnd);
500 if (selNew != -1)
501 {
502 // No selection change, just refresh the current selection.
503 // Because it could be that the slection index changed
504 // we need to update it.
505 // Note: this does not mean the selection it self changed.
506 m_nSelection = selNew;
507 m_pages[m_nSelection]->Refresh();
508 }
509 else if (int(nPage) == m_nSelection)
510 {
511 // The selection was deleted.
512
513 // Determine new selection.
514 if (m_nSelection == int(GetPageCount()))
515 selNew = m_nSelection - 1;
516 else
517 selNew = m_nSelection;
518
519 // m_nSelection must be always valid so reset it before calling
520 // SetSelection()
521 m_nSelection = -1;
522 SetSelection(selNew);
523 }
524 else
525 {
526 wxFAIL; // Windows did not behave ok.
527 }
528 }
529
530 return pageRemoved;
531 }
532
533 // remove all pages
534 bool wxNotebook::DeleteAllPages()
535 {
536 size_t nPageCount = GetPageCount();
537 size_t nPage;
538 for ( nPage = 0; nPage < nPageCount; nPage++ )
539 delete m_pages[nPage];
540
541 m_pages.Clear();
542
543 TabCtrl_DeleteAllItems(m_hwnd);
544
545 m_nSelection = -1;
546
547 return true;
548 }
549
550 // same as AddPage() but does it at given position
551 bool wxNotebook::InsertPage(size_t nPage,
552 wxNotebookPage *pPage,
553 const wxString& strText,
554 bool bSelect,
555 int imageId)
556 {
557 wxCHECK_MSG( pPage != NULL, false, _T("NULL page in wxNotebook::InsertPage") );
558 wxCHECK_MSG( IS_VALID_PAGE(nPage) || nPage == GetPageCount(), false,
559 _T("invalid index in wxNotebook::InsertPage") );
560
561 wxASSERT_MSG( pPage->GetParent() == this,
562 _T("notebook pages must have notebook as parent") );
563
564 #if wxUSE_UXTHEME && wxUSE_UXTHEME_AUTO
565 static bool g_TestedForTheme = false;
566 static bool g_UseTheme = false;
567 if (!g_TestedForTheme)
568 {
569 int commCtrlVersion = wxTheApp->GetComCtl32Version() ;
570
571 g_UseTheme = (commCtrlVersion >= 600);
572 g_TestedForTheme = true;
573 }
574
575 // Automatically apply the theme background,
576 // changing the colour of the panel to match the
577 // tab page colour. This won't work well with all
578 // themes but it's a start.
579 if (g_UseTheme && wxUxThemeEngine::Get() && pPage->IsKindOf(CLASSINFO(wxPanel)))
580 {
581 ApplyThemeBackground(pPage, GetThemeBackgroundColour());
582 }
583 #endif
584
585 // add a new tab to the control
586 // ----------------------------
587
588 // init all fields to 0
589 TC_ITEM tcItem;
590 wxZeroMemory(tcItem);
591
592 // set the image, if any
593 if ( imageId != -1 )
594 {
595 tcItem.mask |= TCIF_IMAGE;
596 tcItem.iImage = imageId;
597 }
598
599 // and the text
600 if ( !strText.IsEmpty() )
601 {
602 tcItem.mask |= TCIF_TEXT;
603 tcItem.pszText = (wxChar *)strText.c_str(); // const_cast
604 }
605
606 // fit the notebook page to the tab control's display area: this should be
607 // done before adding it to the notebook or TabCtrl_InsertItem() will
608 // change the notebooks size itself!
609 AdjustPageSize(pPage);
610
611 // finally do insert it
612 if ( TabCtrl_InsertItem(m_hwnd, nPage, &tcItem) == -1 )
613 {
614 wxLogError(wxT("Can't create the notebook page '%s'."), strText.c_str());
615
616 return false;
617 }
618
619 // succeeded: save the pointer to the page
620 m_pages.Insert(pPage, nPage);
621
622 // for the first page (only) we need to adjust the size again because the
623 // notebook size changed: the tabs which hadn't been there before are now
624 // shown
625 if ( m_pages.GetCount() == 1 )
626 {
627 AdjustPageSize(pPage);
628 }
629
630 // hide the page: unless it is selected, it shouldn't be shown (and if it
631 // is selected it will be shown later)
632 HWND hwnd = GetWinHwnd(pPage);
633 SetWindowLong(hwnd, GWL_STYLE, GetWindowLong(hwnd, GWL_STYLE) & ~WS_VISIBLE);
634
635 // this updates internal flag too -- otherwise it would get out of sync
636 // with the real state
637 pPage->Show(false);
638
639
640 // now deal with the selection
641 // ---------------------------
642
643 // if the inserted page is before the selected one, we must update the
644 // index of the selected page
645 if ( int(nPage) <= m_nSelection )
646 {
647 // one extra page added
648 m_nSelection++;
649 }
650
651 // some page should be selected: either this one or the first one if there
652 // is still no selection
653 int selNew = -1;
654 if ( bSelect )
655 selNew = nPage;
656 else if ( m_nSelection == -1 )
657 selNew = 0;
658
659 if ( selNew != -1 )
660 SetSelection(selNew);
661
662 return true;
663 }
664
665 int wxNotebook::HitTest(const wxPoint& pt, long *flags) const
666 {
667 TC_HITTESTINFO hitTestInfo;
668 hitTestInfo.pt.x = pt.x;
669 hitTestInfo.pt.y = pt.y;
670 int item = TabCtrl_HitTest(GetHwnd(), &hitTestInfo);
671
672 if ( flags )
673 {
674 *flags = 0;
675
676 if ((hitTestInfo.flags & TCHT_NOWHERE) == TCHT_NOWHERE)
677 *flags |= wxNB_HITTEST_NOWHERE;
678 if ((hitTestInfo.flags & TCHT_ONITEM) == TCHT_ONITEM)
679 *flags |= wxNB_HITTEST_ONITEM;
680 if ((hitTestInfo.flags & TCHT_ONITEMICON) == TCHT_ONITEMICON)
681 *flags |= wxNB_HITTEST_ONICON;
682 if ((hitTestInfo.flags & TCHT_ONITEMLABEL) == TCHT_ONITEMLABEL)
683 *flags |= wxNB_HITTEST_ONLABEL;
684 }
685
686 return item;
687 }
688
689
690 // ----------------------------------------------------------------------------
691 // wxNotebook callbacks
692 // ----------------------------------------------------------------------------
693
694 void wxNotebook::OnSize(wxSizeEvent& event)
695 {
696 // fit the notebook page to the tab control's display area
697 RECT rc;
698 rc.left = rc.top = 0;
699 GetSize((int *)&rc.right, (int *)&rc.bottom);
700
701 TabCtrl_AdjustRect(m_hwnd, false, &rc);
702
703 int width = rc.right - rc.left,
704 height = rc.bottom - rc.top;
705 size_t nCount = m_pages.Count();
706 for ( size_t nPage = 0; nPage < nCount; nPage++ ) {
707 wxNotebookPage *pPage = m_pages[nPage];
708 pPage->SetSize(rc.left, rc.top, width, height);
709 }
710
711 event.Skip();
712 }
713
714 void wxNotebook::OnSelChange(wxNotebookEvent& event)
715 {
716 // is it our tab control?
717 if ( event.GetEventObject() == this )
718 {
719 int sel = event.GetOldSelection();
720 if ( sel != -1 )
721 m_pages[sel]->Show(false);
722
723 sel = event.GetSelection();
724 if ( sel != -1 )
725 {
726 wxNotebookPage *pPage = m_pages[sel];
727 pPage->Show(true);
728 pPage->SetFocus();
729
730 // If the newly focused window is not a child of the new page,
731 // SetFocus was not successful and the notebook itself should be
732 // focused
733 wxWindow *currentFocus = FindFocus();
734 wxWindow *startFocus = currentFocus;
735 while ( currentFocus && currentFocus != pPage && currentFocus != this )
736 currentFocus = currentFocus->GetParent();
737
738 if ( startFocus == pPage || currentFocus != pPage )
739 SetFocus();
740
741 }
742 else // no pages in the notebook, give the focus to itself
743 {
744 SetFocus();
745 }
746
747 m_nSelection = sel;
748 }
749
750 // we want to give others a chance to process this message as well
751 event.Skip();
752 }
753
754 bool wxNotebook::MSWTranslateMessage(WXMSG *wxmsg)
755 {
756 const MSG * const msg = (MSG *)wxmsg;
757
758 // intercept TAB, CTRL+TAB and CTRL+SHIFT+TAB for processing by wxNotebook.
759 // TAB will be passed to the currently selected page, CTRL+TAB and
760 // CTRL+SHIFT+TAB will be processed by the notebook itself. do not
761 // intercept SHIFT+TAB. This goes to the parent of the notebook which will
762 // process it.
763 if ( msg->message == WM_KEYDOWN && msg->wParam == VK_TAB &&
764 msg->hwnd == m_hwnd &&
765 (wxIsCtrlDown() || !wxIsShiftDown()) )
766 {
767 return MSWProcessMessage(wxmsg);
768 }
769
770 return false;
771 }
772
773 void wxNotebook::OnNavigationKey(wxNavigationKeyEvent& event)
774 {
775 if ( event.IsWindowChange() ) {
776 // change pages
777 AdvanceSelection(event.GetDirection());
778 }
779 else {
780 // we get this event in 3 cases
781 //
782 // a) one of our pages might have generated it because the user TABbed
783 // out from it in which case we should propagate the event upwards and
784 // our parent will take care of setting the focus to prev/next sibling
785 //
786 // or
787 //
788 // b) the parent panel wants to give the focus to us so that we
789 // forward it to our selected page. We can't deal with this in
790 // OnSetFocus() because we don't know which direction the focus came
791 // from in this case and so can't choose between setting the focus to
792 // first or last panel child
793 //
794 // or
795 //
796 // c) we ourselves (see MSWTranslateMessage) generated the event
797 //
798 wxWindow * const parent = GetParent();
799
800 const bool isFromParent = event.GetEventObject() == parent;
801 const bool isFromSelf = event.GetEventObject() == this;
802
803 if ( isFromParent || isFromSelf )
804 {
805 // no, it doesn't come from child, case (b) or (c): forward to a
806 // page but only if direction is backwards (TAB) or from ourselves,
807 if ( m_nSelection != -1 &&
808 (!event.GetDirection() || isFromSelf) )
809 {
810 // so that the page knows that the event comes from it's parent
811 // and is being propagated downwards
812 event.SetEventObject(this);
813
814 wxWindow *page = m_pages[m_nSelection];
815 if ( !page->GetEventHandler()->ProcessEvent(event) )
816 {
817 page->SetFocus();
818 }
819 //else: page manages focus inside it itself
820 }
821 else // otherwise set the focus to the notebook itself
822 {
823 SetFocus();
824 }
825 }
826 else
827 {
828 // it comes from our child, case (a), pass to the parent, but only
829 // if the direction is forwards. Otherwise set the focus to the
830 // notebook itself. The notebook is always the 'first' control of a
831 // page.
832 if ( !event.GetDirection() )
833 {
834 SetFocus();
835 }
836 else if ( parent )
837 {
838 event.SetCurrentFocus(this);
839 parent->GetEventHandler()->ProcessEvent(event);
840 }
841 }
842 }
843 }
844
845 // ----------------------------------------------------------------------------
846 // wxNotebook base class virtuals
847 // ----------------------------------------------------------------------------
848
849 #if wxUSE_CONSTRAINTS
850
851 // override these 2 functions to do nothing: everything is done in OnSize
852
853 void wxNotebook::SetConstraintSizes(bool WXUNUSED(recurse))
854 {
855 // don't set the sizes of the pages - their correct size is not yet known
856 wxControl::SetConstraintSizes(false);
857 }
858
859 bool wxNotebook::DoPhase(int WXUNUSED(nPhase))
860 {
861 return true;
862 }
863
864 #endif // wxUSE_CONSTRAINTS
865
866 // ----------------------------------------------------------------------------
867 // wxNotebook Windows message handlers
868 // ----------------------------------------------------------------------------
869
870 bool wxNotebook::MSWOnScroll(int orientation, WXWORD nSBCode,
871 WXWORD pos, WXHWND control)
872 {
873 // don't generate EVT_SCROLLWIN events for the WM_SCROLLs coming from the
874 // up-down control
875 if ( control )
876 return false;
877
878 return wxNotebookBase::MSWOnScroll(orientation, nSBCode, pos, control);
879 }
880
881 bool wxNotebook::MSWOnNotify(int idCtrl, WXLPARAM lParam, WXLPARAM* result)
882 {
883 wxNotebookEvent event(wxEVT_NULL, m_windowId);
884
885 NMHDR* hdr = (NMHDR *)lParam;
886 switch ( hdr->code ) {
887 case TCN_SELCHANGE:
888 event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED);
889 break;
890
891 case TCN_SELCHANGING:
892 event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING);
893 break;
894
895 default:
896 return wxControl::MSWOnNotify(idCtrl, lParam, result);
897 }
898
899 event.SetSelection(TabCtrl_GetCurSel(m_hwnd));
900 event.SetOldSelection(m_nSelection);
901 event.SetEventObject(this);
902 event.SetInt(idCtrl);
903
904 bool processed = GetEventHandler()->ProcessEvent(event);
905 *result = !event.IsAllowed();
906 return processed;
907 }
908
909 // Windows only: attempts to get colour for UX theme page background
910 wxColour wxNotebook::GetThemeBackgroundColour()
911 {
912 #if wxUSE_UXTHEME
913 if (wxUxThemeEngine::Get())
914 {
915 wxUxThemeHandle hTheme(this, L"TAB");
916 if (hTheme)
917 {
918 // This is total guesswork.
919 // See PlatformSDK\Include\Tmschema.h for values
920 COLORREF themeColor;
921 wxUxThemeEngine::Get()->GetThemeColor
922 (
923 hTheme,
924 10 /* TABP_BODY */,
925 1 /* NORMAL */,
926 3821, /* FILLCOLORHINT */
927 & themeColor
928 );
929
930 wxColour colour(GetRValue(themeColor), GetGValue(themeColor), GetBValue(themeColor));
931 return colour;
932 }
933 }
934 #endif // wxUSE_UXTHEME
935
936 return GetBackgroundColour();
937 }
938
939 // Windows only: attempts to apply the UX theme page background to this page
940 #if wxUSE_UXTHEME
941 void wxNotebook::ApplyThemeBackground(wxWindow* window, const wxColour& colour)
942 #else
943 void wxNotebook::ApplyThemeBackground(wxWindow*, const wxColour&)
944 #endif
945 {
946 #if wxUSE_UXTHEME
947 // Don't set the background for buttons since this will
948 // switch it into ownerdraw mode
949 if (window->IsKindOf(CLASSINFO(wxButton)) && !window->IsKindOf(CLASSINFO(wxBitmapButton)))
950 // This is essential, otherwise you'll see dark grey
951 // corners in the buttons.
952 ((wxButton*)window)->wxControl::SetBackgroundColour(colour);
953 else if (window->IsKindOf(CLASSINFO(wxStaticText)) ||
954 window->IsKindOf(CLASSINFO(wxStaticBox)) ||
955 window->IsKindOf(CLASSINFO(wxStaticLine)) ||
956 window->IsKindOf(CLASSINFO(wxRadioButton)) ||
957 window->IsKindOf(CLASSINFO(wxRadioBox)) ||
958 window->IsKindOf(CLASSINFO(wxCheckBox)) ||
959 window->IsKindOf(CLASSINFO(wxBitmapButton)) ||
960 window->IsKindOf(CLASSINFO(wxSlider)) ||
961 window->IsKindOf(CLASSINFO(wxPanel)) ||
962 (window->IsKindOf(CLASSINFO(wxNotebook)) && (window != this)) ||
963 window->IsKindOf(CLASSINFO(wxScrolledWindow))
964 )
965 {
966 window->SetBackgroundColour(colour);
967 }
968
969 for ( wxWindowList::compatibility_iterator node = window->GetChildren().GetFirst(); node; node = node->GetNext() )
970 {
971 wxWindow *child = node->GetData();
972 ApplyThemeBackground(child, colour);
973 }
974 #endif
975 }
976
977 #if wxUSE_UXTHEME
978 long wxNotebook::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
979 {
980 static bool g_TestedForTheme = false;
981 static bool g_supportsThemes = false;
982 switch ( nMsg )
983 {
984 case WM_ERASEBKGND:
985 {
986 if (!g_TestedForTheme)
987 {
988 int commCtrlVersion = wxTheApp->GetComCtl32Version() ;
989
990 g_supportsThemes = (commCtrlVersion >= 600);
991 g_TestedForTheme = true;
992 }
993
994 // If currently an XP theme is active, it seems we can get away
995 // with not drawing a background, which reduces flicker.
996 if (g_supportsThemes)
997 {
998 wxUxThemeEngine *p = wxUxThemeEngine::Get();
999 if (p && p->IsThemeActive() )
1000 {
1001 return true;
1002 }
1003 }
1004 }
1005 }
1006
1007 return wxControl::MSWWindowProc(nMsg, wParam, lParam);
1008 }
1009 #endif // #if wxUSE_UXTHEME
1010
1011 #endif // wxUSE_NOTEBOOK