use smaller icons, it looks better (patch 1695225)
[wxWidgets.git] / samples / widgets / widgets.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Program: wxWidgets Widgets Sample
3 // Name: samples/widgets/widgets.cpp
4 // Purpose: Sample showing most of the simple wxWidgets widgets
5 // Author: Vadim Zeitlin
6 // Created: 27.03.01
7 // Id: $Id$
8 // Copyright: (c) 2001 Vadim Zeitlin
9 // License: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 // for compilers that support precompilation, includes "wx/wx.h".
21 #include "wx/wxprec.h"
22
23 #ifdef __BORLANDC__
24 #pragma hdrstop
25 #endif
26
27 // for all others, include the necessary headers
28 #ifndef WX_PRECOMP
29 #include "wx/app.h"
30 #include "wx/log.h"
31 #include "wx/frame.h"
32 #include "wx/menu.h"
33
34 #include "wx/button.h"
35 #include "wx/checkbox.h"
36 #include "wx/listbox.h"
37 #include "wx/statbox.h"
38 #include "wx/stattext.h"
39 #include "wx/textctrl.h"
40 #include "wx/msgdlg.h"
41 #endif
42
43 #include "wx/sysopt.h"
44 #include "wx/bookctrl.h"
45 #include "wx/treebook.h"
46 #include "wx/sizer.h"
47 #include "wx/colordlg.h"
48 #include "wx/fontdlg.h"
49 #include "wx/textdlg.h"
50 #include "wx/imaglist.h"
51 #include "wx/wupdlock.h"
52
53 #include "widgets.h"
54
55 #include "../sample.xpm"
56
57 // ----------------------------------------------------------------------------
58 // constants
59 // ----------------------------------------------------------------------------
60
61 // control ids
62 enum
63 {
64 Widgets_ClearLog = 100,
65 Widgets_Quit,
66
67 Widgets_BookCtrl,
68
69 #if wxUSE_TOOLTIPS
70 Widgets_SetTooltip,
71 #endif // wxUSE_TOOLTIPS
72 Widgets_SetFgColour,
73 Widgets_SetBgColour,
74 Widgets_SetFont,
75 Widgets_Enable,
76
77 Widgets_BorderNone,
78 Widgets_BorderStatic,
79 Widgets_BorderSimple,
80 Widgets_BorderRaised,
81 Widgets_BorderSunken,
82 Widgets_BorderDouble,
83 Widgets_BorderDefault,
84
85 Widgets_GlobalBusyCursor,
86 Widgets_BusyCursor,
87
88 Widgets_GoToPage,
89 Widgets_GoToPageLast = Widgets_GoToPage + 100
90 };
91
92 const wxChar *WidgetsCategories[MAX_PAGES] = {
93 #if defined(__WXUNIVERSAL__)
94 wxT("Universal"),
95 #else
96 wxT("Native"),
97 #endif
98 wxT("Generic"),
99 wxT("Pickers"),
100 wxT("Comboboxes"),
101 wxT("With items"),
102 wxT("Editable"),
103 wxT("Books"),
104 wxT("All controls")
105 };
106
107 // ----------------------------------------------------------------------------
108 // our classes
109 // ----------------------------------------------------------------------------
110
111 // Define a new application type, each program should derive a class from wxApp
112 class WidgetsApp : public wxApp
113 {
114 public:
115 // override base class virtuals
116 // ----------------------------
117
118 // this one is called on application startup and is a good place for the app
119 // initialization (doing it here and not in the ctor allows to have an error
120 // return: if OnInit() returns false, the application terminates)
121 virtual bool OnInit();
122 };
123
124 // Define a new frame type: this is going to be our main frame
125 class WidgetsFrame : public wxFrame
126 {
127 public:
128 // ctor(s) and dtor
129 WidgetsFrame(const wxString& title);
130 virtual ~WidgetsFrame();
131
132 protected:
133 // event handlers
134 #if USE_LOG
135 void OnButtonClearLog(wxCommandEvent& event);
136 #endif // USE_LOG
137 void OnExit(wxCommandEvent& event);
138
139 #if wxUSE_MENUS
140 void OnPageChanging(WidgetsBookCtrlEvent& event);
141 void OnPageChanged(WidgetsBookCtrlEvent& event);
142 void OnGoToPage(wxCommandEvent& event);
143
144 #if wxUSE_TOOLTIPS
145 void OnSetTooltip(wxCommandEvent& event);
146 #endif // wxUSE_TOOLTIPS
147 void OnSetFgCol(wxCommandEvent& event);
148 void OnSetBgCol(wxCommandEvent& event);
149 void OnSetFont(wxCommandEvent& event);
150 void OnEnable(wxCommandEvent& event);
151 void OnSetBorder(wxCommandEvent& event);
152
153 void OnToggleGlobalBusyCursor(wxCommandEvent& event);
154 void OnToggleBusyCursor(wxCommandEvent& event);
155 #endif // wxUSE_MENUS
156
157 // initialize the book: add all pages to it
158 void InitBook();
159
160 // return the currently selected page (never NULL)
161 WidgetsPage *CurrentPage();
162
163 private:
164 // the panel containing everything
165 wxPanel *m_panel;
166
167 #if USE_LOG
168 // the listbox for logging messages
169 wxListBox *m_lboxLog;
170
171 // the log target we use to redirect messages to the listbox
172 wxLog *m_logTarget;
173 #endif // USE_LOG
174
175 // the book containing the test pages
176 WidgetsBookCtrl *m_book;
177
178 #if wxUSE_MENUS
179 // last chosen fg/bg colours and font
180 wxColour m_colFg,
181 m_colBg;
182 wxFont m_font;
183 #endif // wxUSE_MENUS
184
185 // any class wishing to process wxWidgets events must use this macro
186 DECLARE_EVENT_TABLE()
187 };
188
189 #if USE_LOG
190 // A log target which just redirects the messages to a listbox
191 class LboxLogger : public wxLog
192 {
193 public:
194 LboxLogger(wxListBox *lbox, wxLog *logOld)
195 {
196 m_lbox = lbox;
197 //m_lbox->Disable(); -- looks ugly under MSW
198 m_logOld = logOld;
199 }
200
201 virtual ~LboxLogger()
202 {
203 wxLog::SetActiveTarget(m_logOld);
204 }
205
206 private:
207 // implement sink functions
208 virtual void DoLog(wxLogLevel level, const wxChar *szString, time_t t)
209 {
210 // don't put trace messages into listbox or we can get into infinite
211 // recursion
212 if ( level == wxLOG_Trace )
213 {
214 if ( m_logOld )
215 {
216 // cast is needed to call protected method
217 ((LboxLogger *)m_logOld)->DoLog(level, szString, t);
218 }
219 }
220 else
221 {
222 wxLog::DoLog(level, szString, t);
223 }
224 }
225
226 virtual void DoLogString(const wxChar *szString, time_t WXUNUSED(t))
227 {
228 wxString msg;
229 TimeStamp(&msg);
230 msg += szString;
231
232 #ifdef __WXUNIVERSAL__
233 m_lbox->AppendAndEnsureVisible(msg);
234 #else // other ports don't have this method yet
235 m_lbox->Append(msg);
236 m_lbox->SetFirstItem(m_lbox->GetCount() - 1);
237 #endif
238 }
239
240 // the control we use
241 wxListBox *m_lbox;
242
243 // the old log target
244 wxLog *m_logOld;
245 };
246 #endif // USE_LOG
247
248 // array of pages
249 WX_DEFINE_ARRAY_PTR(WidgetsPage *, ArrayWidgetsPage);
250
251 // ----------------------------------------------------------------------------
252 // misc macros
253 // ----------------------------------------------------------------------------
254
255 IMPLEMENT_APP(WidgetsApp)
256
257 // ----------------------------------------------------------------------------
258 // event tables
259 // ----------------------------------------------------------------------------
260
261 BEGIN_EVENT_TABLE(WidgetsFrame, wxFrame)
262 #if USE_LOG
263 EVT_BUTTON(Widgets_ClearLog, WidgetsFrame::OnButtonClearLog)
264 #endif // USE_LOG
265 EVT_BUTTON(Widgets_Quit, WidgetsFrame::OnExit)
266
267 #if wxUSE_TOOLTIPS
268 EVT_MENU(Widgets_SetTooltip, WidgetsFrame::OnSetTooltip)
269 #endif // wxUSE_TOOLTIPS
270
271 #if wxUSE_MENUS
272 EVT_WIDGETS_PAGE_CHANGING(wxID_ANY, WidgetsFrame::OnPageChanging)
273 EVT_MENU_RANGE(Widgets_GoToPage, Widgets_GoToPageLast,
274 WidgetsFrame::OnGoToPage)
275
276 EVT_MENU(Widgets_SetFgColour, WidgetsFrame::OnSetFgCol)
277 EVT_MENU(Widgets_SetBgColour, WidgetsFrame::OnSetBgCol)
278 EVT_MENU(Widgets_SetFont, WidgetsFrame::OnSetFont)
279 EVT_MENU(Widgets_Enable, WidgetsFrame::OnEnable)
280
281 EVT_MENU_RANGE(Widgets_BorderNone, Widgets_BorderDefault,
282 WidgetsFrame::OnSetBorder)
283
284 EVT_MENU(Widgets_GlobalBusyCursor, WidgetsFrame::OnToggleGlobalBusyCursor)
285 EVT_MENU(Widgets_BusyCursor, WidgetsFrame::OnToggleBusyCursor)
286
287 EVT_MENU(wxID_EXIT, WidgetsFrame::OnExit)
288 #endif // wxUSE_MENUS
289 END_EVENT_TABLE()
290
291 // ============================================================================
292 // implementation
293 // ============================================================================
294
295 // ----------------------------------------------------------------------------
296 // app class
297 // ----------------------------------------------------------------------------
298
299 bool WidgetsApp::OnInit()
300 {
301 if ( !wxApp::OnInit() )
302 return false;
303
304 // the reason for having these ifdef's is that I often run two copies of
305 // this sample side by side and it is useful to see which one is which
306 wxString title;
307 #if defined(__WXUNIVERSAL__)
308 title = _T("wxUniv/");
309 #endif
310
311 #if defined(__WXMSW__)
312 title += _T("wxMSW");
313 #elif defined(__WXGTK__)
314 title += _T("wxGTK");
315 #elif defined(__WXMAC__)
316 title += _T("wxMAC");
317 #elif defined(__WXMOTIF__)
318 title += _T("wxMOTIF");
319 #else
320 title += _T("wxWidgets");
321 #endif
322
323 wxFrame *frame = new WidgetsFrame(title + _T(" widgets demo"));
324 frame->Show();
325
326 //wxLog::AddTraceMask(_T("listbox"));
327 //wxLog::AddTraceMask(_T("scrollbar"));
328 //wxLog::AddTraceMask(_T("focus"));
329
330 return true;
331 }
332
333 // ----------------------------------------------------------------------------
334 // WidgetsFrame construction
335 // ----------------------------------------------------------------------------
336
337 WidgetsFrame::WidgetsFrame(const wxString& title)
338 : wxFrame(NULL, wxID_ANY, title)
339 {
340 // set the frame icon
341 SetIcon(wxICON(sample));
342
343 // init everything
344 #if USE_LOG
345 m_lboxLog = (wxListBox *)NULL;
346 m_logTarget = (wxLog *)NULL;
347 #endif // USE_LOG
348 m_book = (WidgetsBookCtrl *)NULL;
349
350 #if wxUSE_MENUS
351 // create the menubar
352 wxMenuBar *mbar = new wxMenuBar;
353 wxMenu *menuWidget = new wxMenu;
354 #if wxUSE_TOOLTIPS
355 menuWidget->Append(Widgets_SetTooltip, _T("Set &tooltip...\tCtrl-T"));
356 menuWidget->AppendSeparator();
357 #endif // wxUSE_TOOLTIPS
358 menuWidget->Append(Widgets_SetFgColour, _T("Set &foreground...\tCtrl-F"));
359 menuWidget->Append(Widgets_SetBgColour, _T("Set &background...\tCtrl-B"));
360 menuWidget->Append(Widgets_SetFont, _T("Set f&ont...\tCtrl-O"));
361 menuWidget->AppendCheckItem(Widgets_Enable, _T("&Enable/disable\tCtrl-E"));
362
363 wxMenu *menuBorders = new wxMenu;
364 menuBorders->AppendRadioItem(Widgets_BorderDefault, _T("De&fault\tCtrl-Shift-9"));
365 menuBorders->AppendRadioItem(Widgets_BorderNone, _T("&None\tCtrl-Shift-0"));
366 menuBorders->AppendRadioItem(Widgets_BorderSimple, _T("&Simple\tCtrl-Shift-1"));
367 menuBorders->AppendRadioItem(Widgets_BorderDouble, _T("&Double\tCtrl-Shift-2"));
368 menuBorders->AppendRadioItem(Widgets_BorderStatic, _T("Stati&c\tCtrl-Shift-3"));
369 menuBorders->AppendRadioItem(Widgets_BorderRaised, _T("&Raised\tCtrl-Shift-4"));
370 menuBorders->AppendRadioItem(Widgets_BorderSunken, _T("S&unken\tCtrl-Shift-5"));
371 menuWidget->AppendSubMenu(menuBorders, _T("Set &border"));
372
373 menuWidget->AppendSeparator();
374 menuWidget->AppendCheckItem(Widgets_GlobalBusyCursor,
375 _T("Toggle &global busy cursor\tCtrl-Shift-U"));
376 menuWidget->AppendCheckItem(Widgets_BusyCursor,
377 _T("Toggle b&usy cursor\tCtrl-U"));
378
379 menuWidget->AppendSeparator();
380 menuWidget->Append(wxID_EXIT, _T("&Quit\tCtrl-Q"));
381 mbar->Append(menuWidget, _T("&Widget"));
382 SetMenuBar(mbar);
383
384 mbar->Check(Widgets_Enable, true);
385 #endif // wxUSE_MENUS
386
387 // create controls
388 m_panel = new wxPanel(this, wxID_ANY);
389
390 wxSizer *sizerTop = new wxBoxSizer(wxVERTICAL);
391
392 // we have 2 panes: book with pages demonstrating the controls in the
393 // upper one and the log window with some buttons in the lower
394
395 int style = wxBK_DEFAULT;
396 // Uncomment to suppress page theme (draw in solid colour)
397 //style |= wxNB_NOPAGETHEME;
398
399 m_book = new WidgetsBookCtrl(m_panel, Widgets_BookCtrl, wxDefaultPosition,
400 #ifdef __WXMOTIF__
401 wxSize(500, wxDefaultCoord), // under Motif, height is a function of the width...
402 #else
403 wxDefaultSize,
404 #endif
405 style);
406 InitBook();
407
408 #ifndef __WXHANDHELD__
409 // the lower one only has the log listbox and a button to clear it
410 #if USE_LOG
411 wxSizer *sizerDown = new wxStaticBoxSizer(
412 new wxStaticBox( m_panel, wxID_ANY, _T("&Log window") ),
413 wxVERTICAL);
414
415 m_lboxLog = new wxListBox(m_panel, wxID_ANY);
416 sizerDown->Add(m_lboxLog, 1, wxGROW | wxALL, 5);
417 sizerDown->SetMinSize(100, 150);
418 #else
419 wxSizer *sizerDown = new wxBoxSizer(wxVERTICAL);
420 #endif // USE_LOG
421
422 wxBoxSizer *sizerBtns = new wxBoxSizer(wxHORIZONTAL);
423 wxButton *btn;
424 #if USE_LOG
425 btn = new wxButton(m_panel, Widgets_ClearLog, _T("Clear &log"));
426 sizerBtns->Add(btn);
427 sizerBtns->Add(10, 0); // spacer
428 #endif // USE_LOG
429 btn = new wxButton(m_panel, Widgets_Quit, _T("E&xit"));
430 sizerBtns->Add(btn);
431 sizerDown->Add(sizerBtns, 0, wxALL | wxALIGN_RIGHT, 5);
432
433 // put everything together
434 sizerTop->Add(m_book, 1, wxGROW | (wxALL & ~(wxTOP | wxBOTTOM)), 10);
435 sizerTop->Add(0, 5, 0, wxGROW); // spacer in between
436 sizerTop->Add(sizerDown, 0, wxGROW | (wxALL & ~wxTOP), 10);
437
438 #else // !__WXHANDHELD__/__WXHANDHELD__
439
440 sizerTop->Add(m_book, 1, wxGROW | wxALL );
441
442 #endif // __WXHANDHELD__
443
444 m_panel->SetSizer(sizerTop);
445
446 sizerTop->Fit(this);
447 sizerTop->SetSizeHints(this);
448
449 #if USE_LOG && !defined(__WXCOCOA__)
450 // wxCocoa's listbox is too flakey to use for logging right now
451 // now that everything is created we can redirect the log messages to the
452 // listbox
453 m_logTarget = new LboxLogger(m_lboxLog, wxLog::GetActiveTarget());
454 wxLog::SetActiveTarget(m_logTarget);
455 #endif
456 }
457
458 void WidgetsFrame::InitBook()
459 {
460 #if USE_ICONS_IN_BOOK
461 wxImageList *imageList = new wxImageList(ICON_SIZE, ICON_SIZE);
462
463 wxImage img(sample_xpm);
464 imageList->Add(wxBitmap(img.Scale(ICON_SIZE, ICON_SIZE)));
465 #else
466 wxImageList *imageList = NULL;
467 #endif
468
469 #if !USE_TREEBOOK
470 WidgetsBookCtrl *books[MAX_PAGES];
471 #endif
472
473 ArrayWidgetsPage pages[MAX_PAGES];
474 wxArrayString labels[MAX_PAGES];
475
476 wxMenu *menuPages = new wxMenu;
477 unsigned int nPage = 0, nFKey = 0;
478 int cat, imageId = 1;
479
480 // we need to first create all pages and only then add them to the book
481 // as we need the image list first
482 //
483 // we also construct the pages menu during this first iteration
484 for ( cat = 0; cat < MAX_PAGES; cat++ )
485 {
486 #if USE_TREEBOOK
487 nPage++; // increase for parent page
488 #else
489 books[cat] = new WidgetsBookCtrl(m_book,
490 wxID_ANY,
491 wxDefaultPosition,
492 wxDefaultSize,
493 wxBK_DEFAULT);
494 #endif
495
496 for ( WidgetsPageInfo *info = WidgetsPage::ms_widgetPages;
497 info;
498 info = info->GetNext() )
499 {
500 if( (info->GetCategories() & ( 1 << cat )) == 0)
501 continue;
502
503 WidgetsPage *page = (*info->GetCtor())(
504 #if USE_TREEBOOK
505 m_book
506 #else
507 books[cat]
508 #endif
509 , imageList);
510 pages[cat].Add(page);
511
512 labels[cat].Add(info->GetLabel());
513 if ( cat == ALL_PAGE )
514 {
515 wxString radioLabel(info->GetLabel());
516 nFKey++;
517 if ( nFKey <= 12 )
518 {
519 radioLabel << wxT("\tF" ) << nFKey;
520 }
521
522 menuPages->AppendRadioItem(
523 Widgets_GoToPage + nPage,
524 radioLabel
525 );
526 #if !USE_TREEBOOK
527 // consider only for book in book architecture
528 nPage++;
529 #endif
530 }
531
532 #if USE_TREEBOOK
533 // consider only for treebook architecture (with subpages)
534 nPage++;
535 #endif
536 }
537 }
538
539 GetMenuBar()->Append(menuPages, _T("&Page"));
540
541 #if USE_ICONS_IN_BOOK
542 m_book->AssignImageList(imageList);
543 #endif
544
545 for ( cat = 0; cat < MAX_PAGES; cat++ )
546 {
547 #if USE_TREEBOOK
548 m_book->AddPage(NULL,WidgetsCategories[cat],false,0);
549 #else
550 m_book->AddPage(books[cat],WidgetsCategories[cat],false,0);
551 #if USE_ICONS_IN_BOOK
552 books[cat]->SetImageList(imageList);
553 #endif
554 #endif
555
556 // now do add them
557 size_t count = pages[cat].GetCount();
558 for ( size_t n = 0; n < count; n++ )
559 {
560 #if USE_TREEBOOK
561 m_book->AddSubPage
562 #else
563 books[cat]->AddPage
564 #endif
565 (
566 pages[cat][n],
567 labels[cat][n],
568 false, // don't select
569 imageId++
570 );
571 }
572 }
573
574 Connect( wxID_ANY,
575 wxEVT_COMMAND_WIDGETS_PAGE_CHANGED,
576 wxWidgetsbookEventHandler(WidgetsFrame::OnPageChanged) );
577
578 #if USE_TREEBOOK
579 // for treebook page #0 is empty parent page only so select the first page
580 // with some contents
581 m_book->SetSelection(1);
582
583 // but ensure that the top of the tree is shown nevertheless
584 wxTreeCtrl * const tree = m_book->GetTreeCtrl();
585
586 wxTreeItemIdValue cookie;
587 tree->EnsureVisible(tree->GetFirstChild(tree->GetRootItem(), cookie));
588 #else
589 // for other books set selection twice to force connected event handler
590 // to force lazy creation of initial visible content
591 m_book->SetSelection(1);
592 m_book->SetSelection(0);
593 #endif // USE_TREEBOOK
594 }
595
596 WidgetsPage *WidgetsFrame::CurrentPage()
597 {
598 wxWindow *page = m_book->GetCurrentPage();
599
600 #if !USE_TREEBOOK
601 WidgetsBookCtrl *subBook = wxStaticCast(page, WidgetsBookCtrl);
602 wxCHECK_MSG( subBook, NULL, _T("no WidgetsBookCtrl?") );
603
604 page = subBook->GetCurrentPage();
605 #endif // !USE_TREEBOOK
606
607 return wxStaticCast(page, WidgetsPage);
608 }
609
610 WidgetsFrame::~WidgetsFrame()
611 {
612 #if USE_LOG
613 delete m_logTarget;
614 #endif // USE_LOG
615 }
616
617 // ----------------------------------------------------------------------------
618 // WidgetsFrame event handlers
619 // ----------------------------------------------------------------------------
620
621 void WidgetsFrame::OnExit(wxCommandEvent& WXUNUSED(event))
622 {
623 Close();
624 }
625
626 #if USE_LOG
627 void WidgetsFrame::OnButtonClearLog(wxCommandEvent& WXUNUSED(event))
628 {
629 m_lboxLog->Clear();
630 }
631 #endif // USE_LOG
632
633 #if wxUSE_MENUS
634
635 void WidgetsFrame::OnPageChanging(WidgetsBookCtrlEvent& event)
636 {
637 #if USE_TREEBOOK
638 // don't allow selection of entries without pages (categories)
639 if ( !m_book->GetPage(event.GetSelection()) )
640 event.Veto();
641 #else
642 wxUnusedVar(event);
643 #endif
644 }
645
646 void WidgetsFrame::OnPageChanged(WidgetsBookCtrlEvent& event)
647 {
648 const int sel = event.GetSelection();
649
650 // adjust "Page" menu selection
651 wxMenuItem *item = GetMenuBar()->FindItem(Widgets_GoToPage + sel);
652 if ( item )
653 item->Check();
654
655 GetMenuBar()->Check(Widgets_BusyCursor, false);
656
657 // create the pages on demand, otherwise the sample startup is too slow as
658 // it creates hundreds of controls
659 WidgetsPage *page = CurrentPage();
660 if ( page->GetChildren().empty() )
661 {
662 wxWindowUpdateLocker noUpdates(page);
663 page->CreateContent();
664 //page->Layout();
665 page->GetSizer()->Fit(page);
666
667 WidgetsBookCtrl *book = wxStaticCast(page->GetParent(), WidgetsBookCtrl);
668 wxSize size;
669 for ( size_t i = 0; i < book->GetPageCount(); ++i )
670 {
671 wxWindow *page = book->GetPage(i);
672 if ( page )
673 {
674 size.IncTo(page->GetSize());
675 }
676 }
677 page->SetSize(size);
678 }
679
680 event.Skip();
681 }
682
683 void WidgetsFrame::OnGoToPage(wxCommandEvent& event)
684 {
685 #if USE_TREEBOOK
686 m_book->SetSelection(event.GetId() - Widgets_GoToPage);
687 #else
688 m_book->SetSelection(m_book->GetPageCount()-1);
689 WidgetsBookCtrl *book = wxStaticCast(m_book->GetCurrentPage(), WidgetsBookCtrl);
690 book->SetSelection(event.GetId() - Widgets_GoToPage);
691 #endif
692 }
693
694 #if wxUSE_TOOLTIPS
695
696 void WidgetsFrame::OnSetTooltip(wxCommandEvent& WXUNUSED(event))
697 {
698 static wxString s_tip = _T("This is a tooltip");
699
700 wxTextEntryDialog dialog
701 (
702 this,
703 _T("Tooltip text (may use \\n, leave empty to remove): "),
704 _T("Widgets sample"),
705 s_tip
706 );
707
708 if ( dialog.ShowModal() != wxID_OK )
709 return;
710
711 s_tip = dialog.GetValue();
712 s_tip.Replace(_T("\\n"), _T("\n"));
713
714 WidgetsPage *page = CurrentPage();
715
716 page->GetWidget()->SetToolTip(s_tip);
717
718 wxControl *ctrl2 = page->GetWidget2();
719 if ( ctrl2 )
720 ctrl2->SetToolTip(s_tip);
721 }
722
723 #endif // wxUSE_TOOLTIPS
724
725 void WidgetsFrame::OnSetFgCol(wxCommandEvent& WXUNUSED(event))
726 {
727 #if wxUSE_COLOURDLG
728 // allow for debugging the default colour the first time this is called
729 WidgetsPage *page = CurrentPage();
730
731 if (!m_colFg.Ok())
732 m_colFg = page->GetForegroundColour();
733
734 wxColour col = wxGetColourFromUser(this, m_colFg);
735 if ( !col.Ok() )
736 return;
737
738 m_colFg = col;
739
740 page->GetWidget()->SetForegroundColour(m_colFg);
741 page->GetWidget()->Refresh();
742
743 wxControl *ctrl2 = page->GetWidget2();
744 if ( ctrl2 )
745 {
746 ctrl2->SetForegroundColour(m_colFg);
747 ctrl2->Refresh();
748 }
749 #else
750 wxLogMessage(_T("Colour selection dialog not available in current build."));
751 #endif
752 }
753
754 void WidgetsFrame::OnSetBgCol(wxCommandEvent& WXUNUSED(event))
755 {
756 #if wxUSE_COLOURDLG
757 WidgetsPage *page = CurrentPage();
758
759 if ( !m_colBg.Ok() )
760 m_colBg = page->GetBackgroundColour();
761
762 wxColour col = wxGetColourFromUser(this, m_colBg);
763 if ( !col.Ok() )
764 return;
765
766 m_colBg = col;
767
768 page->GetWidget()->SetBackgroundColour(m_colBg);
769 page->GetWidget()->Refresh();
770
771 wxControl *ctrl2 = page->GetWidget2();
772 if ( ctrl2 )
773 {
774 ctrl2->SetBackgroundColour(m_colFg);
775 ctrl2->Refresh();
776 }
777 #else
778 wxLogMessage(_T("Colour selection dialog not available in current build."));
779 #endif
780 }
781
782 void WidgetsFrame::OnSetFont(wxCommandEvent& WXUNUSED(event))
783 {
784 #if wxUSE_FONTDLG
785 WidgetsPage *page = CurrentPage();
786
787 if (!m_font.Ok())
788 m_font = page->GetFont();
789
790 wxFont font = wxGetFontFromUser(this, m_font);
791 if ( !font.Ok() )
792 return;
793
794 m_font = font;
795
796 page->GetWidget()->SetFont(m_font);
797 page->GetWidget()->Refresh();
798
799 wxControl *ctrl2 = page->GetWidget2();
800 if ( ctrl2 )
801 {
802 ctrl2->SetFont(m_font);
803 ctrl2->Refresh();
804 }
805 #else
806 wxLogMessage(_T("Font selection dialog not available in current build."));
807 #endif
808 }
809
810 void WidgetsFrame::OnEnable(wxCommandEvent& event)
811 {
812 CurrentPage()->GetWidget()->Enable(event.IsChecked());
813 }
814
815 void WidgetsFrame::OnSetBorder(wxCommandEvent& event)
816 {
817 int border;
818 switch ( event.GetId() )
819 {
820 case Widgets_BorderNone: border = wxBORDER_NONE; break;
821 case Widgets_BorderStatic: border = wxBORDER_STATIC; break;
822 case Widgets_BorderSimple: border = wxBORDER_SIMPLE; break;
823 case Widgets_BorderRaised: border = wxBORDER_RAISED; break;
824 case Widgets_BorderSunken: border = wxBORDER_SUNKEN; break;
825 case Widgets_BorderDouble: border = wxBORDER_DOUBLE; break;
826
827 default:
828 wxFAIL_MSG( _T("unknown border style") );
829 // fall through
830
831 case Widgets_BorderDefault: border = wxBORDER_DEFAULT; break;
832 }
833
834 WidgetsPage::ms_defaultFlags &= ~wxBORDER_MASK;
835 WidgetsPage::ms_defaultFlags |= border;
836
837 WidgetsPage *page = CurrentPage();
838
839 page->RecreateWidget();
840 }
841
842 void WidgetsFrame::OnToggleGlobalBusyCursor(wxCommandEvent& event)
843 {
844 if ( event.IsChecked() )
845 wxBeginBusyCursor();
846 else
847 wxEndBusyCursor();
848 }
849
850 void WidgetsFrame::OnToggleBusyCursor(wxCommandEvent& event)
851 {
852 CurrentPage()->GetWidget()->SetCursor(*(event.IsChecked()
853 ? wxHOURGLASS_CURSOR
854 : wxSTANDARD_CURSOR));
855 }
856
857 #endif // wxUSE_MENUS
858
859 // ----------------------------------------------------------------------------
860 // WidgetsPageInfo
861 // ----------------------------------------------------------------------------
862
863 WidgetsPageInfo::WidgetsPageInfo(Constructor ctor, const wxChar *label, int categories)
864 : m_label(label)
865 , m_categories(categories)
866 {
867 m_ctor = ctor;
868
869 m_next = NULL;
870
871 // dummy sorting: add and immediately sort in the list according to label
872 if ( WidgetsPage::ms_widgetPages )
873 {
874 WidgetsPageInfo *node_prev = WidgetsPage::ms_widgetPages;
875 if ( wxStrcmp(label, node_prev->GetLabel().c_str()) < 0 )
876 {
877 // add as first
878 m_next = node_prev;
879 WidgetsPage::ms_widgetPages = this;
880 }
881 else
882 {
883 WidgetsPageInfo *node_next;
884 do
885 {
886 node_next = node_prev->GetNext();
887 if ( node_next )
888 {
889 // add if between two
890 if ( wxStrcmp(label, node_next->GetLabel().c_str()) < 0 )
891 {
892 node_prev->SetNext(this);
893 m_next = node_next;
894 // force to break loop
895 node_next = NULL;
896 }
897 }
898 else
899 {
900 // add as last
901 node_prev->SetNext(this);
902 m_next = node_next;
903 }
904 node_prev = node_next;
905 }
906 while ( node_next );
907 }
908 }
909 else
910 {
911 // add when first
912 WidgetsPage::ms_widgetPages = this;
913 }
914 }
915
916 // ----------------------------------------------------------------------------
917 // WidgetsPage
918 // ----------------------------------------------------------------------------
919
920 int WidgetsPage::ms_defaultFlags = wxBORDER_DEFAULT;
921 WidgetsPageInfo *WidgetsPage::ms_widgetPages = NULL;
922
923 WidgetsPage::WidgetsPage(WidgetsBookCtrl *book,
924 wxImageList *imaglist,
925 char* icon[])
926 : wxPanel(book, wxID_ANY,
927 wxDefaultPosition, wxDefaultSize,
928 wxNO_FULL_REPAINT_ON_RESIZE |
929 wxCLIP_CHILDREN |
930 wxTAB_TRAVERSAL)
931 {
932 #if USE_ICONS_IN_BOOK
933 imaglist->Add(wxBitmap(wxImage(icon).Scale(ICON_SIZE, ICON_SIZE)));
934 #else
935 wxUnusedVar(imaglist);
936 wxUnusedVar(icon);
937 #endif
938 }
939
940 wxSizer *WidgetsPage::CreateSizerWithText(wxControl *control,
941 wxWindowID id,
942 wxTextCtrl **ppText)
943 {
944 wxSizer *sizerRow = new wxBoxSizer(wxHORIZONTAL);
945 wxTextCtrl *text = new wxTextCtrl(this, id, wxEmptyString,
946 wxDefaultPosition, wxDefaultSize, wxTE_PROCESS_ENTER);
947
948 sizerRow->Add(control, 0, wxRIGHT | wxALIGN_CENTRE_VERTICAL, 5);
949 sizerRow->Add(text, 1, wxLEFT | wxALIGN_CENTRE_VERTICAL, 5);
950
951 if ( ppText )
952 *ppText = text;
953
954 return sizerRow;
955 }
956
957 // create a sizer containing a label and a text ctrl
958 wxSizer *WidgetsPage::CreateSizerWithTextAndLabel(const wxString& label,
959 wxWindowID id,
960 wxTextCtrl **ppText)
961 {
962 return CreateSizerWithText(new wxStaticText(this, wxID_ANY, label),
963 id, ppText);
964 }
965
966 // create a sizer containing a button and a text ctrl
967 wxSizer *WidgetsPage::CreateSizerWithTextAndButton(wxWindowID idBtn,
968 const wxString& label,
969 wxWindowID id,
970 wxTextCtrl **ppText)
971 {
972 return CreateSizerWithText(new wxButton(this, idBtn, label), id, ppText);
973 }
974
975 wxCheckBox *WidgetsPage::CreateCheckBoxAndAddToSizer(wxSizer *sizer,
976 const wxString& label,
977 wxWindowID id)
978 {
979 wxCheckBox *checkbox = new wxCheckBox(this, id, label);
980 sizer->Add(checkbox, 0, wxLEFT | wxRIGHT, 5);
981 sizer->Add(0, 2, 0, wxGROW); // spacer
982
983 return checkbox;
984 }