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