]> git.saurik.com Git - wxWidgets.git/blob - samples/text/text.cpp
supporting alignment in single line controls, see #14452
[wxWidgets.git] / samples / text / text.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: text.cpp
3 // Purpose: TextCtrl wxWidgets sample
4 // Author: Robert Roebling
5 // Modified by:
6 // RCS-ID: $Id$
7 // Copyright: (c) Robert Roebling, Julian Smart, Vadim Zeitlin
8 // Licence: wxWindows licence
9 /////////////////////////////////////////////////////////////////////////////
10
11 // For compilers that support precompilation, includes "wx/wx.h".
12 #include "wx/wxprec.h"
13
14 #ifdef __BORLANDC__
15 #pragma hdrstop
16 #endif
17
18 #ifndef WX_PRECOMP
19 #include "wx/wx.h"
20 #endif
21
22 #if wxUSE_CLIPBOARD
23 #include "wx/dataobj.h"
24 #include "wx/clipbrd.h"
25 #endif
26
27 #if wxUSE_FILE
28 #include "wx/file.h"
29 #endif
30
31 #if wxUSE_TOOLTIPS
32 #include "wx/tooltip.h"
33 #endif
34
35 // We test for wxUSE_DRAG_AND_DROP also, because data objects may not be
36 // implemented for compilers that can't cope with the OLE parts in
37 // wxUSE_DRAG_AND_DROP.
38 #if !wxUSE_DRAG_AND_DROP
39 #undef wxUSE_CLIPBOARD
40 #define wxUSE_CLIPBOARD 0
41 #endif
42
43 #include "wx/colordlg.h"
44 #include "wx/fontdlg.h"
45 #include "wx/numdlg.h"
46 #include "wx/tokenzr.h"
47
48 #ifndef wxHAS_IMAGES_IN_RESOURCES
49 #include "../sample.xpm"
50 #endif
51
52 //----------------------------------------------------------------------
53 // class definitions
54 //----------------------------------------------------------------------
55
56 class MyApp: public wxApp
57 {
58 public:
59 bool OnInit();
60 };
61
62 // a text ctrl which allows to call different wxTextCtrl functions
63 // interactively by pressing function keys in it
64 class MyTextCtrl : public wxTextCtrl
65 {
66 public:
67 MyTextCtrl(wxWindow *parent, wxWindowID id, const wxString &value,
68 const wxPoint &pos, const wxSize &size, int style = 0)
69 : wxTextCtrl(parent, id, value, pos, size, style)
70 {
71 m_hasCapture = false;
72 }
73
74 void OnKeyDown(wxKeyEvent& event);
75 void OnKeyUp(wxKeyEvent& event);
76 void OnChar(wxKeyEvent& event);
77
78 void OnText(wxCommandEvent& event);
79 void OnTextEnter(wxCommandEvent& event);
80 void OnTextURL(wxTextUrlEvent& event);
81 void OnTextMaxLen(wxCommandEvent& event);
82
83 void OnTextCut(wxClipboardTextEvent & event);
84 void OnTextCopy(wxClipboardTextEvent & event);
85 void OnTextPaste(wxClipboardTextEvent & event);
86
87 void OnMouseEvent(wxMouseEvent& event);
88
89 void OnSetFocus(wxFocusEvent& event);
90 void OnKillFocus(wxFocusEvent& event);
91
92 static bool ms_logKey;
93 static bool ms_logChar;
94 static bool ms_logMouse;
95 static bool ms_logText;
96 static bool ms_logFocus;
97 static bool ms_logClip;
98
99 private:
100 static inline wxChar GetChar(bool on, wxChar c) { return on ? c : wxT('-'); }
101
102 void LogKeyEvent(const wxChar *name, wxKeyEvent& event) const;
103 void LogClipEvent(const wxChar *what, wxClipboardTextEvent& event);
104
105 bool m_hasCapture;
106
107 DECLARE_EVENT_TABLE()
108 };
109
110 class MyPanel: public wxPanel
111 {
112 public:
113 MyPanel(wxFrame *frame, int x, int y, int w, int h);
114 virtual ~MyPanel()
115 {
116 #if wxUSE_LOG
117 delete wxLog::SetActiveTarget(m_logOld);
118 #endif // wxUSE_LOG
119 }
120
121 #if wxUSE_CLIPBOARD
122 void DoPasteFromClipboard();
123 void DoCopyToClipboard();
124 #endif // wxUSE_CLIPBOARD
125
126 void DoRemoveText();
127 void DoReplaceText();
128 void DoSelectText();
129 void DoMoveToEndOfText();
130 void DoMoveToEndOfEntry();
131 void DoGetWindowCoordinates();
132
133 // return true if currently text control has any selection
134 bool HasSelection() const
135 {
136 long from, to;
137 GetFocusedText()->GetSelection(&from, &to);
138 return from != to;
139 }
140
141 MyTextCtrl *m_text;
142 MyTextCtrl *m_password;
143 MyTextCtrl *m_enter;
144 MyTextCtrl *m_tab;
145 MyTextCtrl *m_readonly;
146 MyTextCtrl *m_limited;
147
148 MyTextCtrl *m_multitext;
149 MyTextCtrl *m_horizontal;
150
151 MyTextCtrl *m_textrich;
152
153 #if wxUSE_LOG
154 wxTextCtrl *m_log;
155 wxLog *m_logOld;
156 #endif // wxUSE_LOG
157
158 private:
159 // get the currently focused text control or return the default one
160 // (m_multitext) is no text ctrl has focus -- in any case, returns
161 // something non NULL
162 wxTextCtrl *GetFocusedText() const;
163 };
164
165 class MyFrame: public wxFrame
166 {
167 public:
168 MyFrame(wxFrame *frame, const wxChar *title, int x, int y, int w, int h);
169
170 void OnQuit(wxCommandEvent& event);
171 void OnAbout(wxCommandEvent& event);
172 #if wxUSE_TOOLTIPS
173 void OnSetTooltipDelay(wxCommandEvent& event);
174 void OnToggleTooltips(wxCommandEvent& event);
175 #endif // wxUSE_TOOLTIPS
176
177 #if wxUSE_CLIPBOARD
178 void OnPasteFromClipboard( wxCommandEvent& WXUNUSED(event) )
179 {
180 wxLogMessage(wxT("Pasting text from clipboard."));
181 m_panel->DoPasteFromClipboard();
182 }
183 void OnCopyToClipboard( wxCommandEvent& WXUNUSED(event) )
184 {
185 wxLogMessage(wxT("Copying text to clipboard."));
186 m_panel->DoCopyToClipboard();
187 }
188
189 void OnUpdatePasteFromClipboard(wxUpdateUIEvent& event)
190 {
191 wxClipboardLocker lockClip;
192
193 event.Enable( wxTheClipboard->IsSupported(wxDF_TEXT) );
194 }
195
196 void OnUpdateCopyToClipboard(wxUpdateUIEvent& event)
197 {
198 event.Enable( m_panel->HasSelection() );
199 }
200 #endif // wxUSE_CLIPBOARD
201
202 void OnAddTextLine(wxCommandEvent& WXUNUSED(event))
203 {
204 static int s_n = 0;
205 m_panel->m_textrich->AppendText(wxString::Format("Line %d\n", ++s_n));
206 }
207
208 void OnAddTextFreeze( wxCommandEvent& WXUNUSED(event) )
209 { DoAddText(true); }
210 void OnAddText( wxCommandEvent& WXUNUSED(event) )
211 { DoAddText(false); }
212 void OnRemoveText( wxCommandEvent& WXUNUSED(event) )
213 { m_panel->DoRemoveText(); }
214 void OnReplaceText( wxCommandEvent& WXUNUSED(event) )
215 { m_panel->DoReplaceText(); }
216 void OnSelectText( wxCommandEvent& WXUNUSED(event) )
217 { m_panel->DoSelectText(); }
218
219 void OnMoveToEndOfText( wxCommandEvent& WXUNUSED(event) )
220 { m_panel->DoMoveToEndOfText(); }
221
222 void OnGetWindowCoordinates( wxCommandEvent& WXUNUSED(event) )
223 { m_panel->DoGetWindowCoordinates(); }
224
225 void OnMoveToEndOfEntry( wxCommandEvent& WXUNUSED(event) )
226 { m_panel->DoMoveToEndOfEntry(); }
227
228 void OnScrollLineDown(wxCommandEvent& WXUNUSED(event))
229 {
230 if ( !m_panel->m_textrich->LineDown() )
231 {
232 wxLogMessage(wxT("Already at the bottom"));
233 }
234 }
235
236 void OnScrollLineUp(wxCommandEvent& WXUNUSED(event))
237 {
238 if ( !m_panel->m_textrich->LineUp() )
239 {
240 wxLogMessage(wxT("Already at the top"));
241 }
242 }
243
244 void OnScrollPageDown(wxCommandEvent& WXUNUSED(event))
245 {
246 if ( !m_panel->m_textrich->PageDown() )
247 {
248 wxLogMessage(wxT("Already at the bottom"));
249 }
250 }
251
252 void OnScrollPageUp(wxCommandEvent& WXUNUSED(event))
253 {
254 if ( !m_panel->m_textrich->PageUp() )
255 {
256 wxLogMessage(wxT("Already at the top"));
257 }
258 }
259
260 void OnGetLine(wxCommandEvent& WXUNUSED(event))
261 {
262 long nLine = wxGetNumberFromUser(wxT("Which line would you like to get?"),
263 wxT("Enter which line you would like to get"),
264 wxT("Get a line from the tabbed multiline text control") );
265
266 wxMessageBox(m_panel->m_tab->GetLineText(nLine));
267 }
268
269 void OnGetLineLength(wxCommandEvent& WXUNUSED(event))
270 {
271 long nLine = wxGetNumberFromUser(wxT("Which line would you like to get?"),
272 wxT("Enter which line you would like to get"),
273 wxT("Get length of a line from the tabbed multiline text control") );
274
275 wxMessageBox(wxString::Format(wxT("Length of line %i is:%i"),
276 (int) nLine,
277 m_panel->m_tab->GetLineLength(nLine))
278 );
279 }
280
281 #if wxUSE_LOG
282 void OnLogClear(wxCommandEvent& event);
283 #endif // wxUSE_LOG
284 void OnFileSave(wxCommandEvent& event);
285 void OnFileLoad(wxCommandEvent& event);
286 void OnRichTextTest(wxCommandEvent& event);
287
288 void OnSetEditable(wxCommandEvent& event);
289 void OnSetEnabled(wxCommandEvent& event);
290
291 void OnLogKey(wxCommandEvent& event)
292 {
293 MyTextCtrl::ms_logKey = event.IsChecked();
294 }
295
296 void OnLogChar(wxCommandEvent& event)
297 {
298 MyTextCtrl::ms_logChar = event.IsChecked();
299 }
300
301 void OnLogMouse(wxCommandEvent& event)
302 {
303 MyTextCtrl::ms_logMouse = event.IsChecked();
304 }
305
306 void OnLogText(wxCommandEvent& event)
307 {
308 MyTextCtrl::ms_logText = event.IsChecked();
309 }
310
311 void OnLogFocus(wxCommandEvent& event)
312 {
313 MyTextCtrl::ms_logFocus = event.IsChecked();
314 }
315
316 void OnLogClip(wxCommandEvent& event)
317 {
318 MyTextCtrl::ms_logClip = event.IsChecked();
319 }
320
321 void OnSetText(wxCommandEvent& WXUNUSED(event))
322 {
323 m_panel->m_text->SetValue(wxT("Hello, world! (what else did you expect?)"));
324 }
325
326 void OnChangeText(wxCommandEvent& WXUNUSED(event))
327 {
328 m_panel->m_text->ChangeValue(wxT("Changed, not set: no event"));
329 }
330
331 void OnIdle( wxIdleEvent& event );
332
333 private:
334 void DoAddText(bool freeze)
335 {
336 wxTextCtrl * const text = m_panel->m_textrich;
337
338 if ( freeze )
339 text->Freeze();
340
341 text->Clear();
342
343 for ( int i = 0; i < 100; i++ )
344 {
345 text->AppendText(wxString::Format(wxT("Line %i\n"), i));
346 }
347
348 text->SetInsertionPoint(0);
349
350 if ( freeze )
351 text->Thaw();
352 }
353
354 MyPanel *m_panel;
355
356 DECLARE_EVENT_TABLE()
357 };
358
359 /*
360 * RichTextFrame is used to demonstrate rich text behaviour
361 */
362
363 class RichTextFrame: public wxFrame
364 {
365 public:
366 RichTextFrame(wxWindow* parent, const wxString& title);
367
368 // Event handlers
369
370 void OnClose(wxCommandEvent& event);
371 void OnIdle(wxIdleEvent& event);
372 void OnLeftAlign(wxCommandEvent& event);
373 void OnRightAlign(wxCommandEvent& event);
374 void OnJustify(wxCommandEvent& event);
375 void OnCentre(wxCommandEvent& event);
376 void OnChangeFont(wxCommandEvent& event);
377 void OnChangeTextColour(wxCommandEvent& event);
378 void OnChangeBackgroundColour(wxCommandEvent& event);
379 void OnLeftIndent(wxCommandEvent& event);
380 void OnRightIndent(wxCommandEvent& event);
381 void OnTabStops(wxCommandEvent& event);
382
383 private:
384 wxTextCtrl *m_textCtrl;
385 long m_currentPosition;
386
387 DECLARE_EVENT_TABLE()
388 };
389
390 //----------------------------------------------------------------------
391 // main()
392 //----------------------------------------------------------------------
393
394 IMPLEMENT_APP(MyApp)
395
396 //----------------------------------------------------------------------
397 // MyApp
398 //----------------------------------------------------------------------
399
400 enum
401 {
402 TEXT_QUIT = wxID_EXIT,
403 TEXT_ABOUT = wxID_ABOUT,
404 TEXT_LOAD = 101,
405 TEXT_SAVE,
406 TEXT_CLEAR,
407 TEXT_RICH_TEXT_TEST,
408
409 // clipboard menu
410 TEXT_CLIPBOARD_COPY = 200,
411 TEXT_CLIPBOARD_PASTE,
412 TEXT_CLIPBOARD_VETO,
413
414 // tooltip menu
415 TEXT_TOOLTIPS_SETDELAY = 300,
416 TEXT_TOOLTIPS_ENABLE,
417
418 // text menu
419 TEXT_ADD_SOME = 400,
420 TEXT_ADD_FREEZE,
421 TEXT_ADD_LINE,
422 TEXT_MOVE_ENDTEXT,
423 TEXT_GET_WINDOW_COORD,
424 TEXT_MOVE_ENDENTRY,
425 TEXT_SET_EDITABLE,
426 TEXT_SET_ENABLED,
427 TEXT_LINE_DOWN,
428 TEXT_LINE_UP,
429 TEXT_PAGE_DOWN,
430 TEXT_PAGE_UP,
431
432 TEXT_GET_LINE,
433 TEXT_GET_LINELENGTH,
434
435 TEXT_REMOVE,
436 TEXT_REPLACE,
437 TEXT_SELECT,
438 TEXT_SET,
439 TEXT_CHANGE,
440
441 // log menu
442 TEXT_LOG_KEY,
443 TEXT_LOG_CHAR,
444 TEXT_LOG_MOUSE,
445 TEXT_LOG_TEXT,
446 TEXT_LOG_FOCUS,
447 TEXT_LOG_CLIP,
448
449 TEXT_END
450 };
451
452 bool MyApp::OnInit()
453 {
454 if ( !wxApp::OnInit() )
455 return false;
456
457 // Create the main frame window
458 MyFrame *frame = new MyFrame((wxFrame *) NULL,
459 wxT("Text wxWidgets sample"), 50, 50, 700, 550);
460 frame->SetSizeHints( 500, 400 );
461
462 wxMenu *file_menu = new wxMenu;
463 file_menu->Append(TEXT_SAVE, wxT("&Save file\tCtrl-S"),
464 wxT("Save the text control contents to file"));
465 file_menu->Append(TEXT_LOAD, wxT("&Load file\tCtrl-O"),
466 wxT("Load the sample file into text control"));
467 file_menu->AppendSeparator();
468 file_menu->Append(TEXT_RICH_TEXT_TEST, wxT("Show Rich Text Editor"));
469 file_menu->AppendSeparator();
470 file_menu->Append(TEXT_ABOUT, wxT("&About\tAlt-A"));
471 file_menu->AppendSeparator();
472 file_menu->Append(TEXT_QUIT, wxT("E&xit\tAlt-X"), wxT("Quit this sample"));
473
474 wxMenuBar *menu_bar = new wxMenuBar( wxMB_DOCKABLE );
475 menu_bar->Append(file_menu, wxT("&File"));
476
477 #if wxUSE_TOOLTIPS
478 wxMenu *tooltip_menu = new wxMenu;
479 tooltip_menu->Append(TEXT_TOOLTIPS_SETDELAY, wxT("Set &delay\tCtrl-D"));
480 tooltip_menu->AppendSeparator();
481 tooltip_menu->Append(TEXT_TOOLTIPS_ENABLE, wxT("&Toggle tooltips\tCtrl-T"),
482 wxT("enable/disable tooltips"), true);
483 tooltip_menu->Check(TEXT_TOOLTIPS_ENABLE, true);
484 menu_bar->Append(tooltip_menu, wxT("&Tooltips"));
485 #endif // wxUSE_TOOLTIPS
486
487 #if wxUSE_CLIPBOARD
488 // notice that we use non default accelerators on purpose here to compare
489 // their behaviour with the built in handling of standard Ctrl/Cmd-C/V
490 wxMenu *menuClipboard = new wxMenu;
491 menuClipboard->Append(TEXT_CLIPBOARD_COPY, wxT("&Copy\tCtrl-Shift-C"),
492 wxT("Copy the selection to the clipboard"));
493 menuClipboard->Append(TEXT_CLIPBOARD_PASTE, wxT("&Paste\tCtrl-Shift-V"),
494 wxT("Paste from clipboard to the text control"));
495 menuClipboard->AppendSeparator();
496 menuClipboard->AppendCheckItem(TEXT_CLIPBOARD_VETO, wxT("Vet&o\tCtrl-Shift-O"),
497 wxT("Veto all clipboard operations"));
498 menu_bar->Append(menuClipboard, wxT("&Clipboard"));
499 #endif // wxUSE_CLIPBOARD
500
501 wxMenu *menuText = new wxMenu;
502 menuText->Append(TEXT_ADD_SOME, wxT("&Append some text\tCtrl-A"));
503 menuText->Append(TEXT_ADD_FREEZE, wxT("&Append text with freeze/thaw\tShift-Ctrl-A"));
504 menuText->Append(TEXT_ADD_LINE, wxT("Append a new &line\tAlt-Shift-A"));
505 menuText->Append(TEXT_REMOVE, wxT("&Remove first 10 characters\tCtrl-Y"));
506 menuText->Append(TEXT_REPLACE, wxT("&Replace characters 4 to 8 with ABC\tCtrl-R"));
507 menuText->Append(TEXT_SELECT, wxT("&Select characters 4 to 8\tCtrl-I"));
508 menuText->Append(TEXT_SET, wxT("&Set the first text zone value\tCtrl-E"));
509 menuText->Append(TEXT_CHANGE, wxT("&Change the first text zone value\tShift-Ctrl-E"));
510 menuText->AppendSeparator();
511 menuText->Append(TEXT_MOVE_ENDTEXT, wxT("Move cursor to the end of &text"));
512 menuText->Append(TEXT_MOVE_ENDENTRY, wxT("Move cursor to the end of &entry"));
513 menuText->AppendCheckItem(TEXT_SET_EDITABLE, wxT("Toggle &editable state"));
514 menuText->AppendCheckItem(TEXT_SET_ENABLED, wxT("Toggle e&nabled state"));
515 menuText->Check(TEXT_SET_EDITABLE, true);
516 menuText->Check(TEXT_SET_ENABLED, true);
517 menuText->AppendSeparator();
518 menuText->Append(TEXT_LINE_DOWN, wxT("Scroll text one line down"));
519 menuText->Append(TEXT_LINE_UP, wxT("Scroll text one line up"));
520 menuText->Append(TEXT_PAGE_DOWN, wxT("Scroll text one page down"));
521 menuText->Append(TEXT_PAGE_UP, wxT("Scroll text one page up"));
522 menuText->Append(TEXT_GET_WINDOW_COORD, wxT("Get window coordinates"));
523 menuText->AppendSeparator();
524 menuText->Append(TEXT_GET_LINE, wxT("Get the text of a line of the tabbed multiline"));
525 menuText->Append(TEXT_GET_LINELENGTH, wxT("Get the length of a line of the tabbed multiline"));
526 menu_bar->Append(menuText, wxT("Te&xt"));
527
528 #if wxUSE_LOG
529 wxMenu *menuLog = new wxMenu;
530 menuLog->AppendCheckItem(TEXT_LOG_KEY, wxT("Log &key events"));
531 menuLog->AppendCheckItem(TEXT_LOG_CHAR, wxT("Log &char events"));
532 menuLog->AppendCheckItem(TEXT_LOG_MOUSE, wxT("Log &mouse events"));
533 menuLog->AppendCheckItem(TEXT_LOG_TEXT, wxT("Log &text events"));
534 menuLog->AppendCheckItem(TEXT_LOG_FOCUS, wxT("Log &focus events"));
535 menuLog->AppendCheckItem(TEXT_LOG_CLIP, wxT("Log clip&board events"));
536 menuLog->AppendSeparator();
537 menuLog->Append(TEXT_CLEAR, wxT("&Clear the log\tCtrl-L"),
538 wxT("Clear the log window contents"));
539
540 // select only the interesting events by default
541 MyTextCtrl::ms_logClip =
542 MyTextCtrl::ms_logText = true;
543
544 menuLog->Check(TEXT_LOG_KEY, MyTextCtrl::ms_logKey);
545 menuLog->Check(TEXT_LOG_CHAR, MyTextCtrl::ms_logChar);
546 menuLog->Check(TEXT_LOG_TEXT, MyTextCtrl::ms_logText);
547
548 menu_bar->Append(menuLog, wxT("&Log"));
549 #endif // wxUSE_LOG
550
551 frame->SetMenuBar(menu_bar);
552
553 frame->Show(true);
554
555 // report success
556 return true;
557 }
558
559 //----------------------------------------------------------------------
560 // MyTextCtrl
561 //----------------------------------------------------------------------
562
563 BEGIN_EVENT_TABLE(MyTextCtrl, wxTextCtrl)
564 EVT_KEY_DOWN(MyTextCtrl::OnKeyDown)
565 EVT_KEY_UP(MyTextCtrl::OnKeyUp)
566 EVT_CHAR(MyTextCtrl::OnChar)
567
568 EVT_TEXT(wxID_ANY, MyTextCtrl::OnText)
569 EVT_TEXT_ENTER(wxID_ANY, MyTextCtrl::OnTextEnter)
570 EVT_TEXT_URL(wxID_ANY, MyTextCtrl::OnTextURL)
571 EVT_TEXT_MAXLEN(wxID_ANY, MyTextCtrl::OnTextMaxLen)
572 EVT_TEXT_CUT(wxID_ANY, MyTextCtrl::OnTextCut)
573 EVT_TEXT_COPY(wxID_ANY, MyTextCtrl::OnTextCopy)
574 EVT_TEXT_PASTE(wxID_ANY, MyTextCtrl::OnTextPaste)
575
576 EVT_MOUSE_EVENTS(MyTextCtrl::OnMouseEvent)
577
578 EVT_SET_FOCUS(MyTextCtrl::OnSetFocus)
579 EVT_KILL_FOCUS(MyTextCtrl::OnKillFocus)
580 END_EVENT_TABLE()
581
582 bool MyTextCtrl::ms_logKey = false;
583 bool MyTextCtrl::ms_logChar = false;
584 bool MyTextCtrl::ms_logMouse = false;
585 bool MyTextCtrl::ms_logText = false;
586 bool MyTextCtrl::ms_logFocus = false;
587 bool MyTextCtrl::ms_logClip = false;
588
589 void MyTextCtrl::LogKeyEvent(const wxChar *name, wxKeyEvent& event) const
590 {
591 wxString key;
592 long keycode = event.GetKeyCode();
593 {
594 switch ( keycode )
595 {
596 case WXK_BACK: key = wxT("BACK"); break;
597 case WXK_TAB: key = wxT("TAB"); break;
598 case WXK_RETURN: key = wxT("RETURN"); break;
599 case WXK_ESCAPE: key = wxT("ESCAPE"); break;
600 case WXK_SPACE: key = wxT("SPACE"); break;
601 case WXK_DELETE: key = wxT("DELETE"); break;
602 case WXK_START: key = wxT("START"); break;
603 case WXK_LBUTTON: key = wxT("LBUTTON"); break;
604 case WXK_RBUTTON: key = wxT("RBUTTON"); break;
605 case WXK_CANCEL: key = wxT("CANCEL"); break;
606 case WXK_MBUTTON: key = wxT("MBUTTON"); break;
607 case WXK_CLEAR: key = wxT("CLEAR"); break;
608 case WXK_SHIFT: key = wxT("SHIFT"); break;
609 case WXK_ALT: key = wxT("ALT"); break;
610 case WXK_CONTROL: key = wxT("CONTROL"); break;
611 case WXK_MENU: key = wxT("MENU"); break;
612 case WXK_PAUSE: key = wxT("PAUSE"); break;
613 case WXK_CAPITAL: key = wxT("CAPITAL"); break;
614 case WXK_END: key = wxT("END"); break;
615 case WXK_HOME: key = wxT("HOME"); break;
616 case WXK_LEFT: key = wxT("LEFT"); break;
617 case WXK_UP: key = wxT("UP"); break;
618 case WXK_RIGHT: key = wxT("RIGHT"); break;
619 case WXK_DOWN: key = wxT("DOWN"); break;
620 case WXK_SELECT: key = wxT("SELECT"); break;
621 case WXK_PRINT: key = wxT("PRINT"); break;
622 case WXK_EXECUTE: key = wxT("EXECUTE"); break;
623 case WXK_SNAPSHOT: key = wxT("SNAPSHOT"); break;
624 case WXK_INSERT: key = wxT("INSERT"); break;
625 case WXK_HELP: key = wxT("HELP"); break;
626 case WXK_NUMPAD0: key = wxT("NUMPAD0"); break;
627 case WXK_NUMPAD1: key = wxT("NUMPAD1"); break;
628 case WXK_NUMPAD2: key = wxT("NUMPAD2"); break;
629 case WXK_NUMPAD3: key = wxT("NUMPAD3"); break;
630 case WXK_NUMPAD4: key = wxT("NUMPAD4"); break;
631 case WXK_NUMPAD5: key = wxT("NUMPAD5"); break;
632 case WXK_NUMPAD6: key = wxT("NUMPAD6"); break;
633 case WXK_NUMPAD7: key = wxT("NUMPAD7"); break;
634 case WXK_NUMPAD8: key = wxT("NUMPAD8"); break;
635 case WXK_NUMPAD9: key = wxT("NUMPAD9"); break;
636 case WXK_MULTIPLY: key = wxT("MULTIPLY"); break;
637 case WXK_ADD: key = wxT("ADD"); break;
638 case WXK_SEPARATOR: key = wxT("SEPARATOR"); break;
639 case WXK_SUBTRACT: key = wxT("SUBTRACT"); break;
640 case WXK_DECIMAL: key = wxT("DECIMAL"); break;
641 case WXK_DIVIDE: key = wxT("DIVIDE"); break;
642 case WXK_F1: key = wxT("F1"); break;
643 case WXK_F2: key = wxT("F2"); break;
644 case WXK_F3: key = wxT("F3"); break;
645 case WXK_F4: key = wxT("F4"); break;
646 case WXK_F5: key = wxT("F5"); break;
647 case WXK_F6: key = wxT("F6"); break;
648 case WXK_F7: key = wxT("F7"); break;
649 case WXK_F8: key = wxT("F8"); break;
650 case WXK_F9: key = wxT("F9"); break;
651 case WXK_F10: key = wxT("F10"); break;
652 case WXK_F11: key = wxT("F11"); break;
653 case WXK_F12: key = wxT("F12"); break;
654 case WXK_F13: key = wxT("F13"); break;
655 case WXK_F14: key = wxT("F14"); break;
656 case WXK_F15: key = wxT("F15"); break;
657 case WXK_F16: key = wxT("F16"); break;
658 case WXK_F17: key = wxT("F17"); break;
659 case WXK_F18: key = wxT("F18"); break;
660 case WXK_F19: key = wxT("F19"); break;
661 case WXK_F20: key = wxT("F20"); break;
662 case WXK_F21: key = wxT("F21"); break;
663 case WXK_F22: key = wxT("F22"); break;
664 case WXK_F23: key = wxT("F23"); break;
665 case WXK_F24: key = wxT("F24"); break;
666 case WXK_NUMLOCK: key = wxT("NUMLOCK"); break;
667 case WXK_SCROLL: key = wxT("SCROLL"); break;
668 case WXK_PAGEUP: key = wxT("PAGEUP"); break;
669 case WXK_PAGEDOWN: key = wxT("PAGEDOWN"); break;
670 case WXK_NUMPAD_SPACE: key = wxT("NUMPAD_SPACE"); break;
671 case WXK_NUMPAD_TAB: key = wxT("NUMPAD_TAB"); break;
672 case WXK_NUMPAD_ENTER: key = wxT("NUMPAD_ENTER"); break;
673 case WXK_NUMPAD_F1: key = wxT("NUMPAD_F1"); break;
674 case WXK_NUMPAD_F2: key = wxT("NUMPAD_F2"); break;
675 case WXK_NUMPAD_F3: key = wxT("NUMPAD_F3"); break;
676 case WXK_NUMPAD_F4: key = wxT("NUMPAD_F4"); break;
677 case WXK_NUMPAD_HOME: key = wxT("NUMPAD_HOME"); break;
678 case WXK_NUMPAD_LEFT: key = wxT("NUMPAD_LEFT"); break;
679 case WXK_NUMPAD_UP: key = wxT("NUMPAD_UP"); break;
680 case WXK_NUMPAD_RIGHT: key = wxT("NUMPAD_RIGHT"); break;
681 case WXK_NUMPAD_DOWN: key = wxT("NUMPAD_DOWN"); break;
682 case WXK_NUMPAD_PAGEUP: key = wxT("NUMPAD_PAGEUP"); break;
683 case WXK_NUMPAD_PAGEDOWN: key = wxT("NUMPAD_PAGEDOWN"); break;
684 case WXK_NUMPAD_END: key = wxT("NUMPAD_END"); break;
685 case WXK_NUMPAD_BEGIN: key = wxT("NUMPAD_BEGIN"); break;
686 case WXK_NUMPAD_INSERT: key = wxT("NUMPAD_INSERT"); break;
687 case WXK_NUMPAD_DELETE: key = wxT("NUMPAD_DELETE"); break;
688 case WXK_NUMPAD_EQUAL: key = wxT("NUMPAD_EQUAL"); break;
689 case WXK_NUMPAD_MULTIPLY: key = wxT("NUMPAD_MULTIPLY"); break;
690 case WXK_NUMPAD_ADD: key = wxT("NUMPAD_ADD"); break;
691 case WXK_NUMPAD_SEPARATOR: key = wxT("NUMPAD_SEPARATOR"); break;
692 case WXK_NUMPAD_SUBTRACT: key = wxT("NUMPAD_SUBTRACT"); break;
693 case WXK_NUMPAD_DECIMAL: key = wxT("NUMPAD_DECIMAL"); break;
694
695 default:
696 {
697 if ( wxIsprint((int)keycode) )
698 key.Printf(wxT("'%c'"), (char)keycode);
699 else if ( keycode > 0 && keycode < 27 )
700 key.Printf(_("Ctrl-%c"), wxT('A') + keycode - 1);
701 else
702 key.Printf(wxT("unknown (%ld)"), keycode);
703 }
704 }
705 }
706
707 #if wxUSE_UNICODE
708 key += wxString::Format(wxT(" (Unicode: %#04x)"), event.GetUnicodeKey());
709 #endif // wxUSE_UNICODE
710
711 wxLogMessage( wxT("%s event: %s (flags = %c%c%c%c)"),
712 name,
713 key.c_str(),
714 GetChar( event.ControlDown(), wxT('C') ),
715 GetChar( event.AltDown(), wxT('A') ),
716 GetChar( event.ShiftDown(), wxT('S') ),
717 GetChar( event.MetaDown(), wxT('M') ) );
718 }
719
720 static wxString GetMouseEventDesc(const wxMouseEvent& ev)
721 {
722 // click event
723 wxString button;
724 bool dbl, up;
725 if ( ev.LeftDown() || ev.LeftUp() || ev.LeftDClick() )
726 {
727 button = wxT("Left");
728 dbl = ev.LeftDClick();
729 up = ev.LeftUp();
730 }
731 else if ( ev.MiddleDown() || ev.MiddleUp() || ev.MiddleDClick() )
732 {
733 button = wxT("Middle");
734 dbl = ev.MiddleDClick();
735 up = ev.MiddleUp();
736 }
737 else if ( ev.RightDown() || ev.RightUp() || ev.RightDClick() )
738 {
739 button = wxT("Right");
740 dbl = ev.RightDClick();
741 up = ev.RightUp();
742 }
743 else if ( ev.Aux1Down() || ev.Aux1Up() || ev.Aux1DClick() )
744 {
745 button = wxT("Aux1");
746 dbl = ev.Aux1DClick();
747 up = ev.Aux1Up();
748 }
749 else if ( ev.Aux2Down() || ev.Aux2Up() || ev.Aux2DClick() )
750 {
751 button = wxT("Aux2");
752 dbl = ev.Aux2DClick();
753 up = ev.Aux2Up();
754 }
755 else if ( ev.GetWheelRotation() )
756 {
757 return wxString::Format("Wheel rotation %+d", ev.GetWheelRotation());
758 }
759 else
760 {
761 return wxT("Unknown mouse event");
762 }
763 wxASSERT(!(dbl && up));
764
765 return wxString::Format(wxT("%s mouse button %s"),
766 button.c_str(),
767 dbl ? wxT("double clicked")
768 : up ? wxT("released") : wxT("clicked"));
769 }
770
771 void MyTextCtrl::OnMouseEvent(wxMouseEvent& ev)
772 {
773 ev.Skip();
774
775 if ( !ms_logMouse )
776 return;
777
778 if ( !ev.Moving() )
779 {
780 wxString msg;
781 if ( ev.Entering() )
782 {
783 msg = wxT("Mouse entered the window");
784 }
785 else if ( ev.Leaving() )
786 {
787 msg = wxT("Mouse left the window");
788 }
789 else
790 {
791 msg = GetMouseEventDesc(ev);
792 }
793
794 msg << wxT(" at (") << ev.GetX() << wxT(", ") << ev.GetY() << wxT(") ");
795
796 long pos;
797 wxTextCtrlHitTestResult rc = HitTest(ev.GetPosition(), &pos);
798 if ( rc != wxTE_HT_UNKNOWN )
799 {
800 msg << wxT("at position ") << pos << wxT(' ');
801 }
802
803 msg << wxT("[Flags: ")
804 << GetChar( ev.LeftIsDown(), wxT('1') )
805 << GetChar( ev.MiddleIsDown(), wxT('2') )
806 << GetChar( ev.RightIsDown(), wxT('3') )
807 << GetChar( ev.Aux1IsDown(), wxT('x') )
808 << GetChar( ev.Aux2IsDown(), wxT('X') )
809 << GetChar( ev.ControlDown(), wxT('C') )
810 << GetChar( ev.AltDown(), wxT('A') )
811 << GetChar( ev.ShiftDown(), wxT('S') )
812 << GetChar( ev.MetaDown(), wxT('M') )
813 << wxT(']');
814
815 wxLogMessage(msg);
816 }
817 //else: we're not interested in mouse move events
818 }
819
820 void MyTextCtrl::OnSetFocus(wxFocusEvent& event)
821 {
822 if ( ms_logFocus )
823 {
824 wxLogMessage( wxT("%p got focus."), this);
825 }
826
827 event.Skip();
828 }
829
830 void MyTextCtrl::OnKillFocus(wxFocusEvent& event)
831 {
832 if ( ms_logFocus )
833 {
834 wxLogMessage( wxT("%p lost focus"), this);
835 }
836
837 event.Skip();
838 }
839
840 void MyTextCtrl::OnText(wxCommandEvent& event)
841 {
842 if ( !ms_logText )
843 return;
844
845 MyTextCtrl *win = (MyTextCtrl *)event.GetEventObject();
846 const wxChar *changeVerb = win->IsModified() ? wxT("changed")
847 : wxT("set by program");
848 const wxChar *data = (const wxChar *)(win->GetClientData());
849 if ( data )
850 {
851 wxLogMessage(wxT("Text %s in control \"%s\""), changeVerb, data);
852 }
853 else
854 {
855 wxLogMessage(wxT("Text %s in some control"), changeVerb);
856 }
857 }
858
859 void MyTextCtrl::OnTextEnter(wxCommandEvent& event)
860 {
861 if ( !ms_logText )
862 return;
863
864 MyTextCtrl *win = (MyTextCtrl *)event.GetEventObject();
865 const wxChar *data = (const wxChar *)(win->GetClientData());
866 if ( data )
867 {
868 wxLogMessage(wxT("Enter pressed in control '%s'"), data);
869 }
870 else
871 {
872 wxLogMessage(wxT("Enter pressed in some control"));
873 }
874 }
875
876 void MyTextCtrl::OnTextMaxLen(wxCommandEvent& WXUNUSED(event))
877 {
878 wxLogMessage(wxT("You can't enter more characters into this control."));
879 }
880
881
882 void MyTextCtrl::OnTextCut(wxClipboardTextEvent& event)
883 {
884 LogClipEvent(wxT("cut to"), event);
885 }
886
887 void MyTextCtrl::OnTextCopy(wxClipboardTextEvent& event)
888 {
889 LogClipEvent(wxT("copied to"), event);
890 }
891
892 void MyTextCtrl::OnTextPaste(wxClipboardTextEvent& event)
893 {
894 LogClipEvent(wxT("pasted from"), event);
895 }
896
897 void MyTextCtrl::LogClipEvent(const wxChar *what, wxClipboardTextEvent& event)
898 {
899 wxFrame *frame = wxDynamicCast(wxGetTopLevelParent(this), wxFrame);
900 wxCHECK_RET( frame, wxT("no parent frame?") );
901
902 const bool veto = frame->GetMenuBar()->IsChecked(TEXT_CLIPBOARD_VETO);
903 if ( !veto )
904 event.Skip();
905
906 if ( ms_logClip )
907 {
908 wxLogMessage(wxT("Text %s%s the clipboard."),
909 veto ? wxT("not ") : wxT(""), what);
910 }
911 }
912
913
914 void MyTextCtrl::OnTextURL(wxTextUrlEvent& event)
915 {
916 const wxMouseEvent& ev = event.GetMouseEvent();
917
918 // filter out mouse moves, too many of them
919 if ( ev.Moving() )
920 return;
921
922 long start = event.GetURLStart(),
923 end = event.GetURLEnd();
924
925 wxLogMessage(wxT("Mouse event over URL '%s': %s"),
926 GetValue().Mid(start, end - start).c_str(),
927 GetMouseEventDesc(ev).c_str());
928 }
929
930 void MyTextCtrl::OnChar(wxKeyEvent& event)
931 {
932 if ( ms_logChar )
933 LogKeyEvent( wxT("Char"), event);
934
935 event.Skip();
936 }
937
938 void MyTextCtrl::OnKeyUp(wxKeyEvent& event)
939 {
940 if ( ms_logKey )
941 LogKeyEvent( wxT("Key up"), event);
942
943 event.Skip();
944 }
945
946 void MyTextCtrl::OnKeyDown(wxKeyEvent& event)
947 {
948 switch ( event.GetKeyCode() )
949 {
950 case WXK_F1:
951 // show current position and text length
952 {
953 long line, column, pos = GetInsertionPoint();
954 PositionToXY(pos, &column, &line);
955
956 wxLogMessage(wxT("Current position: %ld\nCurrent line, column: (%ld, %ld)\nNumber of lines: %ld\nCurrent line length: %ld\nTotal text length: %u (%ld)"),
957 pos,
958 line, column,
959 (long) GetNumberOfLines(),
960 (long) GetLineLength(line),
961 (unsigned int) GetValue().length(),
962 GetLastPosition());
963
964 long from, to;
965 GetSelection(&from, &to);
966
967 wxString sel = GetStringSelection();
968
969 wxLogMessage(wxT("Selection: from %ld to %ld."), from, to);
970 wxLogMessage(wxT("Selection = '%s' (len = %u)"),
971 sel.c_str(),
972 (unsigned int) sel.length());
973
974 const wxString text = GetLineText(line);
975 wxLogMessage(wxT("Current line: \"%s\"; length = %lu"),
976 text.c_str(), text.length());
977 }
978 break;
979
980 case WXK_F2:
981 // go to the end
982 SetInsertionPointEnd();
983 break;
984
985 case WXK_F3:
986 // go to position 10
987 SetInsertionPoint(10);
988 break;
989
990 case WXK_F4:
991 if (!m_hasCapture)
992 {
993 wxLogDebug( wxT("Now capturing mouse and events.") );
994 m_hasCapture = true;
995 CaptureMouse();
996 }
997 else
998 {
999 wxLogDebug( wxT("Stopped capturing mouse and events.") );
1000 m_hasCapture = false;
1001 ReleaseMouse();
1002 }
1003 break;
1004
1005 case WXK_F5:
1006 // insert a blank line
1007 WriteText(wxT("\n"));
1008 break;
1009
1010 case WXK_F6:
1011 wxLogMessage(wxT("IsModified() before SetValue(): %d"),
1012 IsModified());
1013 ChangeValue(wxT("ChangeValue() has been called"));
1014 wxLogMessage(wxT("IsModified() after SetValue(): %d"),
1015 IsModified());
1016 break;
1017
1018 case WXK_F7:
1019 wxLogMessage(wxT("Position 10 should be now visible."));
1020 ShowPosition(10);
1021 break;
1022
1023 case WXK_F8:
1024 wxLogMessage(wxT("Control has been cleared"));
1025 Clear();
1026 break;
1027
1028 case WXK_F9:
1029 WriteText(wxT("WriteText() has been called"));
1030 break;
1031
1032 case WXK_F10:
1033 AppendText(wxT("AppendText() has been called"));
1034 break;
1035
1036 case WXK_F11:
1037 DiscardEdits();
1038 wxLogMessage(wxT("Control marked as non modified"));
1039 break;
1040 }
1041
1042 if ( ms_logKey )
1043 LogKeyEvent( wxT("Key down"), event);
1044
1045 event.Skip();
1046 }
1047
1048 //----------------------------------------------------------------------
1049 // MyPanel
1050 //----------------------------------------------------------------------
1051
1052 MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h )
1053 : wxPanel( frame, wxID_ANY, wxPoint(x, y), wxSize(w, h) )
1054 {
1055 #if wxUSE_LOG
1056 m_log = new wxTextCtrl( this, wxID_ANY, wxT("This is the log window.\n"),
1057 wxPoint(5,260), wxSize(630,100),
1058 wxTE_MULTILINE | wxTE_READONLY);
1059
1060 m_logOld = wxLog::SetActiveTarget( new wxLogTextCtrl( m_log ) );
1061 #endif // wxUSE_LOG
1062
1063 // single line text controls
1064
1065 m_text = new MyTextCtrl( this, wxID_ANY, wxT("Single line."),
1066 wxDefaultPosition, wxDefaultSize,
1067 wxTE_PROCESS_ENTER);
1068 m_text->SetForegroundColour(*wxBLUE);
1069 m_text->SetBackgroundColour(*wxLIGHT_GREY);
1070 (*m_text) << wxT(" Appended.");
1071 m_text->SetInsertionPoint(0);
1072 m_text->WriteText( wxT("Prepended. ") );
1073
1074 m_password = new MyTextCtrl( this, wxID_ANY, wxT(""),
1075 wxPoint(10,50), wxSize(140,wxDefaultCoord), wxTE_PASSWORD );
1076
1077 m_readonly = new MyTextCtrl( this, wxID_ANY, wxT("Read only"),
1078 wxPoint(10,90), wxSize(140,wxDefaultCoord), wxTE_READONLY );
1079
1080 m_limited = new MyTextCtrl(this, wxID_ANY, wxT("Max 8 ch"),
1081 wxPoint(10, 130), wxSize(140, wxDefaultCoord));
1082 m_limited->SetMaxLength(8);
1083
1084 // multi line text controls
1085
1086 m_horizontal = new MyTextCtrl( this, wxID_ANY, wxT("Multiline text control with a horizontal scrollbar.\n"),
1087 wxPoint(10,170), wxSize(140,70), wxTE_MULTILINE | wxHSCROLL);
1088
1089 // a little hack to use the command line argument for encoding testing
1090 if ( wxTheApp->argc == 2 )
1091 {
1092 switch ( (wxChar)wxTheApp->argv[1][0] )
1093 {
1094 case '2':
1095 m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL,
1096 false, wxT(""),
1097 wxFONTENCODING_ISO8859_2));
1098 m_horizontal->AppendText(wxT("\256lu\273ou\350k\375 k\371\362 zb\354sile \350e\271tina \253\273"));
1099 break;
1100
1101 case '1':
1102 m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL,
1103 false, wxT(""),
1104 wxFONTENCODING_CP1251));
1105 m_horizontal->AppendText(wxT("\317\360\350\342\345\362!"));
1106 break;
1107
1108 case '8':
1109 m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL,
1110 false, wxT(""),
1111 wxFONTENCODING_CP1251));
1112 #if wxUSE_UNICODE
1113 m_horizontal->AppendText(L"\x0412\x0430\x0434\x0438\x043c \x0426");
1114 #else
1115 m_horizontal->AppendText("\313\301\326\305\324\323\321 \325\304\301\336\316\331\315");
1116 #endif
1117 }
1118 }
1119 else
1120 {
1121 m_horizontal->AppendText(wxT("Text in default encoding"));
1122 }
1123
1124 m_multitext = new MyTextCtrl( this, wxID_ANY,
1125 wxT("Multi line without vertical scrollbar."),
1126 wxPoint(180,10), wxSize(200,70), wxTE_MULTILINE | wxTE_NO_VSCROLL );
1127 m_multitext->SetFont(*wxITALIC_FONT);
1128 (*m_multitext) << wxT(" Appended.");
1129 m_multitext->SetInsertionPoint(0);
1130 m_multitext->WriteText( wxT("Prepended. ") );
1131 m_multitext->SetForegroundColour(*wxYELLOW);
1132 m_multitext->SetBackgroundColour(*wxLIGHT_GREY);
1133
1134 #if wxUSE_TOOLTIPS
1135 m_multitext->SetToolTip(wxT("Press Fn function keys here"));
1136 #endif
1137
1138 m_tab = new MyTextCtrl( this, 100, wxT("Multiline, allow <TAB> processing."),
1139 wxPoint(180,90), wxSize(200,70), wxTE_MULTILINE | wxTE_PROCESS_TAB );
1140 m_tab->SetClientData((void *)wxT("tab"));
1141
1142 m_enter = new MyTextCtrl( this, 100, wxT("Multiline, allow <ENTER> processing."),
1143 wxPoint(180,170), wxSize(200,70), wxTE_MULTILINE);
1144 m_enter->SetClientData((void *)wxT("enter"));
1145
1146 m_textrich = new MyTextCtrl(this, wxID_ANY, wxT("Allows more than 30Kb of text\n")
1147 wxT("(even under broken Win9x)\n")
1148 wxT("and a very very very very very ")
1149 wxT("very very very long line to test ")
1150 wxT("wxHSCROLL style\n")
1151 wxT("\nAnd here is a link in quotation marks to ")
1152 wxT("test wxTE_AUTO_URL: \"http://www.wxwidgets.org\""),
1153 wxPoint(450, 10), wxSize(200, 230),
1154 wxTE_RICH | wxTE_MULTILINE | wxTE_AUTO_URL);
1155 m_textrich->SetStyle(0, 10, *wxRED);
1156 m_textrich->SetStyle(10, 20, *wxBLUE);
1157 m_textrich->SetStyle(30, 40,
1158 wxTextAttr(*wxGREEN, wxNullColour, *wxITALIC_FONT));
1159 m_textrich->SetDefaultStyle(wxTextAttr());
1160 m_textrich->AppendText(wxT("\n\nFirst 10 characters should be in red\n"));
1161 m_textrich->AppendText(wxT("Next 10 characters should be in blue\n"));
1162 m_textrich->AppendText(wxT("Next 10 characters should be normal\n"));
1163 m_textrich->AppendText(wxT("And the next 10 characters should be green and italic\n"));
1164 m_textrich->SetDefaultStyle(wxTextAttr(*wxCYAN, *wxBLUE));
1165 m_textrich->AppendText(wxT("This text should be cyan on blue\n"));
1166 m_textrich->SetDefaultStyle(wxTextAttr(*wxBLUE, *wxWHITE));
1167 m_textrich->AppendText(wxT("And this should be in blue and the text you ")
1168 wxT("type should be in blue as well"));
1169
1170
1171 // lay out the controls
1172 wxBoxSizer *column1 = new wxBoxSizer(wxVERTICAL);
1173 column1->Add( m_text, 0, wxALL | wxEXPAND, 10 );
1174 column1->Add( m_password, 0, wxALL | wxEXPAND, 10 );
1175 column1->Add( m_readonly, 0, wxALL | wxEXPAND, 10 );
1176 column1->Add( m_limited, 0, wxALL | wxEXPAND, 10 );
1177 column1->Add( m_horizontal, 1, wxALL | wxEXPAND, 10 );
1178
1179 wxBoxSizer *column2 = new wxBoxSizer(wxVERTICAL);
1180 column2->Add( m_multitext, 1, wxALL | wxEXPAND, 10 );
1181 column2->Add( m_tab, 1, wxALL | wxEXPAND, 10 );
1182 column2->Add( m_enter, 1, wxALL | wxEXPAND, 10 );
1183
1184 wxBoxSizer *row1 = new wxBoxSizer(wxHORIZONTAL);
1185 row1->Add( column1, 0, wxALL | wxEXPAND, 10 );
1186 row1->Add( column2, 1, wxALL | wxEXPAND, 10 );
1187 row1->Add( m_textrich, 1, wxALL | wxEXPAND, 10 );
1188
1189 wxBoxSizer *topSizer = new wxBoxSizer(wxVERTICAL);
1190 topSizer->Add( row1, 2, wxALL | wxEXPAND, 10 );
1191
1192 #if wxUSE_LOG
1193 topSizer->Add( m_log, 1, wxALL | wxEXPAND, 10 );
1194 #endif
1195
1196 SetSizer(topSizer);
1197 }
1198
1199 wxTextCtrl *MyPanel::GetFocusedText() const
1200 {
1201 wxWindow *win = FindFocus();
1202
1203 wxTextCtrl *text = win ? wxDynamicCast(win, wxTextCtrl) : NULL;
1204 return text ? text : m_multitext;
1205 }
1206
1207 #if wxUSE_CLIPBOARD
1208 void MyPanel::DoPasteFromClipboard()
1209 {
1210 // On X11, we want to get the data from the primary selection instead
1211 // of the normal clipboard (which isn't normal under X11 at all). This
1212 // call has no effect under MSW.
1213 wxTheClipboard->UsePrimarySelection();
1214
1215 if (!wxTheClipboard->Open())
1216 {
1217 #if wxUSE_LOG
1218 *m_log << wxT("Error opening the clipboard.\n");
1219 #endif // wxUSE_LOG
1220 return;
1221 }
1222 else
1223 {
1224 #if wxUSE_LOG
1225 *m_log << wxT("Successfully opened the clipboard.\n");
1226 #endif // wxUSE_LOG
1227 }
1228
1229 wxTextDataObject data;
1230
1231 if (wxTheClipboard->IsSupported( data.GetFormat() ))
1232 {
1233 #if wxUSE_LOG
1234 *m_log << wxT("Clipboard supports requested format.\n");
1235 #endif // wxUSE_LOG
1236
1237 if (wxTheClipboard->GetData( data ))
1238 {
1239 #if wxUSE_LOG
1240 *m_log << wxT("Successfully retrieved data from the clipboard.\n");
1241 #endif // wxUSE_LOG
1242 GetFocusedText()->AppendText(data.GetText());
1243 }
1244 else
1245 {
1246 #if wxUSE_LOG
1247 *m_log << wxT("Error getting data from the clipboard.\n");
1248 #endif // wxUSE_LOG
1249 }
1250 }
1251 else
1252 {
1253 #if wxUSE_LOG
1254 *m_log << wxT("Clipboard doesn't support requested format.\n");
1255 #endif // wxUSE_LOG
1256 }
1257
1258 wxTheClipboard->Close();
1259
1260 #if wxUSE_LOG
1261 *m_log << wxT("Closed the clipboard.\n");
1262 #endif // wxUSE_LOG
1263 }
1264
1265 void MyPanel::DoCopyToClipboard()
1266 {
1267 // On X11, we want to get the data from the primary selection instead
1268 // of the normal clipboard (which isn't normal under X11 at all). This
1269 // call has no effect under MSW.
1270 wxTheClipboard->UsePrimarySelection();
1271
1272 wxString text( GetFocusedText()->GetStringSelection() );
1273
1274 if (text.IsEmpty())
1275 {
1276 #if wxUSE_LOG
1277 *m_log << wxT("No text to copy.\n");
1278 #endif // wxUSE_LOG
1279
1280 return;
1281 }
1282
1283 if (!wxTheClipboard->Open())
1284 {
1285 #if wxUSE_LOG
1286 *m_log << wxT("Error opening the clipboard.\n");
1287 #endif // wxUSE_LOG
1288
1289 return;
1290 }
1291 else
1292 {
1293 #if wxUSE_LOG
1294 *m_log << wxT("Successfully opened the clipboard.\n");
1295 #endif // wxUSE_LOG
1296 }
1297
1298 wxTextDataObject *data = new wxTextDataObject( text );
1299
1300 if (!wxTheClipboard->SetData( data ))
1301 {
1302 #if wxUSE_LOG
1303 *m_log << wxT("Error while copying to the clipboard.\n");
1304 #endif // wxUSE_LOG
1305 }
1306 else
1307 {
1308 #if wxUSE_LOG
1309 *m_log << wxT("Successfully copied data to the clipboard.\n");
1310 #endif // wxUSE_LOG
1311 }
1312
1313 wxTheClipboard->Close();
1314
1315 #if wxUSE_LOG
1316 *m_log << wxT("Closed the clipboard.\n");
1317 #endif // wxUSE_LOG
1318 }
1319
1320 #endif // wxUSE_CLIPBOARD
1321
1322 void MyPanel::DoMoveToEndOfText()
1323 {
1324 m_multitext->SetInsertionPointEnd();
1325 m_multitext->SetFocus();
1326 }
1327
1328 void MyPanel::DoGetWindowCoordinates()
1329 {
1330 wxTextCtrl * const text = GetFocusedText();
1331
1332 const wxPoint pt0 = text->PositionToCoords(0);
1333 const wxPoint ptCur = text->PositionToCoords(text->GetInsertionPoint());
1334 *m_log << "Current position coordinates: "
1335 "(" << ptCur.x << ", " << ptCur.y << "), "
1336 "first position coordinates: "
1337 "(" << pt0.x << ", " << pt0.y << ")\n";
1338 }
1339
1340 void MyPanel::DoMoveToEndOfEntry()
1341 {
1342 m_text->SetInsertionPointEnd();
1343 m_text->SetFocus();
1344 }
1345
1346 void MyPanel::DoRemoveText()
1347 {
1348 GetFocusedText()->Remove(0, 10);
1349 }
1350
1351 void MyPanel::DoReplaceText()
1352 {
1353 GetFocusedText()->Replace(3, 8, wxT("ABC"));
1354 }
1355
1356 void MyPanel::DoSelectText()
1357 {
1358 GetFocusedText()->SetSelection(3, 8);
1359 }
1360
1361 //----------------------------------------------------------------------
1362 // MyFrame
1363 //----------------------------------------------------------------------
1364
1365 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
1366 EVT_MENU(TEXT_QUIT, MyFrame::OnQuit)
1367 EVT_MENU(TEXT_ABOUT, MyFrame::OnAbout)
1368 EVT_MENU(TEXT_SAVE, MyFrame::OnFileSave)
1369 EVT_MENU(TEXT_LOAD, MyFrame::OnFileLoad)
1370 EVT_MENU(TEXT_RICH_TEXT_TEST, MyFrame::OnRichTextTest)
1371
1372 EVT_MENU(TEXT_LOG_KEY, MyFrame::OnLogKey)
1373 EVT_MENU(TEXT_LOG_CHAR, MyFrame::OnLogChar)
1374 EVT_MENU(TEXT_LOG_MOUSE,MyFrame::OnLogMouse)
1375 EVT_MENU(TEXT_LOG_TEXT, MyFrame::OnLogText)
1376 EVT_MENU(TEXT_LOG_FOCUS,MyFrame::OnLogFocus)
1377 EVT_MENU(TEXT_LOG_CLIP, MyFrame::OnLogClip)
1378 #if wxUSE_LOG
1379 EVT_MENU(TEXT_CLEAR, MyFrame::OnLogClear)
1380 #endif // wxUSE_LOG
1381
1382 #if wxUSE_TOOLTIPS
1383 EVT_MENU(TEXT_TOOLTIPS_SETDELAY, MyFrame::OnSetTooltipDelay)
1384 EVT_MENU(TEXT_TOOLTIPS_ENABLE, MyFrame::OnToggleTooltips)
1385 #endif // wxUSE_TOOLTIPS
1386
1387 #if wxUSE_CLIPBOARD
1388 EVT_MENU(TEXT_CLIPBOARD_PASTE, MyFrame::OnPasteFromClipboard)
1389 EVT_MENU(TEXT_CLIPBOARD_COPY, MyFrame::OnCopyToClipboard)
1390
1391 EVT_UPDATE_UI(TEXT_CLIPBOARD_PASTE, MyFrame::OnUpdatePasteFromClipboard)
1392 EVT_UPDATE_UI(TEXT_CLIPBOARD_COPY, MyFrame::OnUpdateCopyToClipboard)
1393 #endif // wxUSE_CLIPBOARD
1394
1395 EVT_MENU(TEXT_REMOVE, MyFrame::OnRemoveText)
1396 EVT_MENU(TEXT_REPLACE, MyFrame::OnReplaceText)
1397 EVT_MENU(TEXT_SELECT, MyFrame::OnSelectText)
1398 EVT_MENU(TEXT_ADD_SOME, MyFrame::OnAddText)
1399 EVT_MENU(TEXT_ADD_FREEZE, MyFrame::OnAddTextFreeze)
1400 EVT_MENU(TEXT_ADD_LINE, MyFrame::OnAddTextLine)
1401 EVT_MENU(TEXT_MOVE_ENDTEXT, MyFrame::OnMoveToEndOfText)
1402 EVT_MENU(TEXT_GET_WINDOW_COORD, MyFrame::OnGetWindowCoordinates)
1403 EVT_MENU(TEXT_MOVE_ENDENTRY, MyFrame::OnMoveToEndOfEntry)
1404
1405 EVT_MENU(TEXT_SET_EDITABLE, MyFrame::OnSetEditable)
1406 EVT_MENU(TEXT_SET_ENABLED, MyFrame::OnSetEnabled)
1407
1408 EVT_MENU(TEXT_LINE_DOWN, MyFrame::OnScrollLineDown)
1409 EVT_MENU(TEXT_LINE_UP, MyFrame::OnScrollLineUp)
1410 EVT_MENU(TEXT_PAGE_DOWN, MyFrame::OnScrollPageDown)
1411 EVT_MENU(TEXT_PAGE_UP, MyFrame::OnScrollPageUp)
1412
1413 EVT_MENU(TEXT_GET_LINE, MyFrame::OnGetLine)
1414 EVT_MENU(TEXT_GET_LINELENGTH, MyFrame::OnGetLineLength)
1415
1416 EVT_MENU(TEXT_SET, MyFrame::OnSetText)
1417 EVT_MENU(TEXT_CHANGE, MyFrame::OnChangeText)
1418
1419 EVT_IDLE(MyFrame::OnIdle)
1420 END_EVENT_TABLE()
1421
1422 MyFrame::MyFrame(wxFrame *frame, const wxChar *title, int x, int y, int w, int h)
1423 : wxFrame(frame, wxID_ANY, title, wxPoint(x, y), wxSize(w, h) )
1424 {
1425 SetIcon(wxICON(sample));
1426
1427 #if wxUSE_STATUSBAR
1428 CreateStatusBar(2);
1429 #endif // wxUSE_STATUSBAR
1430
1431 m_panel = new MyPanel( this, 10, 10, 300, 100 );
1432 }
1433
1434 void MyFrame::OnQuit (wxCommandEvent& WXUNUSED(event) )
1435 {
1436 Close(true);
1437 }
1438
1439 void MyFrame::OnAbout( wxCommandEvent& WXUNUSED(event) )
1440 {
1441 wxBeginBusyCursor();
1442
1443 wxMessageDialog dialog(this,
1444 wxT("This is a text control sample. It demonstrates the many different\n")
1445 wxT("text control styles, the use of the clipboard, setting and handling\n")
1446 wxT("tooltips and intercepting key and char events.\n")
1447 wxT("\n")
1448 wxT("Copyright (c) 1999, Robert Roebling, Julian Smart, Vadim Zeitlin"),
1449 wxT("About wxTextCtrl Sample"),
1450 wxOK | wxICON_INFORMATION);
1451
1452 dialog.ShowModal();
1453
1454 wxEndBusyCursor();
1455 }
1456
1457 #if wxUSE_TOOLTIPS
1458
1459 void MyFrame::OnSetTooltipDelay(wxCommandEvent& WXUNUSED(event))
1460 {
1461 static long s_delay = 5000;
1462
1463 wxString delay;
1464 delay.Printf( wxT("%ld"), s_delay);
1465
1466 delay = wxGetTextFromUser(wxT("Enter delay (in milliseconds)"),
1467 wxT("Set tooltip delay"),
1468 delay,
1469 this);
1470 if ( !delay )
1471 return; // cancelled
1472
1473 wxSscanf(delay, wxT("%ld"), &s_delay);
1474
1475 wxToolTip::SetDelay(s_delay);
1476
1477 wxLogStatus(this, wxT("Tooltip delay set to %ld milliseconds"), s_delay);
1478 }
1479
1480 void MyFrame::OnToggleTooltips(wxCommandEvent& WXUNUSED(event))
1481 {
1482 static bool s_enabled = true;
1483
1484 s_enabled = !s_enabled;
1485
1486 wxToolTip::Enable(s_enabled);
1487
1488 wxLogStatus(this, wxT("Tooltips %sabled"), s_enabled ? wxT("en") : wxT("dis") );
1489 }
1490 #endif // tooltips
1491
1492 #if wxUSE_LOG
1493 void MyFrame::OnLogClear(wxCommandEvent& WXUNUSED(event))
1494 {
1495 m_panel->m_log->Clear();
1496 }
1497 #endif // wxUSE_LOG
1498
1499 void MyFrame::OnSetEditable(wxCommandEvent& WXUNUSED(event))
1500 {
1501 static bool s_editable = true;
1502
1503 s_editable = !s_editable;
1504 m_panel->m_text->SetEditable(s_editable);
1505 m_panel->m_password->SetEditable(s_editable);
1506 m_panel->m_multitext->SetEditable(s_editable);
1507 m_panel->m_textrich->SetEditable(s_editable);
1508 }
1509
1510 void MyFrame::OnSetEnabled(wxCommandEvent& WXUNUSED(event))
1511 {
1512 bool enabled = m_panel->m_text->IsEnabled();
1513 enabled = !enabled;
1514
1515 m_panel->m_text->Enable(enabled);
1516 m_panel->m_password->Enable(enabled);
1517 m_panel->m_multitext->Enable(enabled);
1518 m_panel->m_readonly->Enable(enabled);
1519 m_panel->m_limited->Enable(enabled);
1520 m_panel->m_textrich->Enable(enabled);
1521 }
1522
1523 void MyFrame::OnFileSave(wxCommandEvent& WXUNUSED(event))
1524 {
1525 if ( m_panel->m_textrich->SaveFile(wxT("dummy.txt")) )
1526 {
1527 #if wxUSE_FILE
1528 // verify that the fil length is correct (it wasn't under Win95)
1529 wxFile file(wxT("dummy.txt"));
1530 wxLogStatus(this,
1531 wxT("Successfully saved file (text len = %lu, file size = %ld)"),
1532 (unsigned long)m_panel->m_textrich->GetValue().length(),
1533 (long) file.Length());
1534 #endif
1535 }
1536 else
1537 wxLogStatus(this, wxT("Couldn't save the file"));
1538 }
1539
1540 void MyFrame::OnFileLoad(wxCommandEvent& WXUNUSED(event))
1541 {
1542 if ( m_panel->m_textrich->LoadFile(wxT("dummy.txt")) )
1543 {
1544 wxLogStatus(this, wxT("Successfully loaded file"));
1545 }
1546 else
1547 {
1548 wxLogStatus(this, wxT("Couldn't load the file"));
1549 }
1550 }
1551
1552 void MyFrame::OnRichTextTest(wxCommandEvent& WXUNUSED(event))
1553 {
1554 RichTextFrame* frame = new RichTextFrame(this, wxT("Rich Text Editor"));
1555 frame->Show(true);
1556 }
1557
1558 void MyFrame::OnIdle( wxIdleEvent& event )
1559 {
1560 // track the window which has the focus in the status bar
1561 static wxWindow *s_windowFocus = (wxWindow *)NULL;
1562 wxWindow *focus = wxWindow::FindFocus();
1563 if ( focus && (focus != s_windowFocus) )
1564 {
1565 s_windowFocus = focus;
1566
1567 wxString msg;
1568 msg.Printf(
1569 #ifdef __WXMSW__
1570 wxT("Focus: wxWindow = %p, HWND = %p"),
1571 #else
1572 wxT("Focus: wxWindow = %p"),
1573 #endif
1574 s_windowFocus
1575 #ifdef __WXMSW__
1576 , s_windowFocus->GetHWND()
1577 #endif
1578 );
1579
1580 #if wxUSE_STATUSBAR
1581 SetStatusText(msg);
1582 #endif // wxUSE_STATUSBAR
1583 }
1584 event.Skip();
1585 }
1586
1587 /*
1588 * RichTextFrame is used to demonstrate rich text behaviour
1589 */
1590
1591 enum
1592 {
1593 RICHTEXT_CLOSE = 1000,
1594 RICHTEXT_LEFT_ALIGN,
1595 RICHTEXT_RIGHT_ALIGN,
1596 RICHTEXT_CENTRE,
1597 RICHTEXT_JUSTIFY,
1598 RICHTEXT_CHANGE_FONT,
1599 RICHTEXT_CHANGE_TEXT_COLOUR,
1600 RICHTEXT_CHANGE_BACKGROUND_COLOUR,
1601 RICHTEXT_LEFT_INDENT,
1602 RICHTEXT_RIGHT_INDENT,
1603 RICHTEXT_TAB_STOPS
1604 };
1605
1606 BEGIN_EVENT_TABLE(RichTextFrame, wxFrame)
1607 EVT_IDLE(RichTextFrame::OnIdle)
1608 EVT_MENU(RICHTEXT_CLOSE, RichTextFrame::OnClose)
1609 EVT_MENU(RICHTEXT_LEFT_ALIGN, RichTextFrame::OnLeftAlign)
1610 EVT_MENU(RICHTEXT_RIGHT_ALIGN, RichTextFrame::OnRightAlign)
1611 EVT_MENU(RICHTEXT_CENTRE, RichTextFrame::OnCentre)
1612 EVT_MENU(RICHTEXT_JUSTIFY, RichTextFrame::OnJustify)
1613 EVT_MENU(RICHTEXT_CHANGE_FONT, RichTextFrame::OnChangeFont)
1614 EVT_MENU(RICHTEXT_CHANGE_TEXT_COLOUR, RichTextFrame::OnChangeTextColour)
1615 EVT_MENU(RICHTEXT_CHANGE_BACKGROUND_COLOUR, RichTextFrame::OnChangeBackgroundColour)
1616 EVT_MENU(RICHTEXT_LEFT_INDENT, RichTextFrame::OnLeftIndent)
1617 EVT_MENU(RICHTEXT_RIGHT_INDENT, RichTextFrame::OnRightIndent)
1618 EVT_MENU(RICHTEXT_TAB_STOPS, RichTextFrame::OnTabStops)
1619 END_EVENT_TABLE()
1620
1621 RichTextFrame::RichTextFrame(wxWindow* parent, const wxString& title):
1622 wxFrame(parent, wxID_ANY, title, wxDefaultPosition, wxSize(300, 400))
1623 {
1624 m_currentPosition = -1;
1625 m_textCtrl = new wxTextCtrl(this, wxID_ANY, wxEmptyString, wxDefaultPosition,
1626 wxDefaultSize, wxTE_MULTILINE|wxTE_RICH2);
1627
1628 wxString value;
1629 int i;
1630 for (i = 0; i < 10; i++)
1631 {
1632 int j;
1633 for (j = 0; j < 10; j++)
1634 {
1635 value << wxT("Hello, welcome to a very simple rich text editor. You can set some character and paragraph styles from the Edit menu. ");
1636 }
1637 value << wxT("\n\n");
1638 }
1639 m_textCtrl->SetValue(value);
1640
1641 wxMenuBar* menuBar = new wxMenuBar;
1642 wxMenu* fileMenu = new wxMenu;
1643 fileMenu->Append(RICHTEXT_CLOSE, _("Close\tCtrl+W"));
1644 menuBar->Append(fileMenu, _("File"));
1645
1646 wxMenu* editMenu = new wxMenu;
1647 editMenu->Append(RICHTEXT_LEFT_ALIGN, _("Left Align"));
1648 editMenu->Append(RICHTEXT_RIGHT_ALIGN, _("Right Align"));
1649 editMenu->Append(RICHTEXT_CENTRE, _("Centre"));
1650 editMenu->Append(RICHTEXT_JUSTIFY, _("Justify"));
1651 editMenu->AppendSeparator();
1652 editMenu->Append(RICHTEXT_CHANGE_FONT, _("Change Font"));
1653 editMenu->Append(RICHTEXT_CHANGE_TEXT_COLOUR, _("Change Text Colour"));
1654 editMenu->Append(RICHTEXT_CHANGE_BACKGROUND_COLOUR, _("Change Background Colour"));
1655 editMenu->AppendSeparator();
1656 editMenu->Append(RICHTEXT_LEFT_INDENT, _("Left Indent"));
1657 editMenu->Append(RICHTEXT_RIGHT_INDENT, _("Right Indent"));
1658 editMenu->Append(RICHTEXT_TAB_STOPS, _("Tab Stops"));
1659 menuBar->Append(editMenu, _("Edit"));
1660
1661 SetMenuBar(menuBar);
1662 #if wxUSE_STATUSBAR
1663 CreateStatusBar();
1664 #endif // wxUSE_STATUSBAR
1665 }
1666
1667 // Event handlers
1668
1669 void RichTextFrame::OnClose(wxCommandEvent& WXUNUSED(event))
1670 {
1671 Close(true);
1672 }
1673
1674 void RichTextFrame::OnLeftAlign(wxCommandEvent& WXUNUSED(event))
1675 {
1676 wxTextAttr attr;
1677 attr.SetAlignment(wxTEXT_ALIGNMENT_LEFT);
1678
1679 long start, end;
1680 m_textCtrl->GetSelection(& start, & end);
1681 m_textCtrl->SetStyle(start, end, attr);
1682
1683 m_currentPosition = -1;
1684 }
1685
1686 void RichTextFrame::OnRightAlign(wxCommandEvent& WXUNUSED(event))
1687 {
1688 wxTextAttr attr;
1689 attr.SetAlignment(wxTEXT_ALIGNMENT_RIGHT);
1690
1691 long start, end;
1692 m_textCtrl->GetSelection(& start, & end);
1693 m_textCtrl->SetStyle(start, end, attr);
1694
1695 m_currentPosition = -1;
1696 }
1697
1698 void RichTextFrame::OnJustify(wxCommandEvent& WXUNUSED(event))
1699 {
1700 wxTextAttr attr;
1701 attr.SetAlignment(wxTEXT_ALIGNMENT_JUSTIFIED);
1702
1703 long start, end;
1704 m_textCtrl->GetSelection(& start, & end);
1705 m_textCtrl->SetStyle(start, end, attr);
1706
1707 m_currentPosition = -1;
1708 }
1709
1710 void RichTextFrame::OnCentre(wxCommandEvent& WXUNUSED(event))
1711 {
1712 wxTextAttr attr;
1713 attr.SetAlignment(wxTEXT_ALIGNMENT_CENTRE);
1714
1715 long start, end;
1716 m_textCtrl->GetSelection(& start, & end);
1717 m_textCtrl->SetStyle(start, end, attr);
1718
1719 m_currentPosition = -1;
1720 }
1721
1722 void RichTextFrame::OnChangeFont(wxCommandEvent& WXUNUSED(event))
1723 {
1724 wxFontData data;
1725
1726 wxFontDialog dialog(this, data);
1727
1728 if (dialog.ShowModal() == wxID_OK)
1729 {
1730 wxFontData retData = dialog.GetFontData();
1731 wxFont font = retData.GetChosenFont();
1732
1733 wxTextAttr attr;
1734 attr.SetFont(font);
1735
1736 long start, end;
1737 m_textCtrl->GetSelection(& start, & end);
1738 m_textCtrl->SetStyle(start, end, attr);
1739
1740 m_currentPosition = -1;
1741 }
1742 }
1743
1744 void RichTextFrame::OnChangeTextColour(wxCommandEvent& WXUNUSED(event))
1745 {
1746 wxColourData data;
1747 data.SetColour(* wxBLACK);
1748 data.SetChooseFull(true);
1749 for (int i = 0; i < 16; i++)
1750 {
1751 wxColour colour((unsigned char)(i*16), (unsigned char)(i*16), (unsigned char)(i*16));
1752 data.SetCustomColour(i, colour);
1753 }
1754
1755 wxColourDialog dialog(this, &data);
1756 dialog.SetTitle(wxT("Choose the text colour"));
1757 if (dialog.ShowModal() == wxID_OK)
1758 {
1759 wxColourData retData = dialog.GetColourData();
1760 wxColour col = retData.GetColour();
1761
1762 wxTextAttr attr;
1763 attr.SetTextColour(col);
1764
1765 long start, end;
1766 m_textCtrl->GetSelection(& start, & end);
1767 m_textCtrl->SetStyle(start, end, attr);
1768
1769 m_currentPosition = -1;
1770 }
1771 }
1772
1773 void RichTextFrame::OnChangeBackgroundColour(wxCommandEvent& WXUNUSED(event))
1774 {
1775 wxColourData data;
1776 data.SetColour(* wxWHITE);
1777 data.SetChooseFull(true);
1778 for (int i = 0; i < 16; i++)
1779 {
1780 wxColour colour((unsigned char)(i*16), (unsigned char)(i*16), (unsigned char)(i*16));
1781 data.SetCustomColour(i, colour);
1782 }
1783
1784 wxColourDialog dialog(this, &data);
1785 dialog.SetTitle(wxT("Choose the text background colour"));
1786 if (dialog.ShowModal() == wxID_OK)
1787 {
1788 wxColourData retData = dialog.GetColourData();
1789 wxColour col = retData.GetColour();
1790
1791 wxTextAttr attr;
1792 attr.SetBackgroundColour(col);
1793
1794 long start, end;
1795 m_textCtrl->GetSelection(& start, & end);
1796 m_textCtrl->SetStyle(start, end, attr);
1797
1798 m_currentPosition = -1;
1799 }
1800 }
1801
1802 void RichTextFrame::OnLeftIndent(wxCommandEvent& WXUNUSED(event))
1803 {
1804 wxString indentStr = wxGetTextFromUser
1805 (
1806 _("Please enter the left indent in tenths of a millimetre."),
1807 _("Left Indent"),
1808 wxEmptyString,
1809 this
1810 );
1811 if (!indentStr.IsEmpty())
1812 {
1813 int indent = wxAtoi(indentStr);
1814
1815 wxTextAttr attr;
1816 attr.SetLeftIndent(indent);
1817
1818 long start, end;
1819 m_textCtrl->GetSelection(& start, & end);
1820 m_textCtrl->SetStyle(start, end, attr);
1821
1822 m_currentPosition = -1;
1823 }
1824 }
1825
1826 void RichTextFrame::OnRightIndent(wxCommandEvent& WXUNUSED(event))
1827 {
1828 wxString indentStr = wxGetTextFromUser
1829 (
1830 _("Please enter the right indent in tenths of a millimetre."),
1831 _("Right Indent"),
1832 wxEmptyString,
1833 this
1834 );
1835 if (!indentStr.IsEmpty())
1836 {
1837 int indent = wxAtoi(indentStr);
1838
1839 wxTextAttr attr;
1840 attr.SetRightIndent(indent);
1841
1842 long start, end;
1843 m_textCtrl->GetSelection(& start, & end);
1844 m_textCtrl->SetStyle(start, end, attr);
1845
1846 m_currentPosition = -1;
1847 }
1848 }
1849
1850 void RichTextFrame::OnTabStops(wxCommandEvent& WXUNUSED(event))
1851 {
1852 wxString tabsStr = wxGetTextFromUser
1853 (
1854 _("Please enter the tab stop positions in tenths of a millimetre, separated by spaces.\nLeave empty to reset tab stops."),
1855 _("Tab Stops"),
1856 wxEmptyString,
1857 this
1858 );
1859
1860 wxArrayInt tabs;
1861
1862 wxStringTokenizer tokens(tabsStr, wxT(" "));
1863 while (tokens.HasMoreTokens())
1864 {
1865 wxString token = tokens.GetNextToken();
1866 tabs.Add(wxAtoi(token));
1867 }
1868
1869 wxTextAttr attr;
1870 attr.SetTabs(tabs);
1871
1872 long start, end;
1873 m_textCtrl->GetSelection(& start, & end);
1874 m_textCtrl->SetStyle(start, end, attr);
1875
1876 m_currentPosition = -1;
1877 }
1878
1879 void RichTextFrame::OnIdle(wxIdleEvent& WXUNUSED(event))
1880 {
1881 long insertionPoint = m_textCtrl->GetInsertionPoint();
1882 if (insertionPoint != m_currentPosition)
1883 {
1884 #if wxUSE_STATUSBAR
1885 wxTextAttr attr;
1886 if (m_textCtrl->GetStyle(insertionPoint, attr))
1887 {
1888 wxString msg;
1889 wxString facename(wxT("unknown"));
1890 if (attr.GetFont().IsOk())
1891 {
1892 facename = attr.GetFont().GetFaceName();
1893 }
1894 wxString alignment(wxT("unknown alignment"));
1895 if (attr.GetAlignment() == wxTEXT_ALIGNMENT_CENTRE)
1896 alignment = wxT("centred");
1897 else if (attr.GetAlignment() == wxTEXT_ALIGNMENT_RIGHT)
1898 alignment = wxT("right-aligned");
1899 else if (attr.GetAlignment() == wxTEXT_ALIGNMENT_LEFT)
1900 alignment = wxT("left-aligned");
1901 else if (attr.GetAlignment() == wxTEXT_ALIGNMENT_JUSTIFIED)
1902 alignment = wxT("justified");
1903
1904 msg.Printf("Facename: %s", facename);
1905
1906 if (attr.HasTextColour())
1907 {
1908 msg += wxString::Format(", colour: %s",
1909 attr.GetTextColour().GetAsString());
1910 }
1911 else
1912 {
1913 msg += ", no colour";
1914 }
1915
1916 msg << ", " << alignment;
1917
1918 if (attr.HasFont())
1919 {
1920 if (attr.GetFont().GetWeight() == wxBOLD)
1921 msg += wxT(" BOLD");
1922 else if (attr.GetFont().GetWeight() == wxNORMAL)
1923 msg += wxT(" NORMAL");
1924
1925 if (attr.GetFont().GetStyle() == wxITALIC)
1926 msg += wxT(" ITALIC");
1927
1928 if (attr.GetFont().GetUnderlined())
1929 msg += wxT(" UNDERLINED");
1930 }
1931
1932 SetStatusText(msg);
1933 }
1934 #endif // wxUSE_STATUSBAR
1935 m_currentPosition = insertionPoint;
1936 }
1937 }