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