]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/msw/notebook.cpp
Added UpdateSize to wxSplitterWindow, to allow an app
[wxWidgets.git] / src / msw / notebook.cpp
... / ...
CommitLineData
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
104WX_DEFINE_LIST( wxNotebookPageInfoList ) ;
105
106DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED)
107DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING)
108
109BEGIN_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)
115END_EVENT_TABLE()
116
117#if wxUSE_EXTENDED_RTTI
118WX_DEFINE_FLAGS( wxNotebookStyle )
119
120wxBEGIN_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
153wxEND_FLAGS( wxNotebookStyle )
154
155IMPLEMENT_DYNAMIC_CLASS_XTI(wxNotebook, wxControl,"wx/notebook.h")
156IMPLEMENT_DYNAMIC_CLASS_XTI(wxNotebookPageInfo, wxObject , "wx/notebook.h" )
157
158wxCOLLECTION_TYPE_INFO( wxNotebookPageInfo * , wxNotebookPageInfoList ) ;
159
160template<> void wxCollectionToVariantArray( wxNotebookPageInfoList const &theList, wxxVariantArray &value)
161{
162 wxListCollectionToVariantArray<wxNotebookPageInfoList::compatibility_iterator>( theList , value ) ;
163}
164
165wxBEGIN_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
171wxEND_PROPERTIES_TABLE()
172
173wxBEGIN_HANDLERS_TABLE(wxNotebook)
174wxEND_HANDLERS_TABLE()
175
176wxCONSTRUCTOR_5( wxNotebook , wxWindow* , Parent , wxWindowID , Id , wxPoint , Position , wxSize , Size , long , WindowStyle)
177
178
179wxBEGIN_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"))
184wxEND_PROPERTIES_TABLE()
185
186wxBEGIN_HANDLERS_TABLE(wxNotebookPageInfo)
187wxEND_HANDLERS_TABLE()
188
189wxCONSTRUCTOR_4( wxNotebookPageInfo , wxNotebookPage* , Page , wxString , Text , bool , Selected , int , ImageId )
190
191#else
192IMPLEMENT_DYNAMIC_CLASS(wxNotebook, wxControl)
193IMPLEMENT_DYNAMIC_CLASS(wxNotebookPageInfo, wxObject )
194#endif
195IMPLEMENT_DYNAMIC_CLASS(wxNotebookEvent, wxNotifyEvent)
196
197// ============================================================================
198// implementation
199// ============================================================================
200
201// ----------------------------------------------------------------------------
202// wxNotebook construction
203// ----------------------------------------------------------------------------
204
205const 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
219void wxNotebook::Init()
220{
221 m_imageList = NULL;
222 m_nSelection = -1;
223}
224
225// default for dynamic class
226wxNotebook::wxNotebook()
227{
228 Init();
229}
230
231// the same arguments as for wxControl
232wxNotebook::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
245bool 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
278WXDWORD 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
311size_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
319int wxNotebook::GetRowCount() const
320{
321 return TabCtrl_GetRowCount(m_hwnd);
322}
323
324int 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
347bool 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
358wxString 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
375int 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
385bool 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
396void 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
410void 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
425void 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.
432void wxNotebook::SetTabSize(const wxSize& sz)
433{
434 ::SendMessage(GetHwnd(), TCM_SETITEMSIZE, 0, MAKELPARAM(sz.x, sz.y));
435}
436
437wxSize 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
464void 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
484wxNotebookPage *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
534bool 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
551bool 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 // we may need to adjust the size again if the notebook size changed:
623 // normally this only happens for the first page we add (the tabs which
624 // hadn't been there before are now shown) but for a multiline notebook it
625 // can happen for any page at all as a new row could have been started
626 if ( m_pages.GetCount() == 1 || HasFlag(wxNB_MULTILINE) )
627 {
628 AdjustPageSize(pPage);
629 }
630
631 // hide the page: unless it is selected, it shouldn't be shown (and if it
632 // is selected it will be shown later)
633 HWND hwnd = GetWinHwnd(pPage);
634 SetWindowLong(hwnd, GWL_STYLE, GetWindowLong(hwnd, GWL_STYLE) & ~WS_VISIBLE);
635
636 // this updates internal flag too -- otherwise it would get out of sync
637 // with the real state
638 pPage->Show(false);
639
640
641 // now deal with the selection
642 // ---------------------------
643
644 // if the inserted page is before the selected one, we must update the
645 // index of the selected page
646 if ( int(nPage) <= m_nSelection )
647 {
648 // one extra page added
649 m_nSelection++;
650 }
651
652 // some page should be selected: either this one or the first one if there
653 // is still no selection
654 int selNew = -1;
655 if ( bSelect )
656 selNew = nPage;
657 else if ( m_nSelection == -1 )
658 selNew = 0;
659
660 if ( selNew != -1 )
661 SetSelection(selNew);
662
663 return true;
664}
665
666int wxNotebook::HitTest(const wxPoint& pt, long *flags) const
667{
668 TC_HITTESTINFO hitTestInfo;
669 hitTestInfo.pt.x = pt.x;
670 hitTestInfo.pt.y = pt.y;
671 int item = TabCtrl_HitTest(GetHwnd(), &hitTestInfo);
672
673 if ( flags )
674 {
675 *flags = 0;
676
677 if ((hitTestInfo.flags & TCHT_NOWHERE) == TCHT_NOWHERE)
678 *flags |= wxNB_HITTEST_NOWHERE;
679 if ((hitTestInfo.flags & TCHT_ONITEM) == TCHT_ONITEM)
680 *flags |= wxNB_HITTEST_ONITEM;
681 if ((hitTestInfo.flags & TCHT_ONITEMICON) == TCHT_ONITEMICON)
682 *flags |= wxNB_HITTEST_ONICON;
683 if ((hitTestInfo.flags & TCHT_ONITEMLABEL) == TCHT_ONITEMLABEL)
684 *flags |= wxNB_HITTEST_ONLABEL;
685 }
686
687 return item;
688}
689
690
691// ----------------------------------------------------------------------------
692// wxNotebook callbacks
693// ----------------------------------------------------------------------------
694
695void wxNotebook::OnSize(wxSizeEvent& event)
696{
697 // fit the notebook page to the tab control's display area
698 RECT rc;
699 rc.left = rc.top = 0;
700 GetSize((int *)&rc.right, (int *)&rc.bottom);
701
702 // there seems to be a bug in the implementation of TabCtrl_AdjustRect(): it
703 // returns completely false values for multiline tab controls after the tabs
704 // are added but before getting the first WM_SIZE (off by ~50 pixels, see
705 //
706 // http://sf.net/tracker/index.php?func=detail&aid=645323&group_id=9863&atid=109863
707 //
708 // and the only work around I could find was this ugly hack... without it
709 // simply toggling the "multiline" checkbox in the notebook sample resulted
710 // in a noticeable page displacement
711 if ( HasFlag(wxNB_MULTILINE) )
712 {
713 // avoid an infinite recursion: we get another notification too!
714 static bool s_isInOnSize = false;
715
716 if ( !s_isInOnSize )
717 {
718 s_isInOnSize = true;
719 SendMessage(GetHwnd(), WM_SIZE, SIZE_RESTORED,
720 MAKELPARAM(rc.right, rc.bottom));
721 s_isInOnSize = false;
722 }
723 }
724
725 TabCtrl_AdjustRect(m_hwnd, false, &rc);
726
727 int width = rc.right - rc.left,
728 height = rc.bottom - rc.top;
729 size_t nCount = m_pages.Count();
730 for ( size_t nPage = 0; nPage < nCount; nPage++ ) {
731 wxNotebookPage *pPage = m_pages[nPage];
732 pPage->SetSize(rc.left, rc.top, width, height);
733 }
734
735 event.Skip();
736}
737
738void wxNotebook::OnSelChange(wxNotebookEvent& event)
739{
740 // is it our tab control?
741 if ( event.GetEventObject() == this )
742 {
743 int sel = event.GetOldSelection();
744 if ( sel != -1 )
745 m_pages[sel]->Show(false);
746
747 sel = event.GetSelection();
748 if ( sel != -1 )
749 {
750 wxNotebookPage *pPage = m_pages[sel];
751 pPage->Show(true);
752 pPage->SetFocus();
753
754 // If the newly focused window is not a child of the new page,
755 // SetFocus was not successful and the notebook itself should be
756 // focused
757 wxWindow *currentFocus = FindFocus();
758 wxWindow *startFocus = currentFocus;
759 while ( currentFocus && currentFocus != pPage && currentFocus != this )
760 currentFocus = currentFocus->GetParent();
761
762 if ( startFocus == pPage || currentFocus != pPage )
763 SetFocus();
764
765 }
766 else // no pages in the notebook, give the focus to itself
767 {
768 SetFocus();
769 }
770
771 m_nSelection = sel;
772 }
773
774 // we want to give others a chance to process this message as well
775 event.Skip();
776}
777
778bool wxNotebook::MSWTranslateMessage(WXMSG *wxmsg)
779{
780 const MSG * const msg = (MSG *)wxmsg;
781
782 // intercept TAB, CTRL+TAB and CTRL+SHIFT+TAB for processing by wxNotebook.
783 // TAB will be passed to the currently selected page, CTRL+TAB and
784 // CTRL+SHIFT+TAB will be processed by the notebook itself. do not
785 // intercept SHIFT+TAB. This goes to the parent of the notebook which will
786 // process it.
787 if ( msg->message == WM_KEYDOWN && msg->wParam == VK_TAB &&
788 msg->hwnd == m_hwnd &&
789 (wxIsCtrlDown() || !wxIsShiftDown()) )
790 {
791 return MSWProcessMessage(wxmsg);
792 }
793
794 return false;
795}
796
797void wxNotebook::OnNavigationKey(wxNavigationKeyEvent& event)
798{
799 if ( event.IsWindowChange() ) {
800 // change pages
801 AdvanceSelection(event.GetDirection());
802 }
803 else {
804 // we get this event in 3 cases
805 //
806 // a) one of our pages might have generated it because the user TABbed
807 // out from it in which case we should propagate the event upwards and
808 // our parent will take care of setting the focus to prev/next sibling
809 //
810 // or
811 //
812 // b) the parent panel wants to give the focus to us so that we
813 // forward it to our selected page. We can't deal with this in
814 // OnSetFocus() because we don't know which direction the focus came
815 // from in this case and so can't choose between setting the focus to
816 // first or last panel child
817 //
818 // or
819 //
820 // c) we ourselves (see MSWTranslateMessage) generated the event
821 //
822 wxWindow * const parent = GetParent();
823
824 const bool isFromParent = event.GetEventObject() == parent;
825 const bool isFromSelf = event.GetEventObject() == this;
826
827 if ( isFromParent || isFromSelf )
828 {
829 // no, it doesn't come from child, case (b) or (c): forward to a
830 // page but only if direction is backwards (TAB) or from ourselves,
831 if ( m_nSelection != -1 &&
832 (!event.GetDirection() || isFromSelf) )
833 {
834 // so that the page knows that the event comes from it's parent
835 // and is being propagated downwards
836 event.SetEventObject(this);
837
838 wxWindow *page = m_pages[m_nSelection];
839 if ( !page->GetEventHandler()->ProcessEvent(event) )
840 {
841 page->SetFocus();
842 }
843 //else: page manages focus inside it itself
844 }
845 else // otherwise set the focus to the notebook itself
846 {
847 SetFocus();
848 }
849 }
850 else
851 {
852 // it comes from our child, case (a), pass to the parent, but only
853 // if the direction is forwards. Otherwise set the focus to the
854 // notebook itself. The notebook is always the 'first' control of a
855 // page.
856 if ( !event.GetDirection() )
857 {
858 SetFocus();
859 }
860 else if ( parent )
861 {
862 event.SetCurrentFocus(this);
863 parent->GetEventHandler()->ProcessEvent(event);
864 }
865 }
866 }
867}
868
869// ----------------------------------------------------------------------------
870// wxNotebook base class virtuals
871// ----------------------------------------------------------------------------
872
873#if wxUSE_CONSTRAINTS
874
875// override these 2 functions to do nothing: everything is done in OnSize
876
877void wxNotebook::SetConstraintSizes(bool WXUNUSED(recurse))
878{
879 // don't set the sizes of the pages - their correct size is not yet known
880 wxControl::SetConstraintSizes(false);
881}
882
883bool wxNotebook::DoPhase(int WXUNUSED(nPhase))
884{
885 return true;
886}
887
888#endif // wxUSE_CONSTRAINTS
889
890// ----------------------------------------------------------------------------
891// wxNotebook Windows message handlers
892// ----------------------------------------------------------------------------
893
894bool wxNotebook::MSWOnScroll(int orientation, WXWORD nSBCode,
895 WXWORD pos, WXHWND control)
896{
897 // don't generate EVT_SCROLLWIN events for the WM_SCROLLs coming from the
898 // up-down control
899 if ( control )
900 return false;
901
902 return wxNotebookBase::MSWOnScroll(orientation, nSBCode, pos, control);
903}
904
905bool wxNotebook::MSWOnNotify(int idCtrl, WXLPARAM lParam, WXLPARAM* result)
906{
907 wxNotebookEvent event(wxEVT_NULL, m_windowId);
908
909 NMHDR* hdr = (NMHDR *)lParam;
910 switch ( hdr->code ) {
911 case TCN_SELCHANGE:
912 event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED);
913 break;
914
915 case TCN_SELCHANGING:
916 event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING);
917 break;
918
919 default:
920 return wxControl::MSWOnNotify(idCtrl, lParam, result);
921 }
922
923 event.SetSelection(TabCtrl_GetCurSel(m_hwnd));
924 event.SetOldSelection(m_nSelection);
925 event.SetEventObject(this);
926 event.SetInt(idCtrl);
927
928 bool processed = GetEventHandler()->ProcessEvent(event);
929 *result = !event.IsAllowed();
930 return processed;
931}
932
933// Windows only: attempts to get colour for UX theme page background
934wxColour wxNotebook::GetThemeBackgroundColour()
935{
936#if wxUSE_UXTHEME
937 if (wxUxThemeEngine::Get())
938 {
939 wxUxThemeHandle hTheme(this, L"TAB");
940 if (hTheme)
941 {
942 // This is total guesswork.
943 // See PlatformSDK\Include\Tmschema.h for values
944 COLORREF themeColor;
945 wxUxThemeEngine::Get()->GetThemeColor(
946 hTheme,
947 10 /* TABP_BODY */,
948 1 /* NORMAL */,
949 3821 /* FILLCOLORHINT */,
950 &themeColor);
951
952 /*
953 [DS] Workaround for WindowBlinds:
954 Some themes return a near black theme color using FILLCOLORHINT,
955 this makes notebook pages have an ugly black background and makes
956 text (usually black) unreadable. Retry again with FILLCOLOR.
957
958 This workaround potentially breaks appearance of some themes,
959 but in practice it already fixes some themes.
960 */
961 if (themeColor == 1)
962 {
963 wxUxThemeEngine::Get()->GetThemeColor(
964 hTheme,
965 10 /* TABP_BODY */,
966 1 /* NORMAL */,
967 3802 /* FILLCOLOR */,
968 &themeColor);
969 }
970
971 wxColour colour(GetRValue(themeColor), GetGValue(themeColor), GetBValue(themeColor));
972 return colour;
973 }
974 }
975#endif // wxUSE_UXTHEME
976
977 return GetBackgroundColour();
978}
979
980// Windows only: attempts to apply the UX theme page background to this page
981#if wxUSE_UXTHEME
982void wxNotebook::ApplyThemeBackground(wxWindow* window, const wxColour& colour)
983#else
984void wxNotebook::ApplyThemeBackground(wxWindow*, const wxColour&)
985#endif
986{
987#if wxUSE_UXTHEME
988
989 window->ApplyParentThemeBackground(colour);
990
991 for ( wxWindowList::compatibility_iterator node = window->GetChildren().GetFirst(); node; node = node->GetNext() )
992 {
993 wxWindow *child = node->GetData();
994 ApplyThemeBackground(child, colour);
995 }
996#endif
997}
998
999#if wxUSE_UXTHEME
1000WXLRESULT wxNotebook::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
1001{
1002 static bool g_TestedForTheme = false;
1003 static bool g_supportsThemes = false;
1004 switch ( nMsg )
1005 {
1006 case WM_ERASEBKGND:
1007 {
1008 if (!g_TestedForTheme)
1009 {
1010 int commCtrlVersion = wxTheApp->GetComCtl32Version() ;
1011
1012 g_supportsThemes = (commCtrlVersion >= 600);
1013 g_TestedForTheme = true;
1014 }
1015
1016 // If currently an XP theme is active, it seems we can get away
1017 // with not drawing a background, which reduces flicker.
1018 if (g_supportsThemes)
1019 {
1020 wxUxThemeEngine *p = wxUxThemeEngine::Get();
1021 if (p && p->IsThemeActive() )
1022 {
1023 return true;
1024 }
1025 }
1026 }
1027 }
1028
1029 return wxControl::MSWWindowProc(nMsg, wParam, lParam);
1030}
1031#endif // #if wxUSE_UXTHEME
1032
1033#endif // wxUSE_NOTEBOOK