]> git.saurik.com Git - wxWidgets.git/blob - samples/text/text.cpp
projects / wxWidgets.git / blob
? search:


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