]> git.saurik.com Git - wxWidgets.git/blame - src/msw/notebook.cpp
Fixed separator handling for menus.
[wxWidgets.git] / src / msw / notebook.cpp
CommitLineData
88310e2e
VZ
1///////////////////////////////////////////////////////////////////////////////
2// Name: msw/notebook.cpp
3// Purpose: implementation of wxNotebook
4// Author: Vadim Zeitlin
907f37b3 5// Modified by:
88310e2e
VZ
6// Created: 11.06.98
7// RCS-ID: $Id$
8// Copyright: (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
6c9a19aa 9// Licence: wxWindows licence
88310e2e
VZ
10///////////////////////////////////////////////////////////////////////////////
11
14f355c2 12#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
a3b46648 13#pragma implementation "notebook.h"
88310e2e
VZ
14#endif
15
16// For compilers that support precompilation, includes "wx.h".
17#include "wx/wxprec.h"
18
19#ifdef __BORLANDC__
1e6feb95 20 #pragma hdrstop
88310e2e
VZ
21#endif
22
1e6feb95
VZ
23#if wxUSE_NOTEBOOK
24
88310e2e
VZ
25// wxWindows
26#ifndef WX_PRECOMP
3096bd2f 27 #include "wx/string.h"
88310e2e
VZ
28#endif // WX_PRECOMP
29
3096bd2f
VZ
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"
04eb05b0 35#include "wx/app.h"
88310e2e 36
3096bd2f 37#include "wx/msw/private.h"
88310e2e
VZ
38
39// Windows standard headers
40#ifndef __WIN95__
2432b92d 41 #error "wxNotebook is only supported Windows 95 and above"
88310e2e
VZ
42#endif //Win95
43
aaab7c01
VZ
44#include <windowsx.h> // for SetWindowFont
45
b39dbf34
JS
46#ifdef __GNUWIN32_OLD__
47 #include "wx/msw/gnuwin32/extra.h"
65fd5cb0 48#endif
57c208c5 49
b39dbf34 50#if defined(__WIN95__) && !(defined(__GNUWIN32_OLD__) && !defined(__CYGWIN10__))
c42404a5 51 #include <commctrl.h>
88310e2e
VZ
52#endif
53
85b43fbf
JS
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
88310e2e
VZ
71// ----------------------------------------------------------------------------
72// macros
73// ----------------------------------------------------------------------------
74
75// check that the page index is valid
8d34bf5c 76#define IS_VALID_PAGE(nPage) ((nPage) < GetPageCount())
88310e2e
VZ
77
78// hide the ugly cast
79#define m_hwnd (HWND)GetHWND()
80
74b31181
VZ
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
88310e2e
VZ
98// ----------------------------------------------------------------------------
99// event table
100// ----------------------------------------------------------------------------
101
51741307
SC
102#include <wx/listimpl.cpp>
103
104WX_DEFINE_LIST( wxNotebookPageInfoList ) ;
105
2e4df4bf
VZ
106DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED)
107DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING)
108
d9317fd4 109BEGIN_EVENT_TABLE(wxNotebook, wxControl)
88310e2e
VZ
110 EVT_NOTEBOOK_PAGE_CHANGED(-1, wxNotebook::OnSelChange)
111
9026ad85 112 EVT_SIZE(wxNotebook::OnSize)
42e69d6b 113
88310e2e 114 EVT_NAVIGATION_KEY(wxNotebook::OnNavigationKey)
d9317fd4 115END_EVENT_TABLE()
88310e2e 116
51596bcb 117#if wxUSE_EXTENDED_RTTI
bc9fb572
JS
118WX_DEFINE_FLAGS( wxNotebookStyle )
119
3ff066a4 120wxBEGIN_FLAGS( wxNotebookStyle )
bc9fb572
JS
121 // new style border flags, we put them first to
122 // use them for streaming out
3ff066a4
SC
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)
bc9fb572
JS
129
130 // old style border flags
3ff066a4
SC
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)
cb0afb26 136 wxFLAGS_MEMBER(wxBORDER)
bc9fb572
JS
137
138 // standard window styles
3ff066a4
SC
139 wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
140 wxFLAGS_MEMBER(wxCLIP_CHILDREN)
141 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
142 wxFLAGS_MEMBER(wxWANTS_CHARS)
cb0afb26 143 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
3ff066a4
SC
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 )
51741307 154
51596bcb 155IMPLEMENT_DYNAMIC_CLASS_XTI(wxNotebook, wxControl,"wx/notebook.h")
51741307
SC
156IMPLEMENT_DYNAMIC_CLASS_XTI(wxNotebookPageInfo, wxObject , "wx/notebook.h" )
157
3ff066a4 158wxCOLLECTION_TYPE_INFO( wxNotebookPageInfo * , wxNotebookPageInfoList ) ;
51596bcb 159
f0a126fe
SC
160template<> void wxCollectionToVariantArray( wxNotebookPageInfoList const &theList, wxxVariantArray &value)
161{
0c6b0084 162 wxListCollectionToVariantArray<wxNotebookPageInfoList::compatibility_iterator>( theList , value ) ;
f0a126fe
SC
163}
164
3ff066a4
SC
165wxBEGIN_PROPERTIES_TABLE(wxNotebook)
166 wxEVENT_PROPERTY( PageChanging , wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING , wxNotebookEvent )
167 wxEVENT_PROPERTY( PageChanged , wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED , wxNotebookEvent )
c5ca409b 168
3ff066a4
SC
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()
51596bcb 172
3ff066a4
SC
173wxBEGIN_HANDLERS_TABLE(wxNotebook)
174wxEND_HANDLERS_TABLE()
51596bcb 175
3ff066a4 176wxCONSTRUCTOR_5( wxNotebook , wxWindow* , Parent , wxWindowID , Id , wxPoint , Position , wxSize , Size , long , WindowStyle)
51596bcb 177
51741307 178
3ff066a4
SC
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()
51741307 185
3ff066a4
SC
186wxBEGIN_HANDLERS_TABLE(wxNotebookPageInfo)
187wxEND_HANDLERS_TABLE()
51741307 188
3ff066a4 189wxCONSTRUCTOR_4( wxNotebookPageInfo , wxNotebookPage* , Page , wxString , Text , bool , Selected , int , ImageId )
51741307 190
51596bcb 191#else
d9317fd4 192IMPLEMENT_DYNAMIC_CLASS(wxNotebook, wxControl)
51741307 193IMPLEMENT_DYNAMIC_CLASS(wxNotebookPageInfo, wxObject )
51596bcb 194#endif
d9317fd4 195IMPLEMENT_DYNAMIC_CLASS(wxNotebookEvent, wxNotifyEvent)
88310e2e
VZ
196
197// ============================================================================
198// implementation
199// ============================================================================
200
201// ----------------------------------------------------------------------------
202// wxNotebook construction
203// ----------------------------------------------------------------------------
204
51741307
SC
205const wxNotebookPageInfoList& wxNotebook::GetPageInfos() const
206{
207 wxNotebookPageInfoList* list = const_cast< wxNotebookPageInfoList* >( &m_pageInfos ) ;
208 WX_CLEAR_LIST( wxNotebookPageInfoList , *list ) ;
34a0c9f4 209 for( size_t i = 0 ; i < GetPageCount() ; ++i )
51741307
SC
210 {
211 wxNotebookPageInfo *info = new wxNotebookPageInfo() ;
34a0c9f4 212 info->Create( const_cast<wxNotebook*>(this)->GetPage(i) , GetPageText(i) , GetSelection() == int(i) , GetPageImage(i) ) ;
51741307
SC
213 list->Append( info ) ;
214 }
215 return m_pageInfos ;
216}
217
88310e2e
VZ
218// common part of all ctors
219void wxNotebook::Init()
220{
1e6feb95 221 m_imageList = NULL;
88310e2e
VZ
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,
8b9518ee 233 wxWindowID id,
88310e2e
VZ
234 const wxPoint& pos,
235 const wxSize& size,
8b9518ee 236 long style,
88310e2e
VZ
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,
8b9518ee 246 wxWindowID id,
88310e2e
VZ
247 const wxPoint& pos,
248 const wxSize& size,
8b9518ee 249 long style,
88310e2e
VZ
250 const wxString& name)
251{
04eb05b0
JS
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
6dd16e4f
VZ
266 if ( !CreateControl(parent, id, pos, size, style | wxTAB_TRAVERSAL,
267 wxDefaultValidator, name) )
b8bdaa7c 268 return false;
88310e2e 269
fda7962d 270 if ( !MSWCreateControl(WC_TABCONTROL, wxEmptyString, pos, size) )
b8bdaa7c 271 return false;
907f37b3 272
0df3fbd7
VZ
273 SetBackgroundColour(wxColour(::GetSysColor(COLOR_BTNFACE)));
274
b8bdaa7c 275 return true;
0df3fbd7
VZ
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
2b5f62a0 284 if ( style & wxNB_MULTILINE )
0df3fbd7
VZ
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;
88310e2e
VZ
305}
306
88310e2e
VZ
307// ----------------------------------------------------------------------------
308// wxNotebook accessors
309// ----------------------------------------------------------------------------
07b8d7ec 310
8d34bf5c 311size_t wxNotebook::GetPageCount() const
88310e2e
VZ
312{
313 // consistency check
1e6feb95 314 wxASSERT( (int)m_pages.Count() == TabCtrl_GetItemCount(m_hwnd) );
88310e2e 315
1e6feb95 316 return m_pages.Count();
88310e2e
VZ
317}
318
319int wxNotebook::GetRowCount() const
320{
321 return TabCtrl_GetRowCount(m_hwnd);
322}
323
8d34bf5c 324int wxNotebook::SetSelection(size_t nPage)
88310e2e 325{
223d09f6 326 wxCHECK_MSG( IS_VALID_PAGE(nPage), -1, wxT("notebook page out of range") );
88310e2e 327
34a0c9f4 328 if ( int(nPage) != m_nSelection )
2b5f62a0
VZ
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 }
88310e2e 343
2b5f62a0 344 return m_nSelection;
88310e2e
VZ
345}
346
8d34bf5c 347bool wxNotebook::SetPageText(size_t nPage, const wxString& strText)
88310e2e 348{
b8bdaa7c 349 wxCHECK_MSG( IS_VALID_PAGE(nPage), false, wxT("notebook page out of range") );
88310e2e
VZ
350
351 TC_ITEM tcItem;
352 tcItem.mask = TCIF_TEXT;
837e5743 353 tcItem.pszText = (wxChar *)strText.c_str();
88310e2e
VZ
354
355 return TabCtrl_SetItem(m_hwnd, nPage, &tcItem) != 0;
356}
357
8d34bf5c 358wxString wxNotebook::GetPageText(size_t nPage) const
88310e2e 359{
fda7962d 360 wxCHECK_MSG( IS_VALID_PAGE(nPage), wxEmptyString, wxT("notebook page out of range") );
88310e2e 361
837e5743 362 wxChar buf[256];
88310e2e
VZ
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
8d34bf5c 375int wxNotebook::GetPageImage(size_t nPage) const
88310e2e 376{
223d09f6 377 wxCHECK_MSG( IS_VALID_PAGE(nPage), -1, wxT("notebook page out of range") );
88310e2e
VZ
378
379 TC_ITEM tcItem;
380 tcItem.mask = TCIF_IMAGE;
381
382 return TabCtrl_GetItem(m_hwnd, nPage, &tcItem) ? tcItem.iImage : -1;
383}
384
8d34bf5c 385bool wxNotebook::SetPageImage(size_t nPage, int nImage)
88310e2e 386{
b8bdaa7c 387 wxCHECK_MSG( IS_VALID_PAGE(nPage), false, wxT("notebook page out of range") );
88310e2e
VZ
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)
907f37b3 397{
07b8d7ec
VZ
398 wxNotebookBase::SetImageList(imageList);
399
400 if ( imageList )
1e6feb95 401 {
07b8d7ec 402 TabCtrl_SetImageList(m_hwnd, (HIMAGELIST)imageList->GetHIMAGELIST());
1e6feb95 403 }
b656febd
VS
404}
405
d9506e77
VZ
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
b8bdaa7c 419 TabCtrl_AdjustRect(GetHwnd(), true, &rc);
d9506e77
VZ
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}
42e69d6b
VZ
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
2ce7af35
JS
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
2015f2b3
VZ
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);
b8bdaa7c 474 TabCtrl_AdjustRect(m_hwnd, false, &rc);
2015f2b3
VZ
475
476 page->SetSize(rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top);
477}
478
88310e2e
VZ
479// ----------------------------------------------------------------------------
480// wxNotebook operations
481// ----------------------------------------------------------------------------
482
621793f4 483// remove one page from the notebook, without deleting
8d34bf5c 484wxNotebookPage *wxNotebook::DoRemovePage(size_t nPage)
621793f4 485{
df7145da
VZ
486 wxNotebookPage *pageRemoved = wxNotebookBase::DoRemovePage(nPage);
487 if ( !pageRemoved )
488 return NULL;
621793f4 489
df7145da 490 TabCtrl_DeleteItem(m_hwnd, nPage);
621793f4 491
df7145da
VZ
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 {
623f5f70
JS
499 int selNew = TabCtrl_GetCurSel(m_hwnd);
500 if (selNew != -1)
df7145da 501 {
623f5f70
JS
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();
df7145da 508 }
623f5f70 509 else if (int(nPage) == m_nSelection)
43a997b6 510 {
623f5f70
JS
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
43a997b6
VZ
519 // m_nSelection must be always valid so reset it before calling
520 // SetSelection()
521 m_nSelection = -1;
522 SetSelection(selNew);
523 }
623f5f70
JS
524 else
525 {
526 wxFAIL; // Windows did not behave ok.
527 }
df7145da 528 }
47f12f58 529
df7145da 530 return pageRemoved;
621793f4
JS
531}
532
88310e2e
VZ
533// remove all pages
534bool wxNotebook::DeleteAllPages()
535{
8d34bf5c
VZ
536 size_t nPageCount = GetPageCount();
537 size_t nPage;
88310e2e 538 for ( nPage = 0; nPage < nPageCount; nPage++ )
1e6feb95 539 delete m_pages[nPage];
88310e2e 540
1e6feb95 541 m_pages.Clear();
88310e2e 542
907f37b3
VZ
543 TabCtrl_DeleteAllItems(m_hwnd);
544
47f12f58
JS
545 m_nSelection = -1;
546
b8bdaa7c 547 return true;
88310e2e
VZ
548}
549
88310e2e 550// same as AddPage() but does it at given position
8d34bf5c 551bool wxNotebook::InsertPage(size_t nPage,
88310e2e
VZ
552 wxNotebookPage *pPage,
553 const wxString& strText,
554 bool bSelect,
555 int imageId)
556{
b8bdaa7c
VZ
557 wxCHECK_MSG( pPage != NULL, false, _T("NULL page in wxNotebook::InsertPage") );
558 wxCHECK_MSG( IS_VALID_PAGE(nPage) || nPage == GetPageCount(), false,
22f3361e 559 _T("invalid index in wxNotebook::InsertPage") );
88310e2e 560
efa14cf2
VZ
561 wxASSERT_MSG( pPage->GetParent() == this,
562 _T("notebook pages must have notebook as parent") );
43427087 563
85b43fbf 564#if wxUSE_UXTHEME && wxUSE_UXTHEME_AUTO
b8bdaa7c
VZ
565 static bool g_TestedForTheme = false;
566 static bool g_UseTheme = false;
c02e5a31
JS
567 if (!g_TestedForTheme)
568 {
569 int commCtrlVersion = wxTheApp->GetComCtl32Version() ;
570
571 g_UseTheme = (commCtrlVersion >= 600);
b8bdaa7c 572 g_TestedForTheme = true;
c02e5a31
JS
573 }
574
85b43fbf
JS
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.
c02e5a31 579 if (g_UseTheme && wxUxThemeEngine::Get() && pPage->IsKindOf(CLASSINFO(wxPanel)))
85b43fbf
JS
580 {
581 ApplyThemeBackground(pPage, GetThemeBackgroundColour());
582 }
583#endif
584
22f3361e
VZ
585 // add a new tab to the control
586 // ----------------------------
58a8ab88 587
22f3361e
VZ
588 // init all fields to 0
589 TC_ITEM tcItem;
590 wxZeroMemory(tcItem);
58a8ab88 591
22f3361e
VZ
592 // set the image, if any
593 if ( imageId != -1 )
594 {
595 tcItem.mask |= TCIF_IMAGE;
596 tcItem.iImage = imageId;
597 }
88310e2e 598
22f3361e
VZ
599 // and the text
600 if ( !strText.IsEmpty() )
601 {
602 tcItem.mask |= TCIF_TEXT;
603 tcItem.pszText = (wxChar *)strText.c_str(); // const_cast
604 }
43427087 605
22f3361e
VZ
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!
2015f2b3 609 AdjustPageSize(pPage);
43427087 610
22f3361e 611 // finally do insert it
2015f2b3
VZ
612 if ( TabCtrl_InsertItem(m_hwnd, nPage, &tcItem) == -1 )
613 {
22f3361e 614 wxLogError(wxT("Can't create the notebook page '%s'."), strText.c_str());
88310e2e 615
b8bdaa7c 616 return false;
22f3361e 617 }
88310e2e 618
22f3361e
VZ
619 // succeeded: save the pointer to the page
620 m_pages.Insert(pPage, nPage);
42e69d6b 621
56b9925b
VZ
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) )
2015f2b3
VZ
627 {
628 AdjustPageSize(pPage);
629 }
630
22f3361e
VZ
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);
0398b1d6 635
22f3361e
VZ
636 // this updates internal flag too -- otherwise it would get out of sync
637 // with the real state
b8bdaa7c 638 pPage->Show(false);
43427087 639
96d37807 640
22f3361e
VZ
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
34a0c9f4 646 if ( int(nPage) <= m_nSelection )
22f3361e
VZ
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
b8bdaa7c 663 return true;
88310e2e
VZ
664}
665
e450aa69 666int wxNotebook::HitTest(const wxPoint& pt, long *flags) const
ef094fa0
JS
667{
668 TC_HITTESTINFO hitTestInfo;
669 hitTestInfo.pt.x = pt.x;
670 hitTestInfo.pt.y = pt.y;
e450aa69 671 int item = TabCtrl_HitTest(GetHwnd(), &hitTestInfo);
ef094fa0 672
e450aa69
VZ
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 }
ef094fa0
JS
686
687 return item;
688}
689
e450aa69 690
88310e2e
VZ
691// ----------------------------------------------------------------------------
692// wxNotebook callbacks
693// ----------------------------------------------------------------------------
694
9026ad85 695void wxNotebook::OnSize(wxSizeEvent& event)
88310e2e 696{
b5c3b538
VZ
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
56b9925b
VZ
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
b8bdaa7c 725 TabCtrl_AdjustRect(m_hwnd, false, &rc);
4b7f2165
VZ
726
727 int width = rc.right - rc.left,
728 height = rc.bottom - rc.top;
1e6feb95 729 size_t nCount = m_pages.Count();
c86f1403 730 for ( size_t nPage = 0; nPage < nCount; nPage++ ) {
1e6feb95 731 wxNotebookPage *pPage = m_pages[nPage];
4b7f2165 732 pPage->SetSize(rc.left, rc.top, width, height);
b5c3b538
VZ
733 }
734
88310e2e
VZ
735 event.Skip();
736}
737
738void wxNotebook::OnSelChange(wxNotebookEvent& event)
739{
740 // is it our tab control?
741 if ( event.GetEventObject() == this )
5d1d2d46 742 {
5d1d2d46
VZ
743 int sel = event.GetOldSelection();
744 if ( sel != -1 )
b8bdaa7c 745 m_pages[sel]->Show(false);
0398b1d6 746
5d1d2d46
VZ
747 sel = event.GetSelection();
748 if ( sel != -1 )
749 {
1e6feb95 750 wxNotebookPage *pPage = m_pages[sel];
b8bdaa7c 751 pPage->Show(true);
1d5b3bf0
VZ
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();
5d1d2d46 769 }
0398b1d6 770
5d1d2d46
VZ
771 m_nSelection = sel;
772 }
88310e2e
VZ
773
774 // we want to give others a chance to process this message as well
775 event.Skip();
776}
777
b8bdaa7c 778bool wxNotebook::MSWTranslateMessage(WXMSG *wxmsg)
88310e2e 779{
b8bdaa7c 780 const MSG * const msg = (MSG *)wxmsg;
88310e2e 781
1d5b3bf0
VZ
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.
b8bdaa7c
VZ
787 if ( msg->message == WM_KEYDOWN && msg->wParam == VK_TAB &&
788 msg->hwnd == m_hwnd &&
1d5b3bf0 789 (wxIsCtrlDown() || !wxIsShiftDown()) )
b8bdaa7c
VZ
790 {
791 return MSWProcessMessage(wxmsg);
792 }
d9506e77 793
b8bdaa7c 794 return false;
88310e2e
VZ
795}
796
797void wxNotebook::OnNavigationKey(wxNavigationKeyEvent& event)
798{
d9506e77
VZ
799 if ( event.IsWindowChange() ) {
800 // change pages
801 AdvanceSelection(event.GetDirection());
802 }
803 else {
b8bdaa7c 804 // we get this event in 3 cases
d9506e77
VZ
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
b8bdaa7c
VZ
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 )
d9506e77 828 {
b8bdaa7c
VZ
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) )
d9506e77
VZ
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
1e6feb95 838 wxWindow *page = m_pages[m_nSelection];
d9506e77
VZ
839 if ( !page->GetEventHandler()->ProcessEvent(event) )
840 {
841 page->SetFocus();
842 }
843 //else: page manages focus inside it itself
844 }
b8bdaa7c 845 else // otherwise set the focus to the notebook itself
d9506e77 846 {
d9506e77
VZ
847 SetFocus();
848 }
849 }
850 else
851 {
b8bdaa7c
VZ
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 {
d9506e77
VZ
862 event.SetCurrentFocus(this);
863 parent->GetEventHandler()->ProcessEvent(event);
864 }
865 }
88310e2e 866 }
88310e2e
VZ
867}
868
869// ----------------------------------------------------------------------------
870// wxNotebook base class virtuals
871// ----------------------------------------------------------------------------
b5c3b538 872
0b481c72
VZ
873#if wxUSE_CONSTRAINTS
874
b5c3b538
VZ
875// override these 2 functions to do nothing: everything is done in OnSize
876
4b7f2165 877void wxNotebook::SetConstraintSizes(bool WXUNUSED(recurse))
b5c3b538
VZ
878{
879 // don't set the sizes of the pages - their correct size is not yet known
b8bdaa7c 880 wxControl::SetConstraintSizes(false);
b5c3b538
VZ
881}
882
4b7f2165 883bool wxNotebook::DoPhase(int WXUNUSED(nPhase))
b5c3b538 884{
b8bdaa7c 885 return true;
b5c3b538
VZ
886}
887
0b481c72
VZ
888#endif // wxUSE_CONSTRAINTS
889
0df3fbd7
VZ
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 )
b8bdaa7c 900 return false;
0df3fbd7
VZ
901
902 return wxNotebookBase::MSWOnScroll(orientation, nSBCode, pos, control);
903}
904
a23fd0e1 905bool wxNotebook::MSWOnNotify(int idCtrl, WXLPARAM lParam, WXLPARAM* result)
88310e2e 906{
93a19f17 907 wxNotebookEvent event(wxEVT_NULL, m_windowId);
88310e2e
VZ
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
fd3f686c 919 default:
a23fd0e1 920 return wxControl::MSWOnNotify(idCtrl, lParam, result);
88310e2e
VZ
921 }
922
93a19f17
VZ
923 event.SetSelection(TabCtrl_GetCurSel(m_hwnd));
924 event.SetOldSelection(m_nSelection);
88310e2e 925 event.SetEventObject(this);
a23fd0e1 926 event.SetInt(idCtrl);
88310e2e 927
fd3f686c
VZ
928 bool processed = GetEventHandler()->ProcessEvent(event);
929 *result = !event.IsAllowed();
930 return processed;
88310e2e
VZ
931}
932
85b43fbf
JS
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 {
2142d7ba 939 wxUxThemeHandle hTheme(this, L"TAB");
85b43fbf
JS
940 if (hTheme)
941 {
942 // This is total guesswork.
943 // See PlatformSDK\Include\Tmschema.h for values
944 COLORREF themeColor;
2142d7ba
VZ
945 wxUxThemeEngine::Get()->GetThemeColor
946 (
947 hTheme,
948 10 /* TABP_BODY */,
949 1 /* NORMAL */,
950 3821, /* FILLCOLORHINT */
951 & themeColor
952 );
85b43fbf
JS
953
954 wxColour colour(GetRValue(themeColor), GetGValue(themeColor), GetBValue(themeColor));
955 return colour;
956 }
957 }
2142d7ba
VZ
958#endif // wxUSE_UXTHEME
959
85b43fbf
JS
960 return GetBackgroundColour();
961}
962
963// Windows only: attempts to apply the UX theme page background to this page
840015f0 964#if wxUSE_UXTHEME
85b43fbf 965void wxNotebook::ApplyThemeBackground(wxWindow* window, const wxColour& colour)
840015f0
MB
966#else
967void wxNotebook::ApplyThemeBackground(wxWindow*, const wxColour&)
968#endif
85b43fbf
JS
969{
970#if wxUSE_UXTHEME
971 // Don't set the background for buttons since this will
972 // switch it into ownerdraw mode
973 if (window->IsKindOf(CLASSINFO(wxButton)) && !window->IsKindOf(CLASSINFO(wxBitmapButton)))
974 // This is essential, otherwise you'll see dark grey
975 // corners in the buttons.
976 ((wxButton*)window)->wxControl::SetBackgroundColour(colour);
977 else if (window->IsKindOf(CLASSINFO(wxStaticText)) ||
978 window->IsKindOf(CLASSINFO(wxStaticBox)) ||
979 window->IsKindOf(CLASSINFO(wxStaticLine)) ||
980 window->IsKindOf(CLASSINFO(wxRadioButton)) ||
981 window->IsKindOf(CLASSINFO(wxRadioBox)) ||
982 window->IsKindOf(CLASSINFO(wxCheckBox)) ||
983 window->IsKindOf(CLASSINFO(wxBitmapButton)) ||
984 window->IsKindOf(CLASSINFO(wxSlider)) ||
985 window->IsKindOf(CLASSINFO(wxPanel)) ||
986 (window->IsKindOf(CLASSINFO(wxNotebook)) && (window != this)) ||
987 window->IsKindOf(CLASSINFO(wxScrolledWindow))
988 )
989 {
990 window->SetBackgroundColour(colour);
991 }
992
fc10daf3 993 for ( wxWindowList::compatibility_iterator node = window->GetChildren().GetFirst(); node; node = node->GetNext() )
85b43fbf
JS
994 {
995 wxWindow *child = node->GetData();
996 ApplyThemeBackground(child, colour);
997 }
998#endif
999}
1000
ffafd8a5 1001#if wxUSE_UXTHEME
c02e5a31
JS
1002long wxNotebook::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
1003{
b8bdaa7c 1004 static bool g_TestedForTheme = false;
ffafd8a5 1005 static bool g_supportsThemes = false;
c02e5a31
JS
1006 switch ( nMsg )
1007 {
1008 case WM_ERASEBKGND:
1009 {
1010 if (!g_TestedForTheme)
1011 {
1012 int commCtrlVersion = wxTheApp->GetComCtl32Version() ;
1013
ffafd8a5 1014 g_supportsThemes = (commCtrlVersion >= 600);
b8bdaa7c 1015 g_TestedForTheme = true;
c02e5a31
JS
1016 }
1017
ffafd8a5 1018 // If currently an XP theme is active, it seems we can get away
c02e5a31 1019 // with not drawing a background, which reduces flicker.
ffafd8a5
DS
1020 if (g_supportsThemes)
1021 {
1022 wxUxThemeEngine *p = wxUxThemeEngine::Get();
1023 if (p && p->IsThemeActive() )
1024 {
1025 return true;
1026 }
1027 }
c02e5a31
JS
1028 }
1029 }
1030
1031 return wxControl::MSWWindowProc(nMsg, wParam, lParam);
1032}
ffafd8a5 1033#endif // #if wxUSE_UXTHEME
c02e5a31 1034
1e6feb95 1035#endif // wxUSE_NOTEBOOK