]> git.saurik.com Git - wxWidgets.git/blob - src/gtk1/textctrl.cpp
wxArray<T> macros have been changed to fix runtime problems under 64 bit
[wxWidgets.git] / src / gtk1 / textctrl.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: textctrl.cpp
3 // Purpose:
4 // Author: Robert Roebling
5 // Id: $Id$
6 // Copyright: (c) 1998 Robert Roebling, Vadim Zeitlin
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
9
10 #ifdef __GNUG__
11 #pragma implementation "textctrl.h"
12 #endif
13
14 #include "wx/textctrl.h"
15 #include "wx/utils.h"
16 #include "wx/intl.h"
17 #include "wx/log.h"
18 #include "wx/settings.h"
19 #include "wx/panel.h"
20
21 #include <sys/types.h>
22 #include <sys/stat.h>
23 #include <ctype.h>
24 #include <math.h> // for fabs
25
26 #include "gdk/gdk.h"
27 #include "gtk/gtk.h"
28 #include "gdk/gdkkeysyms.h"
29
30 //-----------------------------------------------------------------------------
31 // idle system
32 //-----------------------------------------------------------------------------
33
34 extern void wxapp_install_idle_handler();
35 extern bool g_isIdle;
36
37 //-----------------------------------------------------------------------------
38 // data
39 //-----------------------------------------------------------------------------
40
41 extern bool g_blockEventsOnDrag;
42 extern wxCursor g_globalCursor;
43
44 // ----------------------------------------------------------------------------
45 // helpers
46 // ----------------------------------------------------------------------------
47
48 static void wxGtkTextInsert(GtkWidget *text,
49 const wxTextAttr& attr,
50 const char *txt,
51 size_t len)
52 {
53 GdkFont *font = attr.HasFont() ? attr.GetFont().GetInternalFont()
54 : NULL;
55
56 GdkColor *colFg = attr.HasTextColour() ? attr.GetTextColour().GetColor()
57 : NULL;
58
59 GdkColor *colBg = attr.HasBackgroundColour()
60 ? attr.GetBackgroundColour().GetColor()
61 : NULL;
62
63 gtk_text_insert( GTK_TEXT(text), font, colFg, colBg, txt, len );
64 }
65
66 // ----------------------------------------------------------------------------
67 // "insert_text" for GtkEntry
68 // ----------------------------------------------------------------------------
69
70 static void
71 gtk_insert_text_callback(GtkEditable *editable,
72 const gchar *new_text,
73 gint new_text_length,
74 gint *position,
75 wxTextCtrl *win)
76 {
77 if (g_isIdle)
78 wxapp_install_idle_handler();
79
80 // we should only be called if we have a max len limit at all
81 GtkEntry *entry = GTK_ENTRY (editable);
82
83 wxCHECK_RET( entry->text_max_length, _T("shouldn't be called") );
84
85 // check that we don't overflow the max length limit
86 //
87 // FIXME: this doesn't work when we paste a string which is going to be
88 // truncated
89 if ( entry->text_length == entry->text_max_length )
90 {
91 // we don't need to run the base class version at all
92 gtk_signal_emit_stop_by_name(GTK_OBJECT(editable), "insert_text");
93
94 // remember that the next changed signal is to be ignored to avoid
95 // generating a dummy wxEVT_COMMAND_TEXT_UPDATED event
96 win->IgnoreNextTextUpdate();
97
98 // and generate the correct one ourselves
99 wxCommandEvent event(wxEVT_COMMAND_TEXT_MAXLEN, win->GetId());
100 event.SetEventObject(win);
101 event.SetString(win->GetValue());
102 win->GetEventHandler()->ProcessEvent( event );
103 }
104 }
105
106 //-----------------------------------------------------------------------------
107 // "changed"
108 //-----------------------------------------------------------------------------
109
110 static void
111 gtk_text_changed_callback( GtkWidget *widget, wxTextCtrl *win )
112 {
113 if ( win->IgnoreTextUpdate() )
114 return;
115
116 if (!win->m_hasVMT) return;
117
118 if (g_isIdle)
119 wxapp_install_idle_handler();
120
121 win->SetModified();
122 win->UpdateFontIfNeeded();
123
124 wxCommandEvent event( wxEVT_COMMAND_TEXT_UPDATED, win->GetId() );
125 event.SetEventObject( win );
126 event.SetString( win->GetValue() );
127 win->GetEventHandler()->ProcessEvent( event );
128 }
129
130 //-----------------------------------------------------------------------------
131 // "changed" from vertical scrollbar
132 //-----------------------------------------------------------------------------
133
134 static void
135 gtk_scrollbar_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win )
136 {
137 if (!win->m_hasVMT) return;
138
139 if (g_isIdle)
140 wxapp_install_idle_handler();
141
142 win->CalculateScrollbar();
143 }
144
145 //-----------------------------------------------------------------------------
146 // wxTextCtrl
147 //-----------------------------------------------------------------------------
148
149 IMPLEMENT_DYNAMIC_CLASS(wxTextCtrl,wxControl)
150
151 BEGIN_EVENT_TABLE(wxTextCtrl, wxControl)
152 EVT_CHAR(wxTextCtrl::OnChar)
153
154 EVT_MENU(wxID_CUT, wxTextCtrl::OnCut)
155 EVT_MENU(wxID_COPY, wxTextCtrl::OnCopy)
156 EVT_MENU(wxID_PASTE, wxTextCtrl::OnPaste)
157 EVT_MENU(wxID_UNDO, wxTextCtrl::OnUndo)
158 EVT_MENU(wxID_REDO, wxTextCtrl::OnRedo)
159
160 EVT_UPDATE_UI(wxID_CUT, wxTextCtrl::OnUpdateCut)
161 EVT_UPDATE_UI(wxID_COPY, wxTextCtrl::OnUpdateCopy)
162 EVT_UPDATE_UI(wxID_PASTE, wxTextCtrl::OnUpdatePaste)
163 EVT_UPDATE_UI(wxID_UNDO, wxTextCtrl::OnUpdateUndo)
164 EVT_UPDATE_UI(wxID_REDO, wxTextCtrl::OnUpdateRedo)
165 END_EVENT_TABLE()
166
167 void wxTextCtrl::Init()
168 {
169 m_ignoreNextUpdate =
170 m_modified = FALSE;
171 m_updateFont = FALSE;
172 m_text =
173 m_vScrollbar = (GtkWidget *)NULL;
174 }
175
176 wxTextCtrl::wxTextCtrl( wxWindow *parent,
177 wxWindowID id,
178 const wxString &value,
179 const wxPoint &pos,
180 const wxSize &size,
181 long style,
182 const wxValidator& validator,
183 const wxString &name )
184 {
185 Init();
186
187 Create( parent, id, value, pos, size, style, validator, name );
188 }
189
190 bool wxTextCtrl::Create( wxWindow *parent,
191 wxWindowID id,
192 const wxString &value,
193 const wxPoint &pos,
194 const wxSize &size,
195 long style,
196 const wxValidator& validator,
197 const wxString &name )
198 {
199 m_needParent = TRUE;
200 m_acceptsFocus = TRUE;
201
202 if (!PreCreation( parent, pos, size ) ||
203 !CreateBase( parent, id, pos, size, style, validator, name ))
204 {
205 wxFAIL_MSG( wxT("wxTextCtrl creation failed") );
206 return FALSE;
207 }
208
209
210 m_vScrollbarVisible = FALSE;
211
212 bool multi_line = (style & wxTE_MULTILINE) != 0;
213 if (multi_line)
214 {
215 #if (GTK_MINOR_VERSION > 2)
216 /* a multi-line edit control: create a vertical scrollbar by default and
217 horizontal if requested */
218 bool bHasHScrollbar = (style & wxHSCROLL) != 0;
219 #else
220 bool bHasHScrollbar = FALSE;
221 #endif
222
223 /* create our control ... */
224 m_text = gtk_text_new( (GtkAdjustment *) NULL, (GtkAdjustment *) NULL );
225
226 /* ... and put into the upper left hand corner of the table */
227 m_widget = gtk_table_new(bHasHScrollbar ? 2 : 1, 2, FALSE);
228 GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
229 gtk_table_attach( GTK_TABLE(m_widget), m_text, 0, 1, 0, 1,
230 (GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK),
231 (GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK),
232 0, 0);
233
234 /* always wrap words */
235 gtk_text_set_word_wrap( GTK_TEXT(m_text), TRUE );
236
237 #if (GTK_MINOR_VERSION > 2)
238 /* put the horizontal scrollbar in the lower left hand corner */
239 if (bHasHScrollbar)
240 {
241 GtkWidget *hscrollbar = gtk_hscrollbar_new(GTK_TEXT(m_text)->hadj);
242 GTK_WIDGET_UNSET_FLAGS( hscrollbar, GTK_CAN_FOCUS );
243 gtk_table_attach(GTK_TABLE(m_widget), hscrollbar, 0, 1, 1, 2,
244 (GtkAttachOptions)(GTK_EXPAND | GTK_FILL | GTK_SHRINK),
245 GTK_FILL,
246 0, 0);
247 gtk_widget_show(hscrollbar);
248
249 /* don't wrap lines, otherwise we wouldn't need the scrollbar */
250 gtk_text_set_line_wrap( GTK_TEXT(m_text), FALSE );
251 }
252 #endif
253
254 /* finally, put the vertical scrollbar in the upper right corner */
255 m_vScrollbar = gtk_vscrollbar_new( GTK_TEXT(m_text)->vadj );
256 GTK_WIDGET_UNSET_FLAGS( m_vScrollbar, GTK_CAN_FOCUS );
257 gtk_table_attach(GTK_TABLE(m_widget), m_vScrollbar, 1, 2, 0, 1,
258 GTK_FILL,
259 (GtkAttachOptions)(GTK_EXPAND | GTK_FILL | GTK_SHRINK),
260 0, 0);
261 }
262 else
263 {
264 /* a single-line text control: no need for scrollbars */
265 m_widget =
266 m_text = gtk_entry_new();
267 }
268
269 m_parent->DoAddChild( this );
270
271 m_focusWidget = m_text;
272
273 PostCreation();
274
275 SetFont( parent->GetFont() );
276
277 wxSize size_best( DoGetBestSize() );
278 wxSize new_size( size );
279 if (new_size.x == -1)
280 new_size.x = size_best.x;
281 if (new_size.y == -1)
282 new_size.y = size_best.y;
283 if ((new_size.x != size.x) || (new_size.y != size.y))
284 SetSize( new_size.x, new_size.y );
285
286 if (multi_line)
287 gtk_widget_show(m_text);
288
289 if (multi_line)
290 {
291 gtk_signal_connect(GTK_OBJECT(GTK_TEXT(m_text)->vadj), "changed",
292 (GtkSignalFunc) gtk_scrollbar_changed_callback, (gpointer) this );
293 }
294
295 if (!value.IsEmpty())
296 {
297 gint tmp = 0;
298
299 #if GTK_MINOR_VERSION == 0
300 // if we don't realize it, GTK 1.0.6 dies with a SIGSEGV in
301 // gtk_editable_insert_text()
302 gtk_widget_realize(m_text);
303 #endif // GTK 1.0
304
305 #if wxUSE_UNICODE
306 wxWX2MBbuf val = value.mbc_str();
307 gtk_editable_insert_text( GTK_EDITABLE(m_text), val, strlen(val), &tmp );
308 #else // !Unicode
309 gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &tmp );
310 #endif // Unicode/!Unicode
311
312 if (multi_line)
313 {
314 /* bring editable's cursor uptodate. bug in GTK. */
315
316 GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
317 }
318 }
319
320 if (style & wxTE_PASSWORD)
321 {
322 if (!multi_line)
323 gtk_entry_set_visibility( GTK_ENTRY(m_text), FALSE );
324 }
325
326 if (style & wxTE_READONLY)
327 {
328 if (!multi_line)
329 gtk_entry_set_editable( GTK_ENTRY(m_text), FALSE );
330 }
331 else
332 {
333 if (multi_line)
334 gtk_text_set_editable( GTK_TEXT(m_text), 1 );
335 }
336
337 /* we want to be notified about text changes */
338 gtk_signal_connect( GTK_OBJECT(m_text), "changed",
339 GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
340
341 /* we don't set a valid background colour, because the window
342 manager should use a default one */
343 m_backgroundColour = wxColour();
344
345 wxColour colFg = parent->GetForegroundColour();
346 SetForegroundColour( colFg );
347
348 m_cursor = wxCursor( wxCURSOR_IBEAM );
349
350 wxTextAttr attrDef( colFg, m_backgroundColour, parent->GetFont() );
351 SetDefaultStyle( attrDef );
352
353 Show( TRUE );
354
355 return TRUE;
356 }
357
358 void wxTextCtrl::CalculateScrollbar()
359 {
360 if ((m_windowStyle & wxTE_MULTILINE) == 0) return;
361
362 GtkAdjustment *adj = GTK_TEXT(m_text)->vadj;
363
364 if (adj->upper - adj->page_size < 0.8)
365 {
366 if (m_vScrollbarVisible)
367 {
368 gtk_widget_hide( m_vScrollbar );
369 m_vScrollbarVisible = FALSE;
370 }
371 }
372 else
373 {
374 if (!m_vScrollbarVisible)
375 {
376 gtk_widget_show( m_vScrollbar );
377 m_vScrollbarVisible = TRUE;
378 }
379 }
380 }
381
382 wxString wxTextCtrl::GetValue() const
383 {
384 wxCHECK_MSG( m_text != NULL, wxT(""), wxT("invalid text ctrl") );
385
386 wxString tmp;
387 if (m_windowStyle & wxTE_MULTILINE)
388 {
389 gint len = gtk_text_get_length( GTK_TEXT(m_text) );
390 char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
391 tmp = wxString(text,*wxConvCurrent);
392 g_free( text );
393 }
394 else
395 {
396 tmp = wxString(gtk_entry_get_text( GTK_ENTRY(m_text) ),*wxConvCurrent);
397 }
398 return tmp;
399 }
400
401 void wxTextCtrl::SetValue( const wxString &value )
402 {
403 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
404
405 if (m_windowStyle & wxTE_MULTILINE)
406 {
407 gint len = gtk_text_get_length( GTK_TEXT(m_text) );
408 gtk_editable_delete_text( GTK_EDITABLE(m_text), 0, len );
409 len = 0;
410 #if wxUSE_UNICODE
411 wxWX2MBbuf tmpbuf = value.mbc_str();
412 gtk_editable_insert_text( GTK_EDITABLE(m_text), tmpbuf, strlen(tmpbuf), &len );
413 #else
414 gtk_editable_insert_text( GTK_EDITABLE(m_text), value.mbc_str(), value.Length(), &len );
415 #endif
416 }
417 else
418 {
419 gtk_entry_set_text( GTK_ENTRY(m_text), value.mbc_str() );
420 }
421
422 // GRG, Jun/2000: Changed this after a lot of discussion in
423 // the lists. wxWindows 2.2 will have a set of flags to
424 // customize this behaviour.
425 SetInsertionPoint(0);
426
427 m_modified = FALSE;
428 }
429
430 void wxTextCtrl::WriteText( const wxString &text )
431 {
432 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
433
434 if ( text.empty() )
435 return;
436
437 #if wxUSE_UNICODE
438 wxWX2MBbuf buf = text.mbc_str();
439 const char *txt = buf;
440 size_t txtlen = strlen(buf);
441 #else
442 const char *txt = text;
443 size_t txtlen = text.length();
444 #endif
445
446 if ( m_windowStyle & wxTE_MULTILINE )
447 {
448 // After cursor movements, gtk_text_get_point() is wrong by one.
449 gtk_text_set_point( GTK_TEXT(m_text), GTK_EDITABLE(m_text)->current_pos );
450
451 // if we have any special style, use it
452 if ( !m_defaultStyle.IsDefault() )
453 {
454 GetInsertionPoint();
455
456 wxGtkTextInsert(m_text, m_defaultStyle, txt, txtlen);
457 }
458 else // no style
459 {
460 gint len = GTK_EDITABLE(m_text)->current_pos;
461 gtk_editable_insert_text( GTK_EDITABLE(m_text), txt, txtlen, &len );
462 }
463
464 // Bring editable's cursor back uptodate.
465 GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
466 }
467 else // single line
468 {
469 // This moves the cursor pos to behind the inserted text.
470 gint len = GTK_EDITABLE(m_text)->current_pos;
471 gtk_editable_insert_text( GTK_EDITABLE(m_text), txt, txtlen, &len );
472
473 // Bring editable's cursor uptodate.
474 GTK_EDITABLE(m_text)->current_pos += text.Len();
475
476 // Bring entry's cursor uptodate.
477 gtk_entry_set_position( GTK_ENTRY(m_text), GTK_EDITABLE(m_text)->current_pos );
478 }
479
480 m_modified = TRUE;
481 }
482
483 void wxTextCtrl::AppendText( const wxString &text )
484 {
485 SetInsertionPointEnd();
486 WriteText( text );
487 }
488
489 wxString wxTextCtrl::GetLineText( long lineNo ) const
490 {
491 if (m_windowStyle & wxTE_MULTILINE)
492 {
493 gint len = gtk_text_get_length( GTK_TEXT(m_text) );
494 char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
495
496 if (text)
497 {
498 wxString buf(wxT(""));
499 long i;
500 int currentLine = 0;
501 for (i = 0; currentLine != lineNo && text[i]; i++ )
502 if (text[i] == '\n')
503 currentLine++;
504 // Now get the text
505 int j;
506 for (j = 0; text[i] && text[i] != '\n'; i++, j++ )
507 buf += text[i];
508
509 g_free( text );
510 return buf;
511 }
512 else
513 {
514 return wxEmptyString;
515 }
516 }
517 else
518 {
519 if (lineNo == 0) return GetValue();
520 return wxEmptyString;
521 }
522 }
523
524 void wxTextCtrl::OnDropFiles( wxDropFilesEvent &WXUNUSED(event) )
525 {
526 /* If you implement this, don't forget to update the documentation!
527 * (file docs/latex/wx/text.tex) */
528 wxFAIL_MSG( wxT("wxTextCtrl::OnDropFiles not implemented") );
529 }
530
531 bool wxTextCtrl::PositionToXY(long pos, long *x, long *y ) const
532 {
533 if ( m_windowStyle & wxTE_MULTILINE )
534 {
535 wxString text = GetValue();
536
537 // cast to prevent warning. But pos really should've been unsigned.
538 if( (unsigned long)pos > text.Len() )
539 return FALSE;
540
541 *x=0; // First Col
542 *y=0; // First Line
543
544 const wxChar* stop = text.c_str() + pos;
545 for ( const wxChar *p = text.c_str(); p < stop; p++ )
546 {
547 if (*p == wxT('\n'))
548 {
549 (*y)++;
550 *x=0;
551 }
552 else
553 (*x)++;
554 }
555 }
556 else // single line control
557 {
558 if ( pos <= GTK_ENTRY(m_text)->text_length )
559 {
560 *y = 0;
561 *x = pos;
562 }
563 else
564 {
565 // index out of bounds
566 return FALSE;
567 }
568 }
569
570 return TRUE;
571 }
572
573 long wxTextCtrl::XYToPosition(long x, long y ) const
574 {
575 if (!(m_windowStyle & wxTE_MULTILINE)) return 0;
576
577 long pos=0;
578 for( int i=0; i<y; i++ ) pos += GetLineLength(i) + 1; // one for '\n'
579
580 pos += x;
581 return pos;
582 }
583
584 int wxTextCtrl::GetLineLength(long lineNo) const
585 {
586 wxString str = GetLineText (lineNo);
587 return (int) str.Length();
588 }
589
590 int wxTextCtrl::GetNumberOfLines() const
591 {
592 if (m_windowStyle & wxTE_MULTILINE)
593 {
594 gint len = gtk_text_get_length( GTK_TEXT(m_text) );
595 char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
596
597 if (text)
598 {
599 int currentLine = 0;
600 for (int i = 0; i < len; i++ )
601 {
602 if (text[i] == '\n')
603 currentLine++;
604 }
605 g_free( text );
606
607 // currentLine is 0 based, add 1 to get number of lines
608 return currentLine + 1;
609 }
610 else
611 {
612 return 0;
613 }
614 }
615 else
616 {
617 return 1;
618 }
619 }
620
621 void wxTextCtrl::SetInsertionPoint( long pos )
622 {
623 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
624
625 if (m_windowStyle & wxTE_MULTILINE)
626 {
627 /* seems to be broken in GTK 1.0.X:
628 gtk_text_set_point( GTK_TEXT(m_text), (int)pos ); */
629
630 gtk_signal_disconnect_by_func( GTK_OBJECT(m_text),
631 GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
632
633 /* we fake a set_point by inserting and deleting. as the user
634 isn't supposed to get to know about thos non-sense, we
635 disconnect so that no events are sent to the user program. */
636
637 gint tmp = (gint)pos;
638 gtk_editable_insert_text( GTK_EDITABLE(m_text), " ", 1, &tmp );
639 gtk_editable_delete_text( GTK_EDITABLE(m_text), tmp-1, tmp );
640
641 gtk_signal_connect( GTK_OBJECT(m_text), "changed",
642 GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
643
644 /* bring editable's cursor uptodate. another bug in GTK. */
645
646 GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
647 }
648 else
649 {
650 gtk_entry_set_position( GTK_ENTRY(m_text), (int)pos );
651
652 /* bring editable's cursor uptodate. bug in GTK. */
653
654 GTK_EDITABLE(m_text)->current_pos = (guint32)pos;
655 }
656 }
657
658 void wxTextCtrl::SetInsertionPointEnd()
659 {
660 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
661
662 if (m_windowStyle & wxTE_MULTILINE)
663 SetInsertionPoint(gtk_text_get_length(GTK_TEXT(m_text)));
664 else
665 gtk_entry_set_position( GTK_ENTRY(m_text), -1 );
666 }
667
668 void wxTextCtrl::SetEditable( bool editable )
669 {
670 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
671
672 if (m_windowStyle & wxTE_MULTILINE)
673 gtk_text_set_editable( GTK_TEXT(m_text), editable );
674 else
675 gtk_entry_set_editable( GTK_ENTRY(m_text), editable );
676 }
677
678 bool wxTextCtrl::Enable( bool enable )
679 {
680 if (!wxWindowBase::Enable(enable))
681 {
682 // nothing to do
683 return FALSE;
684 }
685
686 if (m_windowStyle & wxTE_MULTILINE)
687 {
688 gtk_text_set_editable( GTK_TEXT(m_text), enable );
689 OnParentEnable(enable);
690 }
691 else
692 {
693 gtk_widget_set_sensitive( m_text, enable );
694 }
695
696 return TRUE;
697 }
698
699 // wxGTK-specific: called recursively by Enable,
700 // to give widgets an oppprtunity to correct their colours after they
701 // have been changed by Enable
702 void wxTextCtrl::OnParentEnable( bool enable )
703 {
704 // If we have a custom background colour, we use this colour in both
705 // disabled and enabled mode, or we end up with a different colour under the
706 // text.
707 wxColour oldColour = GetBackgroundColour();
708 if (oldColour.Ok())
709 {
710 // Need to set twice or it'll optimize the useful stuff out
711 if (oldColour == * wxWHITE)
712 SetBackgroundColour(*wxBLACK);
713 else
714 SetBackgroundColour(*wxWHITE);
715 SetBackgroundColour(oldColour);
716 }
717 }
718
719 void wxTextCtrl::DiscardEdits()
720 {
721 m_modified = FALSE;
722 }
723
724 // ----------------------------------------------------------------------------
725 // max text length support
726 // ----------------------------------------------------------------------------
727
728 void wxTextCtrl::IgnoreNextTextUpdate()
729 {
730 m_ignoreNextUpdate = TRUE;
731 }
732
733 bool wxTextCtrl::IgnoreTextUpdate()
734 {
735 if ( m_ignoreNextUpdate )
736 {
737 m_ignoreNextUpdate = FALSE;
738
739 return TRUE;
740 }
741
742 return FALSE;
743 }
744
745 void wxTextCtrl::SetMaxLength(unsigned long len)
746 {
747 if ( !HasFlag(wxTE_MULTILINE) )
748 {
749 gtk_entry_set_max_length(GTK_ENTRY(m_text), len);
750
751 // there is a bug in GTK+ 1.2.x: "changed" signal is emitted even if
752 // we had tried to enter more text than allowed by max text length and
753 // the text wasn't really changed
754 //
755 // to detect this and generate TEXT_MAXLEN event instead of
756 // TEXT_CHANGED one in this case we also catch "insert_text" signal
757 //
758 // when max len is set to 0 we disconnect our handler as it means that
759 // we shouldn't check anything any more
760 if ( len )
761 {
762 gtk_signal_connect( GTK_OBJECT(m_text),
763 "insert_text",
764 GTK_SIGNAL_FUNC(gtk_insert_text_callback),
765 (gpointer)this);
766 }
767 else // no checking
768 {
769 gtk_signal_disconnect_by_func
770 (
771 GTK_OBJECT(m_text),
772 GTK_SIGNAL_FUNC(gtk_insert_text_callback),
773 (gpointer)this
774 );
775 }
776 }
777 }
778
779 void wxTextCtrl::SetSelection( long from, long to )
780 {
781 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
782
783 if ( (m_windowStyle & wxTE_MULTILINE) &&
784 !GTK_TEXT(m_text)->line_start_cache )
785 {
786 // tell the programmer that it didn't work
787 wxLogDebug(_T("Can't call SetSelection() before realizing the control"));
788 return;
789 }
790
791 gtk_editable_select_region( GTK_EDITABLE(m_text), (gint)from, (gint)to );
792 }
793
794 void wxTextCtrl::ShowPosition( long pos )
795 {
796 if (m_windowStyle & wxTE_MULTILINE)
797 {
798 GtkAdjustment *vp = GTK_TEXT(m_text)->vadj;
799 float totalLines = (float) GetNumberOfLines();
800 long posX;
801 long posY;
802 PositionToXY(pos, &posX, &posY);
803 float posLine = (float) posY;
804 float p = (posLine/totalLines)*(vp->upper - vp->lower) + vp->lower;
805 gtk_adjustment_set_value(GTK_TEXT(m_text)->vadj, p);
806 }
807 }
808
809 long wxTextCtrl::GetInsertionPoint() const
810 {
811 wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
812
813 return (long) GTK_EDITABLE(m_text)->current_pos;
814 }
815
816 long wxTextCtrl::GetLastPosition() const
817 {
818 wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
819
820 int pos = 0;
821 if (m_windowStyle & wxTE_MULTILINE)
822 pos = gtk_text_get_length( GTK_TEXT(m_text) );
823 else
824 pos = GTK_ENTRY(m_text)->text_length;
825
826 return (long)pos;
827 }
828
829 void wxTextCtrl::Remove( long from, long to )
830 {
831 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
832
833 gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to );
834 }
835
836 void wxTextCtrl::Replace( long from, long to, const wxString &value )
837 {
838 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
839
840 gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to );
841
842 if (!value.IsEmpty())
843 {
844 gint pos = (gint)from;
845 #if wxUSE_UNICODE
846 wxWX2MBbuf buf = value.mbc_str();
847 gtk_editable_insert_text( GTK_EDITABLE(m_text), buf, strlen(buf), &pos );
848 #else
849 gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &pos );
850 #endif
851 }
852 }
853
854 void wxTextCtrl::Cut()
855 {
856 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
857
858 #if (GTK_MINOR_VERSION > 0)
859 gtk_editable_cut_clipboard( GTK_EDITABLE(m_text) );
860 #else
861 gtk_editable_cut_clipboard( GTK_EDITABLE(m_text), 0 );
862 #endif
863 }
864
865 void wxTextCtrl::Copy()
866 {
867 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
868
869 #if (GTK_MINOR_VERSION > 0)
870 gtk_editable_copy_clipboard( GTK_EDITABLE(m_text) );
871 #else
872 gtk_editable_copy_clipboard( GTK_EDITABLE(m_text), 0 );
873 #endif
874 }
875
876 void wxTextCtrl::Paste()
877 {
878 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
879
880 #if (GTK_MINOR_VERSION > 0)
881 gtk_editable_paste_clipboard( GTK_EDITABLE(m_text) );
882 #else
883 gtk_editable_paste_clipboard( GTK_EDITABLE(m_text), 0 );
884 #endif
885 }
886
887 // Undo/redo
888 void wxTextCtrl::Undo()
889 {
890 // TODO
891 wxFAIL_MSG( wxT("wxTextCtrl::Undo not implemented") );
892 }
893
894 void wxTextCtrl::Redo()
895 {
896 // TODO
897 wxFAIL_MSG( wxT("wxTextCtrl::Redo not implemented") );
898 }
899
900 bool wxTextCtrl::CanUndo() const
901 {
902 // TODO
903 wxFAIL_MSG( wxT("wxTextCtrl::CanUndo not implemented") );
904 return FALSE;
905 }
906
907 bool wxTextCtrl::CanRedo() const
908 {
909 // TODO
910 wxFAIL_MSG( wxT("wxTextCtrl::CanRedo not implemented") );
911 return FALSE;
912 }
913
914 // If the return values from and to are the same, there is no
915 // selection.
916 void wxTextCtrl::GetSelection(long* fromOut, long* toOut) const
917 {
918 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
919
920 long from, to;
921 if ( !(GTK_EDITABLE(m_text)->has_selection) )
922 {
923 from =
924 to = GetInsertionPoint();
925 }
926 else // got selection
927 {
928 from = (long) GTK_EDITABLE(m_text)->selection_start_pos;
929 to = (long) GTK_EDITABLE(m_text)->selection_end_pos;
930
931 if ( from > to )
932 {
933 // exchange them to be compatible with wxMSW
934 long tmp = from;
935 from = to;
936 to = tmp;
937 }
938 }
939
940 if ( fromOut )
941 *fromOut = from;
942 if ( toOut )
943 *toOut = to;
944 }
945
946 bool wxTextCtrl::IsEditable() const
947 {
948 wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
949
950 return GTK_EDITABLE(m_text)->editable;
951 }
952
953 bool wxTextCtrl::IsModified() const
954 {
955 return m_modified;
956 }
957
958 void wxTextCtrl::Clear()
959 {
960 SetValue( wxT("") );
961 }
962
963 void wxTextCtrl::OnChar( wxKeyEvent &key_event )
964 {
965 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
966
967 if ((key_event.KeyCode() == WXK_RETURN) && (m_windowStyle & wxPROCESS_ENTER))
968 {
969 wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId);
970 event.SetEventObject(this);
971 event.SetString(GetValue());
972 if (GetEventHandler()->ProcessEvent(event)) return;
973 }
974
975 if ((key_event.KeyCode() == WXK_RETURN) && !(m_windowStyle & wxTE_MULTILINE))
976 {
977 // This will invoke the dialog default action, such
978 // as the clicking the default button.
979
980 wxWindow *top_frame = m_parent;
981 while (top_frame->GetParent() && !(top_frame->IsTopLevel()))
982 top_frame = top_frame->GetParent();
983
984 if (top_frame && GTK_IS_WINDOW(top_frame->m_widget))
985 {
986 GtkWindow *window = GTK_WINDOW(top_frame->m_widget);
987
988 if (window->default_widget)
989 {
990 gtk_widget_activate (window->default_widget);
991 return;
992 }
993 }
994 }
995
996 key_event.Skip();
997 }
998
999 GtkWidget* wxTextCtrl::GetConnectWidget()
1000 {
1001 return GTK_WIDGET(m_text);
1002 }
1003
1004 bool wxTextCtrl::IsOwnGtkWindow( GdkWindow *window )
1005 {
1006 if (m_windowStyle & wxTE_MULTILINE)
1007 return (window == GTK_TEXT(m_text)->text_area);
1008 else
1009 return (window == GTK_ENTRY(m_text)->text_area);
1010 }
1011
1012 // the font will change for subsequent text insertiongs
1013 bool wxTextCtrl::SetFont( const wxFont &font )
1014 {
1015 wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
1016
1017 if ( !wxTextCtrlBase::SetFont(font) )
1018 {
1019 // font didn't change, nothing to do
1020 return FALSE;
1021 }
1022
1023 if ( m_windowStyle & wxTE_MULTILINE )
1024 {
1025 m_updateFont = TRUE;
1026
1027 m_defaultStyle.SetFont(font);
1028
1029 ChangeFontGlobally();
1030 }
1031
1032 return TRUE;
1033 }
1034
1035 void wxTextCtrl::ChangeFontGlobally()
1036 {
1037 // this method is very inefficient and hence should be called as rarely as
1038 // possible!
1039 wxASSERT_MSG( (m_windowStyle & wxTE_MULTILINE) && m_updateFont,
1040 _T("shouldn't be called for single line controls") );
1041
1042 wxString value = GetValue();
1043 if ( !value.IsEmpty() )
1044 {
1045 m_updateFont = FALSE;
1046
1047 Clear();
1048 AppendText(value);
1049 }
1050 }
1051
1052 void wxTextCtrl::UpdateFontIfNeeded()
1053 {
1054 if ( m_updateFont )
1055 ChangeFontGlobally();
1056 }
1057
1058 bool wxTextCtrl::SetForegroundColour(const wxColour& colour)
1059 {
1060 if ( !wxControl::SetForegroundColour(colour) )
1061 return FALSE;
1062
1063 // update default fg colour too
1064 m_defaultStyle.SetTextColour(colour);
1065
1066 return TRUE;
1067 }
1068
1069 bool wxTextCtrl::SetBackgroundColour( const wxColour &colour )
1070 {
1071 wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
1072
1073 if ( !wxControl::SetBackgroundColour( colour ) )
1074 return FALSE;
1075
1076 if (!m_widget->window)
1077 return FALSE;
1078
1079 wxColour sysbg = wxSystemSettings::GetColour( wxSYS_COLOUR_BTNFACE );
1080 if (sysbg.Red() == colour.Red() &&
1081 sysbg.Green() == colour.Green() &&
1082 sysbg.Blue() == colour.Blue())
1083 {
1084 return FALSE; // FIXME or TRUE?
1085 }
1086
1087 if (!m_backgroundColour.Ok())
1088 return FALSE;
1089
1090 if (m_windowStyle & wxTE_MULTILINE)
1091 {
1092 GdkWindow *window = GTK_TEXT(m_text)->text_area;
1093 if (!window)
1094 return FALSE;
1095 m_backgroundColour.CalcPixel( gdk_window_get_colormap( window ) );
1096 gdk_window_set_background( window, m_backgroundColour.GetColor() );
1097 gdk_window_clear( window );
1098 }
1099
1100 // change active background color too
1101 m_defaultStyle.SetBackgroundColour( colour );
1102
1103 return TRUE;
1104 }
1105
1106 bool wxTextCtrl::SetStyle( long start, long end, const wxTextAttr& style )
1107 {
1108 /* VERY dirty way to do that - removes the required text and re-adds it
1109 with styling (FIXME) */
1110 if ( m_windowStyle & wxTE_MULTILINE )
1111 {
1112 if ( style.IsDefault() )
1113 {
1114 // nothing to do
1115 return TRUE;
1116 }
1117
1118 gint l = gtk_text_get_length( GTK_TEXT(m_text) );
1119
1120 wxCHECK_MSG( start >= 0 && end <= l, FALSE,
1121 _T("invalid range in wxTextCtrl::SetStyle") );
1122
1123 gint old_pos = gtk_editable_get_position( GTK_EDITABLE(m_text) );
1124 char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), start, end );
1125 wxString tmp(text,*wxConvCurrent);
1126 g_free( text );
1127
1128 gtk_editable_delete_text( GTK_EDITABLE(m_text), start, end );
1129 gtk_editable_set_position( GTK_EDITABLE(m_text), start );
1130
1131 #if wxUSE_UNICODE
1132 wxWX2MBbuf buf = tmp.mbc_str();
1133 const char *txt = buf;
1134 size_t txtlen = strlen(buf);
1135 #else
1136 const char *txt = tmp;
1137 size_t txtlen = tmp.length();
1138 #endif
1139
1140 // use the attributes from style which are set in it and fall back
1141 // first to the default style and then to the text control default
1142 // colours for the others
1143 wxGtkTextInsert(m_text,
1144 wxTextAttr::Combine(style, m_defaultStyle, this),
1145 txt,
1146 txtlen);
1147
1148 /* does not seem to help under GTK+ 1.2 !!!
1149 gtk_editable_set_position( GTK_EDITABLE(m_text), old_pos ); */
1150 SetInsertionPoint( old_pos );
1151 return TRUE;
1152 }
1153 else // singe line
1154 {
1155 // cannot do this for GTK+'s Entry widget
1156 return FALSE;
1157 }
1158 }
1159
1160 void wxTextCtrl::ApplyWidgetStyle()
1161 {
1162 if (m_windowStyle & wxTE_MULTILINE)
1163 {
1164 // how ?
1165 }
1166 else
1167 {
1168 SetWidgetStyle();
1169 gtk_widget_set_style( m_text, m_widgetStyle );
1170 }
1171 }
1172
1173 void wxTextCtrl::OnCut(wxCommandEvent& WXUNUSED(event))
1174 {
1175 Cut();
1176 }
1177
1178 void wxTextCtrl::OnCopy(wxCommandEvent& WXUNUSED(event))
1179 {
1180 Copy();
1181 }
1182
1183 void wxTextCtrl::OnPaste(wxCommandEvent& WXUNUSED(event))
1184 {
1185 Paste();
1186 }
1187
1188 void wxTextCtrl::OnUndo(wxCommandEvent& WXUNUSED(event))
1189 {
1190 Undo();
1191 }
1192
1193 void wxTextCtrl::OnRedo(wxCommandEvent& WXUNUSED(event))
1194 {
1195 Redo();
1196 }
1197
1198 void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent& event)
1199 {
1200 event.Enable( CanCut() );
1201 }
1202
1203 void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent& event)
1204 {
1205 event.Enable( CanCopy() );
1206 }
1207
1208 void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent& event)
1209 {
1210 event.Enable( CanPaste() );
1211 }
1212
1213 void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent& event)
1214 {
1215 event.Enable( CanUndo() );
1216 }
1217
1218 void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event)
1219 {
1220 event.Enable( CanRedo() );
1221 }
1222
1223 void wxTextCtrl::OnInternalIdle()
1224 {
1225 wxCursor cursor = m_cursor;
1226 if (g_globalCursor.Ok()) cursor = g_globalCursor;
1227
1228 if (cursor.Ok())
1229 {
1230 GdkWindow *window = (GdkWindow*) NULL;
1231 if (HasFlag(wxTE_MULTILINE))
1232 window = GTK_TEXT(m_text)->text_area;
1233 else
1234 window = GTK_ENTRY(m_text)->text_area;
1235
1236 if (window)
1237 gdk_window_set_cursor( window, cursor.GetCursor() );
1238
1239 if (!g_globalCursor.Ok())
1240 cursor = *wxSTANDARD_CURSOR;
1241
1242 window = m_widget->window;
1243 if ((window) && !(GTK_WIDGET_NO_WINDOW(m_widget)))
1244 gdk_window_set_cursor( window, cursor.GetCursor() );
1245 }
1246
1247 UpdateWindowUI();
1248 }
1249
1250 wxSize wxTextCtrl::DoGetBestSize() const
1251 {
1252 // FIXME should be different for multi-line controls...
1253 wxSize ret( wxControl::DoGetBestSize() );
1254 return wxSize(80, ret.y);
1255 }
1256
1257 // ----------------------------------------------------------------------------
1258 // freeze/thaw
1259 // ----------------------------------------------------------------------------
1260
1261 void wxTextCtrl::Freeze()
1262 {
1263 if ( HasFlag(wxTE_MULTILINE) )
1264 {
1265 gtk_text_freeze(GTK_TEXT(m_text));
1266 }
1267 }
1268
1269 void wxTextCtrl::Thaw()
1270 {
1271 if ( HasFlag(wxTE_MULTILINE) )
1272 {
1273 GTK_TEXT(m_text)->vadj->value = 0.0;
1274
1275 gtk_text_thaw(GTK_TEXT(m_text));
1276 }
1277 }
1278
1279 // ----------------------------------------------------------------------------
1280 // scrolling
1281 // ----------------------------------------------------------------------------
1282
1283 GtkAdjustment *wxTextCtrl::GetVAdj() const
1284 {
1285 return HasFlag(wxTE_MULTILINE) ? GTK_TEXT(m_text)->vadj : NULL;
1286 }
1287
1288 bool wxTextCtrl::DoScroll(GtkAdjustment *adj, int diff)
1289 {
1290 float value = adj->value + diff;
1291
1292 if ( value < 0 )
1293 value = 0;
1294
1295 float upper = adj->upper - adj->page_size;
1296 if ( value > upper )
1297 value = upper;
1298
1299 // did we noticeably change the scroll position?
1300 if ( fabs(adj->value - value) < 0.2 )
1301 {
1302 // well, this is what Robert does in wxScrollBar, so it must be good...
1303 return FALSE;
1304 }
1305
1306 adj->value = value;
1307
1308 gtk_signal_emit_by_name(GTK_OBJECT(adj), "value_changed");
1309
1310 return TRUE;
1311 }
1312
1313 bool wxTextCtrl::ScrollLines(int lines)
1314 {
1315 GtkAdjustment *adj = GetVAdj();
1316 if ( !adj )
1317 return FALSE;
1318
1319 // this is hardcoded to 10 in GTK+ 1.2 (great idea)
1320 static const int KEY_SCROLL_PIXELS = 10;
1321
1322 return DoScroll(adj, lines*KEY_SCROLL_PIXELS);
1323 }
1324
1325 bool wxTextCtrl::ScrollPages(int pages)
1326 {
1327 GtkAdjustment *adj = GetVAdj();
1328 if ( !adj )
1329 return FALSE;
1330
1331 return DoScroll(adj, (int)ceil(pages*adj->page_increment));
1332 }
1333