]> git.saurik.com Git - wxWidgets.git/blame_incremental - samples/text/text.cpp
projects / wxWidgets.git / blame_incremental
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (non-incremental) | history | HEAD
updated opengl
[wxWidgets.git] / samples / text / text.cpp
... / ...
CommitLineData
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 interface "text.cpp"
13 #pragma implementation "text.cpp"
14#endif
15
16// For compilers that support precompilation, includes "wx/wx.h".
17#include "wx/wxprec.h"
18
19#ifdef __BORLANDC__
20 #pragma hdrstop
21#endif
22
23#ifndef WX_PRECOMP
24 #include "wx/wx.h"
25#endif
26
27#if wxUSE_CLIPBOARD
28 #include "wx/dataobj.h"
29 #include "wx/clipbrd.h"
30#endif
31
32#if wxUSE_FILE
33 #include "wx/file.h"
34#endif
35
36#if wxUSE_TOOLTIPS
37 #include "wx/tooltip.h"
38#endif
39
40// We test for wxUSE_DRAG_AND_DROP also, because data objects may not be
41// implemented for compilers that can't cope with the OLE parts in
42// wxUSE_DRAG_AND_DROP.
43#if !wxUSE_DRAG_AND_DROP
44 #undef wxUSE_CLIPBOARD
45 #define wxUSE_CLIPBOARD 0
46#endif
47
48//----------------------------------------------------------------------
49// class definitions
50//----------------------------------------------------------------------
51
52class MyApp: public wxApp
53{
54public:
55 bool OnInit();
56};
57
58// a text ctrl which allows to call different wxTextCtrl functions
59// interactively by pressing function keys in it
60class MyTextCtrl : public wxTextCtrl
61{
62public:
63 MyTextCtrl(wxWindow *parent, wxWindowID id, const wxString &value,
64 const wxPoint &pos, const wxSize &size, int style = 0)
65 : wxTextCtrl(parent, id, value, pos, size, style) { m_hasCapture = FALSE; }
66
67 void OnKeyDown(wxKeyEvent& event);
68 void OnKeyUp(wxKeyEvent& event);
69 void OnChar(wxKeyEvent& event);
70 void OnText(wxCommandEvent& event);
71 void OnMouseEvent(wxMouseEvent& event);
72
73 bool m_hasCapture;
74
75private:
76 static inline wxChar GetChar(bool on, wxChar c) { return on ? c : _T('-'); }
77 void LogEvent(const wxChar *name, wxKeyEvent& event) const;
78
79 DECLARE_EVENT_TABLE()
80};
81
82class MyPanel: public wxPanel
83{
84public:
85 MyPanel(wxFrame *frame, int x, int y, int w, int h);
86
87#if wxUSE_CLIPBOARD
88 void DoPasteFromClipboard();
89 void DoCopyToClipboard();
90#endif // wxUSE_CLIPBOARD
91
92 void DoMoveToEndOfText();
93 void DoMoveToEndOfEntry();
94
95 void OnSize( wxSizeEvent &event );
96
97 MyTextCtrl *m_text;
98 MyTextCtrl *m_password;
99 MyTextCtrl *m_enter;
100 MyTextCtrl *m_tab;
101 MyTextCtrl *m_readonly;
102
103 MyTextCtrl *m_multitext;
104 MyTextCtrl *m_horizontal;
105
106 MyTextCtrl *m_textrich;
107
108 wxTextCtrl *m_log;
109
110private:
111 DECLARE_EVENT_TABLE()
112};
113
114class MyFrame: public wxFrame
115{
116public:
117 MyFrame(wxFrame *frame, const char *title, int x, int y, int w, int h);
118
119 void OnQuit(wxCommandEvent& event);
120 void OnAbout(wxCommandEvent& event);
121#if wxUSE_TOOLTIPS
122 void OnSetTooltipDelay(wxCommandEvent& event);
123 void OnToggleTooltips(wxCommandEvent& event);
124#endif // wxUSE_TOOLTIPS
125
126#if wxUSE_CLIPBOARD
127 void OnPasteFromClipboard( wxCommandEvent &event )
128 { m_panel->DoPasteFromClipboard(); }
129 void OnCopyToClipboard( wxCommandEvent &event )
130 { m_panel->DoCopyToClipboard(); }
131#endif // wxUSE_CLIPBOARD
132
133 void OnMoveToEndOfText( wxCommandEvent &event )
134 { m_panel->DoMoveToEndOfText(); }
135 void OnMoveToEndOfEntry( wxCommandEvent &event )
136 { m_panel->DoMoveToEndOfEntry(); }
137
138 void OnLogClear(wxCommandEvent& event);
139 void OnFileSave(wxCommandEvent& event);
140 void OnFileLoad(wxCommandEvent& event);
141
142 void OnSetEditable(wxCommandEvent& event);
143 void OnSetEnabled(wxCommandEvent& event);
144
145 void OnIdle( wxIdleEvent& event );
146
147private:
148 MyPanel *m_panel;
149
150 DECLARE_EVENT_TABLE()
151};
152
153//----------------------------------------------------------------------
154// main()
155//----------------------------------------------------------------------
156
157IMPLEMENT_APP(MyApp)
158
159//----------------------------------------------------------------------
160// MyApp
161//----------------------------------------------------------------------
162
163enum
164{
165 TEXT_QUIT = 100,
166 TEXT_ABOUT,
167 TEXT_LOAD,
168 TEXT_SAVE,
169 TEXT_CLEAR,
170
171 // clipboard menu
172 TEXT_CLIPBOARD_COPY = 200,
173 TEXT_CLIPBOARD_PASTE,
174
175 // tooltip menu
176 TEXT_TOOLTIPS_SETDELAY = 300,
177 TEXT_TOOLTIPS_ENABLE,
178
179 // text menu
180 TEXT_MOVE_ENDTEXT = 400,
181 TEXT_MOVE_ENDENTRY,
182 TEXT_SET_EDITABLE,
183 TEXT_SET_ENABLED
184};
185
186bool MyApp::OnInit()
187{
188 // Create the main frame window
189 MyFrame *frame = new MyFrame((wxFrame *) NULL,
190 "Text wxWindows sample", 50, 50, 660, 420);
191 frame->SetSizeHints( 500, 400 );
192
193 wxMenu *file_menu = new wxMenu;
194 file_menu->Append(TEXT_CLEAR, "&Clear the log\tCtrl-C",
195 "Clear the log window contents");
196 file_menu->Append(TEXT_SAVE, "&Save file\tCtrl-S",
197 "Save the text control contents to file");
198 file_menu->Append(TEXT_LOAD, "&Load file\tCtrl-O",
199 "Load the sample file into text control");
200 file_menu->AppendSeparator();
201 file_menu->Append(TEXT_ABOUT, "&About\tAlt-A");
202 file_menu->AppendSeparator();
203 file_menu->Append(TEXT_QUIT, "E&xit\tAlt-X", "Quit this sample");
204
205 wxMenuBar *menu_bar = new wxMenuBar( wxMB_DOCKABLE );
206 menu_bar->Append(file_menu, "&File");
207
208#if wxUSE_TOOLTIPS
209 wxMenu *tooltip_menu = new wxMenu;
210 tooltip_menu->Append(TEXT_TOOLTIPS_SETDELAY, "Set &delay\tCtrl-D");
211 tooltip_menu->AppendSeparator();
212 tooltip_menu->Append(TEXT_TOOLTIPS_ENABLE, "&Toggle tooltips\tCtrl-T",
213 "enable/disable tooltips", TRUE);
214 tooltip_menu->Check(TEXT_TOOLTIPS_ENABLE, TRUE);
215 menu_bar->Append(tooltip_menu, "&Tooltips");
216#endif // wxUSE_TOOLTIPS
217
218#if wxUSE_CLIPBOARD
219 wxMenu *menuClipboard = new wxMenu;
220 menuClipboard->Append(TEXT_CLIPBOARD_COPY, "&Copy\tCtrl-C",
221 "Copy the first line to the clipboard");
222 menuClipboard->Append(TEXT_CLIPBOARD_PASTE, "&Paste\tCtrl-V",
223 "Paste from clipboard to the text control");
224 menu_bar->Append(menuClipboard, "&Clipboard");
225#endif // wxUSE_CLIPBOARD
226
227 wxMenu *menuText = new wxMenu;
228 menuText->Append(TEXT_MOVE_ENDTEXT, "Move cursor to the end of &text");
229 menuText->Append(TEXT_MOVE_ENDENTRY, "Move cursor to the end of &entry");
230 menuText->Append(TEXT_SET_EDITABLE, "Toggle &editable state", "", TRUE);
231 menuText->Append(TEXT_SET_ENABLED, "Toggle e&nabled state", "", TRUE);
232 menuText->Check(TEXT_SET_EDITABLE, TRUE);
233 menuText->Check(TEXT_SET_ENABLED, TRUE);
234 menu_bar->Append(menuText, "&Text");
235
236 frame->SetMenuBar(menu_bar);
237
238 frame->Show(TRUE);
239
240 SetTopWindow(frame);
241
242 // report success
243 return TRUE;
244}
245
246//----------------------------------------------------------------------
247// MyTextCtrl
248//----------------------------------------------------------------------
249
250BEGIN_EVENT_TABLE(MyTextCtrl, wxTextCtrl)
251 EVT_KEY_DOWN(MyTextCtrl::OnKeyDown)
252 EVT_KEY_UP(MyTextCtrl::OnKeyUp)
253 EVT_CHAR(MyTextCtrl::OnChar)
254 EVT_TEXT(-1, MyTextCtrl::OnText)
255 EVT_MOUSE_EVENTS(MyTextCtrl::OnMouseEvent)
256END_EVENT_TABLE()
257
258void MyTextCtrl::LogEvent(const wxChar *name, wxKeyEvent& event) const
259{
260 wxString key;
261 long keycode = event.KeyCode();
262 {
263 switch ( keycode )
264 {
265 case WXK_BACK: key = "BACK"; break;
266 case WXK_TAB: key = "TAB"; break;
267 case WXK_RETURN: key = "RETURN"; break;
268 case WXK_ESCAPE: key = "ESCAPE"; break;
269 case WXK_SPACE: key = "SPACE"; break;
270 case WXK_DELETE: key = "DELETE"; break;
271 case WXK_START: key = "START"; break;
272 case WXK_LBUTTON: key = "LBUTTON"; break;
273 case WXK_RBUTTON: key = "RBUTTON"; break;
274 case WXK_CANCEL: key = "CANCEL"; break;
275 case WXK_MBUTTON: key = "MBUTTON"; break;
276 case WXK_CLEAR: key = "CLEAR"; break;
277 case WXK_SHIFT: key = "SHIFT"; break;
278 case WXK_ALT: key = "ALT"; break;
279 case WXK_CONTROL: key = "CONTROL"; break;
280 case WXK_MENU: key = "MENU"; break;
281 case WXK_PAUSE: key = "PAUSE"; break;
282 case WXK_CAPITAL: key = "CAPITAL"; break;
283 case WXK_PRIOR: key = "PRIOR"; break;
284 case WXK_NEXT: key = "NEXT"; break;
285 case WXK_END: key = "END"; break;
286 case WXK_HOME: key = "HOME"; break;
287 case WXK_LEFT: key = "LEFT"; break;
288 case WXK_UP: key = "UP"; break;
289 case WXK_RIGHT: key = "RIGHT"; break;
290 case WXK_DOWN: key = "DOWN"; break;
291 case WXK_SELECT: key = "SELECT"; break;
292 case WXK_PRINT: key = "PRINT"; break;
293 case WXK_EXECUTE: key = "EXECUTE"; break;
294 case WXK_SNAPSHOT: key = "SNAPSHOT"; break;
295 case WXK_INSERT: key = "INSERT"; break;
296 case WXK_HELP: key = "HELP"; break;
297 case WXK_NUMPAD0: key = "NUMPAD0"; break;
298 case WXK_NUMPAD1: key = "NUMPAD1"; break;
299 case WXK_NUMPAD2: key = "NUMPAD2"; break;
300 case WXK_NUMPAD3: key = "NUMPAD3"; break;
301 case WXK_NUMPAD4: key = "NUMPAD4"; break;
302 case WXK_NUMPAD5: key = "NUMPAD5"; break;
303 case WXK_NUMPAD6: key = "NUMPAD6"; break;
304 case WXK_NUMPAD7: key = "NUMPAD7"; break;
305 case WXK_NUMPAD8: key = "NUMPAD8"; break;
306 case WXK_NUMPAD9: key = "NUMPAD9"; break;
307 case WXK_MULTIPLY: key = "MULTIPLY"; break;
308 case WXK_ADD: key = "ADD"; break;
309 case WXK_SEPARATOR: key = "SEPARATOR"; break;
310 case WXK_SUBTRACT: key = "SUBTRACT"; break;
311 case WXK_DECIMAL: key = "DECIMAL"; break;
312 case WXK_DIVIDE: key = "DIVIDE"; break;
313 case WXK_F1: key = "F1"; break;
314 case WXK_F2: key = "F2"; break;
315 case WXK_F3: key = "F3"; break;
316 case WXK_F4: key = "F4"; break;
317 case WXK_F5: key = "F5"; break;
318 case WXK_F6: key = "F6"; break;
319 case WXK_F7: key = "F7"; break;
320 case WXK_F8: key = "F8"; break;
321 case WXK_F9: key = "F9"; break;
322 case WXK_F10: key = "F10"; break;
323 case WXK_F11: key = "F11"; break;
324 case WXK_F12: key = "F12"; break;
325 case WXK_F13: key = "F13"; break;
326 case WXK_F14: key = "F14"; break;
327 case WXK_F15: key = "F15"; break;
328 case WXK_F16: key = "F16"; break;
329 case WXK_F17: key = "F17"; break;
330 case WXK_F18: key = "F18"; break;
331 case WXK_F19: key = "F19"; break;
332 case WXK_F20: key = "F20"; break;
333 case WXK_F21: key = "F21"; break;
334 case WXK_F22: key = "F22"; break;
335 case WXK_F23: key = "F23"; break;
336 case WXK_F24: key = "F24"; break;
337 case WXK_NUMLOCK: key = "NUMLOCK"; break;
338 case WXK_SCROLL: key = "SCROLL"; break;
339 case WXK_PAGEUP: key = "PAGEUP"; break;
340 case WXK_PAGEDOWN: key = "PAGEDOWN"; break;
341 case WXK_NUMPAD_SPACE: key = "NUMPAD_SPACE"; break;
342 case WXK_NUMPAD_TAB: key = "NUMPAD_TAB"; break;
343 case WXK_NUMPAD_ENTER: key = "NUMPAD_ENTER"; break;
344 case WXK_NUMPAD_F1: key = "NUMPAD_F1"; break;
345 case WXK_NUMPAD_F2: key = "NUMPAD_F2"; break;
346 case WXK_NUMPAD_F3: key = "NUMPAD_F3"; break;
347 case WXK_NUMPAD_F4: key = "NUMPAD_F4"; break;
348 case WXK_NUMPAD_HOME: key = "NUMPAD_HOME"; break;
349 case WXK_NUMPAD_LEFT: key = "NUMPAD_LEFT"; break;
350 case WXK_NUMPAD_UP: key = "NUMPAD_UP"; break;
351 case WXK_NUMPAD_RIGHT: key = "NUMPAD_RIGHT"; break;
352 case WXK_NUMPAD_DOWN: key = "NUMPAD_DOWN"; break;
353 case WXK_NUMPAD_PRIOR: key = "NUMPAD_PRIOR"; break;
354 case WXK_NUMPAD_PAGEUP: key = "NUMPAD_PAGEUP"; break;
355 case WXK_NUMPAD_PAGEDOWN: key = "NUMPAD_PAGEDOWN"; break;
356 case WXK_NUMPAD_END: key = "NUMPAD_END"; break;
357 case WXK_NUMPAD_BEGIN: key = "NUMPAD_BEGIN"; break;
358 case WXK_NUMPAD_INSERT: key = "NUMPAD_INSERT"; break;
359 case WXK_NUMPAD_DELETE: key = "NUMPAD_DELETE"; break;
360 case WXK_NUMPAD_EQUAL: key = "NUMPAD_EQUAL"; break;
361 case WXK_NUMPAD_MULTIPLY: key = "NUMPAD_MULTIPLY"; break;
362 case WXK_NUMPAD_ADD: key = "NUMPAD_ADD"; break;
363 case WXK_NUMPAD_SEPARATOR: key = "NUMPAD_SEPARATOR"; break;
364 case WXK_NUMPAD_SUBTRACT: key = "NUMPAD_SUBTRACT"; break;
365 case WXK_NUMPAD_DECIMAL: key = "NUMPAD_DECIMAL"; break;
366
367 default:
368 {
369 if ( wxIsprint((int)keycode) )
370 key.Printf( _T("'%c'") , (char)keycode);
371 else
372 key.Printf( _T("unknown (%ld)"), keycode);
373 }
374 }
375 }
376
377 wxLogMessage( _T("%s event: %s (flags = %c%c%c%c)"),
378 name,
379 key.c_str(),
380 GetChar( event.ControlDown(), _T('C') ),
381 GetChar( event.AltDown(), _T('A') ),
382 GetChar( event.ShiftDown(), _T('S') ),
383 GetChar( event.MetaDown(), _T('M') ) );
384}
385
386void MyTextCtrl::OnMouseEvent(wxMouseEvent& ev)
387{
388 if ( !ev.Moving() )
389 {
390 wxString msg;
391 if ( ev.Entering() )
392 {
393 msg = _T("Mouse entered the window");
394 }
395 else if ( ev.Leaving() )
396 {
397 msg = _T("Mouse left the window");
398 }
399 else
400 {
401 // click event
402 wxString button;
403 bool dbl, up;
404 if ( ev.LeftDown() || ev.LeftUp() || ev.LeftDClick() )
405 {
406 button = _T("Left");
407 dbl = ev.LeftDClick();
408 up = ev.LeftUp();
409 }
410 else if ( ev.MiddleDown() || ev.MiddleUp() || ev.MiddleDClick() )
411 {
412 button = _T("Middle");
413 dbl = ev.MiddleDClick();
414 up = ev.MiddleUp();
415 }
416 else if ( ev.RightDown() || ev.RightUp() || ev.RightDClick() )
417 {
418 button = _T("Right");
419 dbl = ev.RightDClick();
420 up = ev.RightUp();
421 }
422 else
423 {
424 wxLogStatus(_T("Unknown mouse event"));
425 return;
426 }
427
428 msg.Printf(_T("%s mouse button %s"),
429 button.c_str(),
430 dbl ? _T("double clicked")
431 : up ? _T("released") : _T("clicked"));
432 }
433
434 msg << _T(" at (") << ev.GetX() << _T(", ") << ev.GetY() << _T(") ")
435 << _T("Flags: ")
436 << GetChar( ev.LeftIsDown(), _T('1') )
437 << GetChar( ev.MiddleIsDown(), _T('2') )
438 << GetChar( ev.RightIsDown(), _T('3') )
439 << GetChar( ev.ControlDown(), _T('C') )
440 << GetChar( ev.AltDown(), _T('A') )
441 << GetChar( ev.ShiftDown(), _T('S') )
442 << GetChar( ev.MetaDown(), _T('M') );
443
444 wxLogMessage(msg);
445 }
446 //else: we're not interested in mouse move events
447
448 ev.Skip();
449}
450
451void MyTextCtrl::OnText(wxCommandEvent& event)
452{
453 MyTextCtrl *win = (MyTextCtrl *)event.GetEventObject();
454 const wxChar *data = (const wxChar *)(win->GetClientData());
455 if ( data )
456 {
457 wxLogMessage(_T("Text changed in control '%s'"), data);
458 }
459 else
460 {
461 wxLogMessage(_T("Text changed in some control"));
462 }
463}
464
465void MyTextCtrl::OnChar(wxKeyEvent& event)
466{
467 LogEvent( _T("Char"), event);
468
469/* How are we supposed to test wxTE_PROCESS_TAB with this code?
470
471 if ( event.KeyCode() == WXK_TAB )
472 {
473 WriteText("\t");
474 }
475 else
476 {
477 event.Skip();
478 }
479*/
480 event.Skip();
481}
482
483void MyTextCtrl::OnKeyUp(wxKeyEvent& event)
484{
485 LogEvent( _T("Key up"), event);
486
487 event.Skip();
488}
489
490void MyTextCtrl::OnKeyDown(wxKeyEvent& event)
491{
492 switch ( event.KeyCode() )
493 {
494 case WXK_F1:
495 // show current position and text length
496 {
497 long line, column, pos = GetInsertionPoint();
498 PositionToXY(pos, &column, &line);
499
500 wxLogMessage( _T("Current position: %ld\n"
501 "Current line, column: (%ld, %ld)\n"
502 "Number of lines: %ld\n"
503 "Current line length: %ld\n"
504 "Total text length: %u (%ld)"),
505 pos,
506 line, column,
507 GetNumberOfLines(),
508 GetLineLength(line),
509 GetValue().length(),
510 GetLastPosition());
511 }
512 break;
513
514 case WXK_F2:
515 // go to the end
516 SetInsertionPointEnd();
517 break;
518
519 case WXK_F3:
520 // go to position 10
521 SetInsertionPoint(10);
522 break;
523
524 case WXK_F4:
525 if (!m_hasCapture)
526 {
527 wxLogDebug( wxT("Now capturing mouse and events.") );
528 m_hasCapture = TRUE;
529 CaptureMouse();
530 }
531 else
532 {
533 wxLogDebug( wxT("Stopped capturing mouse and events.") );
534 m_hasCapture = TRUE;
535 ReleaseMouse();
536 }
537 break;
538
539 case WXK_F5:
540 // insert a blank line
541 WriteText("\n");
542 break;
543
544 case WXK_F6:
545 SetValue("F6 was just pressed.");
546 break;
547
548 case WXK_F7:
549 ShowPosition(10);
550 break;
551 }
552
553 LogEvent( wxT("Key down"), event);
554
555 event.Skip();
556}
557
558//----------------------------------------------------------------------
559// MyPanel
560//----------------------------------------------------------------------
561
562BEGIN_EVENT_TABLE(MyPanel, wxPanel)
563 EVT_SIZE(MyPanel::OnSize)
564END_EVENT_TABLE()
565
566MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h )
567 : wxPanel( frame, -1, wxPoint(x, y), wxSize(w, h) )
568{
569 m_log = new wxTextCtrl( this, -1, "This is the log window.\n", wxPoint(5,260), wxSize(630,100), wxTE_MULTILINE );
570
571 wxLog *old_log = wxLog::SetActiveTarget( new wxLogTextCtrl( m_log ) );
572
573 delete old_log;
574
575 // single line text controls
576
577 m_text = new MyTextCtrl( this, -1, "Single line.",
578 wxPoint(10,10), wxSize(140,-1),
579 wxTE_PROCESS_ENTER);
580 m_text->SetForegroundColour(*wxBLUE);
581 m_text->SetBackgroundColour(*wxLIGHT_GREY);
582 (*m_text) << " Appended.";
583 m_text->SetInsertionPoint(0);
584 m_text->WriteText( "Prepended. " );
585
586 m_password = new MyTextCtrl( this, -1, "",
587 wxPoint(10,50), wxSize(140,-1), wxTE_PASSWORD );
588
589 m_readonly = new MyTextCtrl( this, -1, "Read only",
590 wxPoint(10,90), wxSize(140,-1), wxTE_READONLY );
591
592 // multi line text controls
593
594 m_horizontal = new MyTextCtrl( this, -1, "Multiline text control with a horizontal scrollbar.",
595 wxPoint(10,170), wxSize(140,70), wxTE_MULTILINE | wxHSCROLL );
596
597 // a little hack to use the command line argument for encoding testing
598 if ( wxTheApp->argc == 2 )
599 {
600 switch ( wxTheApp->argv[1][0] )
601 {
602 case '2':
603 m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL,
604 FALSE, "",
605 wxFONTENCODING_ISO8859_2));
606