1 /////////////////////////////////////////////////////////////////////////////
4 // Author: Robert Roebling
6 // Copyright: (c) 1998 Robert Roebling, Vadim Zeitlin
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
11 #pragma implementation "textctrl.h"
14 #include "wx/textctrl.h"
17 #include "wx/settings.h"
19 #include <sys/types.h>
25 #include "gdk/gdkkeysyms.h"
27 //-----------------------------------------------------------------------------
29 //-----------------------------------------------------------------------------
31 extern bool g_blockEventsOnDrag
;
33 //-----------------------------------------------------------------------------
35 //-----------------------------------------------------------------------------
38 gtk_text_changed_callback( GtkWidget
*WXUNUSED(widget
), wxTextCtrl
*win
)
42 win
->CalculateScrollbar();
44 wxCommandEvent
event( wxEVT_COMMAND_TEXT_UPDATED
, win
->m_windowId
);
45 event
.SetString( copystring(win
->GetValue()) );
46 event
.SetEventObject( win
);
47 win
->GetEventHandler()->ProcessEvent( event
);
48 delete[] event
.GetString();
51 //-----------------------------------------------------------------------------
53 //-----------------------------------------------------------------------------
56 gtk_text_size_callback( GtkWidget
*WXUNUSED(widget
), GtkAllocation
* WXUNUSED(alloc
), wxTextCtrl
*win
)
58 win
->CalculateScrollbar();
61 //-----------------------------------------------------------------------------
63 //-----------------------------------------------------------------------------
65 IMPLEMENT_DYNAMIC_CLASS(wxTextCtrl
,wxControl
)
67 BEGIN_EVENT_TABLE(wxTextCtrl
, wxControl
)
68 EVT_CHAR(wxTextCtrl::OnChar
)
71 #ifndef NO_TEXT_WINDOW_STREAM
72 wxTextCtrl::wxTextCtrl() : streambuf()
74 if (allocate()) setp(base(),ebuf());
79 wxTextCtrl::wxTextCtrl()
85 #ifndef NO_TEXT_WINDOW_STREAM
86 wxTextCtrl::wxTextCtrl( wxWindow
*parent
, wxWindowID id
, const wxString
&value
,
87 const wxPoint
&pos
, const wxSize
&size
,
88 int style
, const wxValidator
& validator
, const wxString
&name
) : streambuf()
90 if (allocate()) setp(base(),ebuf());
93 Create( parent
, id
, value
, pos
, size
, style
, validator
, name
);
96 wxTextCtrl::wxTextCtrl( wxWindow
*parent
, wxWindowID id
, const wxString
&value
,
97 const wxPoint
&pos
, const wxSize
&size
,
98 int style
, const wxValidator
& validator
, const wxString
&name
)
101 Create( parent
, id
, value
, pos
, size
, style
, validator
, name
);
105 bool wxTextCtrl::Create( wxWindow
*parent
, wxWindowID id
, const wxString
&value
,
106 const wxPoint
&pos
, const wxSize
&size
,
107 int style
, const wxValidator
& validator
, const wxString
&name
)
110 m_acceptsFocus
= TRUE
;
112 PreCreation( parent
, id
, pos
, size
, style
, name
);
114 SetValidator( validator
);
116 m_vScrollbarVisible
= TRUE
;
118 bool multi_line
= (style
& wxTE_MULTILINE
) != 0;
121 // a multi-line edit control: create a vertical scrollbar by default and
122 // horizontal if requested
123 bool bHasHScrollbar
= (style
& wxHSCROLL
) != 0;
125 // create our control...
126 m_text
= gtk_text_new( (GtkAdjustment
*) NULL
, (GtkAdjustment
*) NULL
);
128 // ... and put into the upper left hand corner of the table
129 m_widget
= gtk_table_new(bHasHScrollbar
? 2 : 1, 2, FALSE
);
130 gtk_table_attach( GTK_TABLE(m_widget
), m_text
, 0, 1, 0, 1,
131 (GtkAttachOptions
)(GTK_FILL
| GTK_EXPAND
| GTK_SHRINK
),
132 (GtkAttachOptions
)(GTK_FILL
| GTK_EXPAND
| GTK_SHRINK
),
135 // put the horizontal scrollbar in the lower left hand corner
138 GtkWidget
*hscrollbar
= gtk_hscrollbar_new(GTK_TEXT(m_text
)->hadj
);
139 gtk_table_attach(GTK_TABLE(m_widget
), hscrollbar
, 0, 1, 1, 2,
140 (GtkAttachOptions
)(GTK_EXPAND
| GTK_FILL
),
143 gtk_widget_show(hscrollbar
);
146 // finally, put the vertical scrollbar in the upper right corner
147 m_vScrollbar
= gtk_vscrollbar_new( GTK_TEXT(m_text
)->vadj
);
148 gtk_table_attach(GTK_TABLE(m_widget
), m_vScrollbar
, 1, 2, 0, 1,
150 (GtkAttachOptions
)(GTK_EXPAND
| GTK_FILL
| GTK_SHRINK
),
152 gtk_widget_show( m_vScrollbar
);
154 gtk_signal_connect( GTK_OBJECT(m_widget
), "size_allocate",
155 GTK_SIGNAL_FUNC(gtk_text_size_callback
), (gpointer
)this );
159 // a single-line text control: no need for scrollbars
161 m_text
= gtk_entry_new();
164 wxSize newSize
= size
;
165 if (newSize
.x
== -1) newSize
.x
= 80;
166 if (newSize
.y
== -1) newSize
.y
= 26;
167 SetSize( newSize
.x
, newSize
.y
);
169 m_parent
->AddChild( this );
171 (m_parent
->m_insertCallback
)( m_parent
, this );
177 gtk_widget_realize(m_text
);
178 gtk_widget_show(m_text
);
181 // we want to be notified about text changes
182 gtk_signal_connect( GTK_OBJECT(m_text
), "changed",
183 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
185 if (!value
.IsEmpty())
188 gtk_editable_insert_text( GTK_EDITABLE(m_text
), value
, value
.Length(), &tmp
);
192 /* bring editable's cursor uptodate. bug in GTK. */
194 GTK_EDITABLE(m_text
)->current_pos
= gtk_text_get_point( GTK_TEXT(m_text
) );
198 if (style
& wxTE_PASSWORD
)
201 gtk_entry_set_visibility( GTK_ENTRY(m_text
), FALSE
);
204 if (style
& wxTE_READONLY
)
207 gtk_entry_set_editable( GTK_ENTRY(m_text
), FALSE
);
212 gtk_text_set_editable( GTK_TEXT(m_text
), 1 );
217 SetBackgroundColour( parent
->GetBackgroundColour() );
218 SetForegroundColour( parent
->GetForegroundColour() );
223 void wxTextCtrl::CalculateScrollbar()
225 if ((m_windowStyle
& wxTE_MULTILINE
) == 0) return;
227 GtkAdjustment
*adj
= GTK_TEXT(m_text
)->vadj
;
229 if (adj
->upper
- adj
->page_size
< 0.8)
231 if (m_vScrollbarVisible
)
233 gtk_widget_hide( m_vScrollbar
);
235 m_vScrollbarVisible
= FALSE
;
240 if (!m_vScrollbarVisible
)
242 gtk_widget_show( m_vScrollbar
);
244 m_vScrollbarVisible
= TRUE
;
249 wxString
wxTextCtrl::GetValue() const
251 wxCHECK_MSG( m_text
!= NULL
, "", "invalid text ctrl" );
254 if (m_windowStyle
& wxTE_MULTILINE
)
256 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
257 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
263 tmp
= gtk_entry_get_text( GTK_ENTRY(m_text
) );
268 void wxTextCtrl::SetValue( const wxString
&value
)
270 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
273 if (!value
.IsNull()) tmp
= value
;
274 if (m_windowStyle
& wxTE_MULTILINE
)
276 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
277 gtk_editable_delete_text( GTK_EDITABLE(m_text
), 0, len
);
279 gtk_editable_insert_text( GTK_EDITABLE(m_text
), tmp
, tmp
.Length(), &len
);
283 gtk_entry_set_text( GTK_ENTRY(m_text
), tmp
);
287 void wxTextCtrl::WriteText( const wxString
&text
)
289 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
291 if (text
.IsNull()) return;
293 if (m_windowStyle
& wxTE_MULTILINE
)
295 /* this moves the cursor pos to behind the inserted text */
297 gint len
= GTK_EDITABLE(m_text
)->current_pos
;
299 gtk_editable_insert_text( GTK_EDITABLE(m_text
), text
, text
.Length(), &len
);
301 /* bring editable's cursor uptodate. bug in GTK. */
303 GTK_EDITABLE(m_text
)->current_pos
= gtk_text_get_point( GTK_TEXT(m_text
) );
308 gtk_entry_append_text( GTK_ENTRY(m_text
), text
);
312 void wxTextCtrl::AppendText( const wxString
&text
)
314 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
316 if (m_windowStyle
& wxTE_MULTILINE
)
318 /* we'll insert at the last position */
319 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
320 gtk_editable_insert_text( GTK_EDITABLE(m_text
), text
, text
.Length(), &len
);
321 GTK_EDITABLE(m_text
)->current_pos
= gtk_text_get_point( GTK_TEXT(m_text
) );
325 gtk_entry_append_text( GTK_ENTRY(m_text
), text
);
329 bool wxTextCtrl::LoadFile( const wxString
&file
)
331 wxCHECK_MSG( m_text
!= NULL
, FALSE
, "invalid text ctrl" );
333 if (!wxFileExists(file
)) return FALSE
;
337 FILE *fp
= (FILE*) NULL
;
340 if ((stat ((char*) (const char*) file
, &statb
) == -1) || (statb
.st_mode
& S_IFMT
) != S_IFREG
||
341 !(fp
= fopen ((char*) (const char*) file
, "r")))
347 gint len
= statb
.st_size
;
349 if (!(text
= (char*)malloc ((unsigned) (len
+ 1))))
354 if (fread (text
, sizeof (char), len
, fp
) != (size_t) len
)
361 if (m_windowStyle
& wxTE_MULTILINE
)
364 gtk_editable_insert_text( GTK_EDITABLE(m_text
), text
, len
, &pos
);
368 gtk_entry_set_text( GTK_ENTRY(m_text
), text
);
378 bool wxTextCtrl::SaveFile( const wxString
&file
)
380 wxCHECK_MSG( m_text
!= NULL
, FALSE
, "invalid text ctrl" );
382 if (file
== "") return FALSE
;
386 if (!(fp
= fopen ((char*) (const char*) file
, "w")))
392 char *text
= (char*) NULL
;
395 if (m_windowStyle
& wxTE_MULTILINE
)
397 len
= gtk_text_get_length( GTK_TEXT(m_text
) );
398 text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
402 text
= gtk_entry_get_text( GTK_ENTRY(m_text
) );
405 if (fwrite (text
, sizeof (char), len
, fp
) != (size_t) len
)
407 // Did not write whole file
410 // Make sure newline terminates the file
411 if (text
[len
- 1] != '\n')
416 if (m_windowStyle
& wxTE_MULTILINE
) g_free( text
);
425 wxString
wxTextCtrl::GetLineText( long lineNo
) const
427 if (m_windowStyle
& wxTE_MULTILINE
)
429 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
430 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
437 for (i
= 0; currentLine
!= lineNo
&& text
[i
]; i
++ )
442 for (j
= 0; text
[i
] && text
[i
] != '\n'; i
++, j
++ )
449 return wxEmptyString
;
453 if (lineNo
== 0) return GetValue();
454 return wxEmptyString
;
458 void wxTextCtrl::OnDropFiles( wxDropFilesEvent
&WXUNUSED(event
) )
460 /* If you implement this, don't forget to update the documentation!
461 * (file docs/latex/wx/text.tex) */
462 wxFAIL_MSG( "wxTextCtrl::OnDropFiles not implemented" );
465 long wxTextCtrl::PositionToXY(long pos
, long *x
, long *y
) const
467 if ( m_windowStyle
& wxTE_MULTILINE
)
469 wxString text
= GetValue();
471 // cast to prevent warning. But pos really should've been unsigned.
472 if( (unsigned long)pos
> text
.Len() )
478 const char* stop
= text
.c_str() + pos
;
479 for ( const char *p
= text
.c_str(); p
< stop
; p
++ )
490 else // single line control
492 if ( pos
<= GTK_ENTRY(m_text
)->text_length
)
499 // index out of bounds
507 long wxTextCtrl::XYToPosition(long x
, long y
) const
509 if (!(m_windowStyle
& wxTE_MULTILINE
)) return 0;
512 for( int i
=0; i
<y
; i
++ ) pos
+= GetLineLength(i
) + 1; // one for '\n'
518 int wxTextCtrl::GetLineLength(long lineNo
) const
520 wxString str
= GetLineText (lineNo
);
521 return (int) str
.Length();
524 int wxTextCtrl::GetNumberOfLines() const
526 if (m_windowStyle
& wxTE_MULTILINE
)
528 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
529 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
534 for (int i
= 0; i
< len
; i
++ )
541 // currentLine is 0 based, add 1 to get number of lines
542 return currentLine
+ 1;
555 void wxTextCtrl::SetInsertionPoint( long pos
)
557 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
559 if (m_windowStyle
& wxTE_MULTILINE
)
561 /* seems to be broken in GTK 1.0.X:
562 gtk_text_set_point( GTK_TEXT(m_text), (int)pos ); */
564 gtk_signal_disconnect_by_func( GTK_OBJECT(m_text
),
565 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
567 /* we fake a set_point by inserting and deleting. as the user
568 isn't supposed to get to know about thos non-sense, we
569 disconnect so that no events are sent to the user program. */
571 gint tmp
= (gint
)pos
;
572 gtk_editable_insert_text( GTK_EDITABLE(m_text
), " ", 1, &tmp
);
573 gtk_editable_delete_text( GTK_EDITABLE(m_text
), tmp
-1, tmp
);
575 gtk_signal_connect( GTK_OBJECT(m_text
), "changed",
576 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
578 /* bring editable's cursor uptodate. another bug in GTK. */
580 GTK_EDITABLE(m_text
)->current_pos
= gtk_text_get_point( GTK_TEXT(m_text
) );
584 gtk_entry_set_position( GTK_ENTRY(m_text
), (int)pos
);
588 void wxTextCtrl::SetInsertionPointEnd()
590 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
592 if (m_windowStyle
& wxTE_MULTILINE
)
593 SetInsertionPoint(gtk_text_get_length(GTK_TEXT(m_text
)));
595 gtk_entry_set_position( GTK_ENTRY(m_text
), -1 );
598 void wxTextCtrl::SetEditable( bool editable
)
600 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
602 if (m_windowStyle
& wxTE_MULTILINE
)
603 gtk_text_set_editable( GTK_TEXT(m_text
), editable
);
605 gtk_entry_set_editable( GTK_ENTRY(m_text
), editable
);
608 void wxTextCtrl::SetSelection( long from
, long to
)
610 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
612 gtk_editable_select_region( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
615 void wxTextCtrl::ShowPosition( long WXUNUSED(pos
) )
617 wxFAIL_MSG( "wxTextCtrl::ShowPosition not implemented" );
620 long wxTextCtrl::GetInsertionPoint() const
622 wxCHECK_MSG( m_text
!= NULL
, 0, "invalid text ctrl" );
624 return (long) GTK_EDITABLE(m_text
)->current_pos
;
627 long wxTextCtrl::GetLastPosition() const
629 wxCHECK_MSG( m_text
!= NULL
, 0, "invalid text ctrl" );
632 if (m_windowStyle
& wxTE_MULTILINE
)
633 pos
= gtk_text_get_length( GTK_TEXT(m_text
) );
635 pos
= GTK_ENTRY(m_text
)->text_length
;
640 void wxTextCtrl::Remove( long from
, long to
)
642 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
644 gtk_editable_delete_text( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
647 void wxTextCtrl::Replace( long from
, long to
, const wxString
&value
)
649 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
651 gtk_editable_delete_text( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
652 if (value
.IsNull()) return;
653 gint pos
= (gint
)from
;
654 gtk_editable_insert_text( GTK_EDITABLE(m_text
), value
, value
.Length(), &pos
);
657 void wxTextCtrl::Cut()
659 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
661 #if (GTK_MINOR_VERSION == 1)
662 gtk_editable_cut_clipboard( GTK_EDITABLE(m_text
) );
664 gtk_editable_cut_clipboard( GTK_EDITABLE(m_text
), 0 );
668 void wxTextCtrl::Copy()
670 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
672 #if (GTK_MINOR_VERSION == 1)
673 gtk_editable_copy_clipboard( GTK_EDITABLE(m_text
) );
675 gtk_editable_copy_clipboard( GTK_EDITABLE(m_text
), 0 );
679 void wxTextCtrl::Paste()
681 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
683 #if (GTK_MINOR_VERSION == 1)
684 gtk_editable_paste_clipboard( GTK_EDITABLE(m_text
) );
686 gtk_editable_paste_clipboard( GTK_EDITABLE(m_text
), 0 );
690 void wxTextCtrl::Clear()
695 void wxTextCtrl::OnChar( wxKeyEvent
&key_event
)
697 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
699 if ((key_event
.KeyCode() == WXK_RETURN
) && (m_windowStyle
& wxPROCESS_ENTER
))
701 wxCommandEvent
event(wxEVT_COMMAND_TEXT_ENTER
, m_windowId
);
702 event
.SetEventObject(this);
703 if (GetEventHandler()->ProcessEvent(event
)) return;
709 #ifndef NO_TEXT_WINDOW_STREAM
710 int wxTextCtrl::overflow( int WXUNUSED(c
) )
712 int len
= pptr() - pbase();
713 char *txt
= new char[len
+1];
714 strncpy(txt
, pbase(), len
);
717 setp(pbase(), epptr());
722 int wxTextCtrl::sync()
724 int len
= pptr() - pbase();
725 char *txt
= new char[len
+1];
726 strncpy(txt
, pbase(), len
);
729 setp(pbase(), epptr());
734 int wxTextCtrl::underflow()
739 wxTextCtrl
& wxTextCtrl::operator<<(const wxString
& s
)
745 wxTextCtrl
& wxTextCtrl::operator<<(float f
)
747 static char buf
[100];
748 sprintf(buf
, "%.2f", f
);
753 wxTextCtrl
& wxTextCtrl::operator<<(double d
)
755 static char buf
[100];
756 sprintf(buf
, "%.2f", d
);
761 wxTextCtrl
& wxTextCtrl::operator<<(int i
)
763 static char buf
[100];
764 sprintf(buf
, "%i", i
);
769 wxTextCtrl
& wxTextCtrl::operator<<(long i
)
771 static char buf
[100];
772 sprintf(buf
, "%ld", i
);
777 wxTextCtrl
& wxTextCtrl::operator<<(const char c
)
788 GtkWidget
* wxTextCtrl::GetConnectWidget()
790 return GTK_WIDGET(m_text
);
793 bool wxTextCtrl::IsOwnGtkWindow( GdkWindow
*window
)
795 if (m_windowStyle
& wxTE_MULTILINE
)
796 return (window
== GTK_TEXT(m_text
)->text_area
);
798 return (window
== GTK_ENTRY(m_text
)->text_area
);
801 void wxTextCtrl::SetFont( const wxFont
&WXUNUSED(font
) )
803 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
808 void wxTextCtrl::SetForegroundColour( const wxColour
&WXUNUSED(colour
) )
810 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
815 void wxTextCtrl::SetBackgroundColour( const wxColour
&colour
)
817 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
819 wxControl::SetBackgroundColour( colour
);
821 wxColour sysbg
= wxSystemSettings::GetSystemColour( wxSYS_COLOUR_BTNFACE
);
822 if (sysbg
.Red() == colour
.Red() &&
823 sysbg
.Green() == colour
.Green() &&
824 sysbg
.Blue() == colour
.Blue())
829 if (!m_backgroundColour
.Ok()) return;
831 if (m_windowStyle
& wxTE_MULTILINE
)
833 GdkWindow
*window
= GTK_TEXT(m_text
)->text_area
;
834 m_backgroundColour
.CalcPixel( gdk_window_get_colormap( window
) );
835 gdk_window_set_background( window
, m_backgroundColour
.GetColor() );
836 gdk_window_clear( window
);
840 void wxTextCtrl::ApplyWidgetStyle()
842 if (m_windowStyle
& wxTE_MULTILINE
)
849 gtk_widget_set_style( m_text
, m_widgetStyle
);