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