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_WIDGET_UNSET_FLAGS( m_widget
, GTK_CAN_FOCUS
);
132 gtk_table_attach( GTK_TABLE(m_widget
), m_text
, 0, 1, 0, 1,
133 (GtkAttachOptions
)(GTK_FILL
| GTK_EXPAND
| GTK_SHRINK
),
134 (GtkAttachOptions
)(GTK_FILL
| GTK_EXPAND
| GTK_SHRINK
),
137 // put the horizontal scrollbar in the lower left hand corner
140 GtkWidget
*hscrollbar
= gtk_hscrollbar_new(GTK_TEXT(m_text
)->hadj
);
141 GTK_WIDGET_UNSET_FLAGS( hscrollbar
, GTK_CAN_FOCUS
);
143 gtk_table_attach(GTK_TABLE(m_widget
), hscrollbar
, 0, 1, 1, 2,
144 (GtkAttachOptions
)(GTK_EXPAND
| GTK_FILL
),
147 gtk_widget_show(hscrollbar
);
150 // finally, put the vertical scrollbar in the upper right corner
151 m_vScrollbar
= gtk_vscrollbar_new( GTK_TEXT(m_text
)->vadj
);
152 GTK_WIDGET_UNSET_FLAGS( m_vScrollbar
, GTK_CAN_FOCUS
);
154 gtk_table_attach(GTK_TABLE(m_widget
), m_vScrollbar
, 1, 2, 0, 1,
156 (GtkAttachOptions
)(GTK_EXPAND
| GTK_FILL
| GTK_SHRINK
),
158 gtk_widget_show( m_vScrollbar
);
160 gtk_signal_connect( GTK_OBJECT(m_widget
), "size_allocate",
161 GTK_SIGNAL_FUNC(gtk_text_size_callback
), (gpointer
)this );
165 // a single-line text control: no need for scrollbars
167 m_text
= gtk_entry_new();
170 wxSize newSize
= size
;
171 if (newSize
.x
== -1) newSize
.x
= 80;
172 if (newSize
.y
== -1) newSize
.y
= 26;
173 SetSize( newSize
.x
, newSize
.y
);
175 m_parent
->AddChild( this );
177 (m_parent
->m_insertCallback
)( m_parent
, this );
183 gtk_widget_realize(m_text
);
184 gtk_widget_show(m_text
);
187 // we want to be notified about text changes
188 gtk_signal_connect( GTK_OBJECT(m_text
), "changed",
189 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
191 if (!value
.IsEmpty())
194 gtk_editable_insert_text( GTK_EDITABLE(m_text
), value
, value
.Length(), &tmp
);
198 /* bring editable's cursor uptodate. bug in GTK. */
200 GTK_EDITABLE(m_text
)->current_pos
= gtk_text_get_point( GTK_TEXT(m_text
) );
204 if (style
& wxTE_PASSWORD
)
207 gtk_entry_set_visibility( GTK_ENTRY(m_text
), FALSE
);
210 if (style
& wxTE_READONLY
)
213 gtk_entry_set_editable( GTK_ENTRY(m_text
), FALSE
);
218 gtk_text_set_editable( GTK_TEXT(m_text
), 1 );
223 SetBackgroundColour( parent
->GetBackgroundColour() );
224 SetForegroundColour( parent
->GetForegroundColour() );
229 void wxTextCtrl::CalculateScrollbar()
231 if ((m_windowStyle
& wxTE_MULTILINE
) == 0) return;
233 GtkAdjustment
*adj
= GTK_TEXT(m_text
)->vadj
;
235 if (adj
->upper
- adj
->page_size
< 0.8)
237 if (m_vScrollbarVisible
)
239 gtk_widget_hide( m_vScrollbar
);
241 m_vScrollbarVisible
= FALSE
;
246 if (!m_vScrollbarVisible
)
248 gtk_widget_show( m_vScrollbar
);
250 m_vScrollbarVisible
= TRUE
;
255 wxString
wxTextCtrl::GetValue() const
257 wxCHECK_MSG( m_text
!= NULL
, "", "invalid text ctrl" );
260 if (m_windowStyle
& wxTE_MULTILINE
)
262 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
263 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
269 tmp
= gtk_entry_get_text( GTK_ENTRY(m_text
) );
274 void wxTextCtrl::SetValue( const wxString
&value
)
276 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
279 if (!value
.IsNull()) tmp
= value
;
280 if (m_windowStyle
& wxTE_MULTILINE
)
282 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
283 gtk_editable_delete_text( GTK_EDITABLE(m_text
), 0, len
);
285 gtk_editable_insert_text( GTK_EDITABLE(m_text
), tmp
, tmp
.Length(), &len
);
289 gtk_entry_set_text( GTK_ENTRY(m_text
), tmp
);
293 void wxTextCtrl::WriteText( const wxString
&text
)
295 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
297 if (text
.IsNull()) return;
299 if (m_windowStyle
& wxTE_MULTILINE
)
301 /* this moves the cursor pos to behind the inserted text */
302 gint len
= GTK_EDITABLE(m_text
)->current_pos
;
304 gtk_editable_insert_text( GTK_EDITABLE(m_text
), text
, text
.Length(), &len
);
306 /* bring editable's cursor uptodate. bug in GTK. */
307 GTK_EDITABLE(m_text
)->current_pos
= gtk_text_get_point( GTK_TEXT(m_text
) );
311 /* this moves the cursor pos to behind the inserted text */
312 gint len
= GTK_EDITABLE(m_text
)->current_pos
;
313 gtk_editable_insert_text( GTK_EDITABLE(m_text
), text
, text
.Length(), &len
);
315 /* bring editable's cursor uptodate. bug in GTK. */
316 GTK_EDITABLE(m_text
)->current_pos
+= text
.Len();
318 /* bring entry's cursor uptodate. bug in GTK. */
319 gtk_entry_set_position( GTK_ENTRY(m_text
), GTK_EDITABLE(m_text
)->current_pos
);
323 void wxTextCtrl::AppendText( const wxString
&text
)
325 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
327 if (m_windowStyle
& wxTE_MULTILINE
)
329 /* we'll insert at the last position */
330 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
331 gtk_editable_insert_text( GTK_EDITABLE(m_text
), text
, text
.Length(), &len
);
333 /* bring editable's cursor uptodate. bug in GTK. */
334 GTK_EDITABLE(m_text
)->current_pos
= gtk_text_get_point( GTK_TEXT(m_text
) );
338 gtk_entry_append_text( GTK_ENTRY(m_text
), text
);
342 bool wxTextCtrl::LoadFile( const wxString
&file
)
344 wxCHECK_MSG( m_text
!= NULL
, FALSE
, "invalid text ctrl" );
346 if (!wxFileExists(file
)) return FALSE
;
350 FILE *fp
= (FILE*) NULL
;
353 if ((stat ((char*) (const char*) file
, &statb
) == -1) || (statb
.st_mode
& S_IFMT
) != S_IFREG
||
354 !(fp
= fopen ((char*) (const char*) file
, "r")))
360 gint len
= statb
.st_size
;
362 if (!(text
= (char*)malloc ((unsigned) (len
+ 1))))
367 if (fread (text
, sizeof (char), len
, fp
) != (size_t) len
)
374 if (m_windowStyle
& wxTE_MULTILINE
)
377 gtk_editable_insert_text( GTK_EDITABLE(m_text
), text
, len
, &pos
);
381 gtk_entry_set_text( GTK_ENTRY(m_text
), text
);
391 bool wxTextCtrl::SaveFile( const wxString
&file
)
393 wxCHECK_MSG( m_text
!= NULL
, FALSE
, "invalid text ctrl" );
395 if (file
== "") return FALSE
;
399 if (!(fp
= fopen ((char*) (const char*) file
, "w")))
405 char *text
= (char*) NULL
;
408 if (m_windowStyle
& wxTE_MULTILINE
)
410 len
= gtk_text_get_length( GTK_TEXT(m_text
) );
411 text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
415 text
= gtk_entry_get_text( GTK_ENTRY(m_text
) );
418 if (fwrite (text
, sizeof (char), len
, fp
) != (size_t) len
)
420 // Did not write whole file
423 // Make sure newline terminates the file
424 if (text
[len
- 1] != '\n')
429 if (m_windowStyle
& wxTE_MULTILINE
) g_free( text
);
438 wxString
wxTextCtrl::GetLineText( long lineNo
) const
440 if (m_windowStyle
& wxTE_MULTILINE
)
442 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
443 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
450 for (i
= 0; currentLine
!= lineNo
&& text
[i
]; i
++ )
455 for (j
= 0; text
[i
] && text
[i
] != '\n'; i
++, j
++ )
462 return wxEmptyString
;
466 if (lineNo
== 0) return GetValue();
467 return wxEmptyString
;
471 void wxTextCtrl::OnDropFiles( wxDropFilesEvent
&WXUNUSED(event
) )
473 /* If you implement this, don't forget to update the documentation!
474 * (file docs/latex/wx/text.tex) */
475 wxFAIL_MSG( "wxTextCtrl::OnDropFiles not implemented" );
478 long wxTextCtrl::PositionToXY(long pos
, long *x
, long *y
) const
480 if ( m_windowStyle
& wxTE_MULTILINE
)
482 wxString text
= GetValue();
484 // cast to prevent warning. But pos really should've been unsigned.
485 if( (unsigned long)pos
> text
.Len() )
491 const char* stop
= text
.c_str() + pos
;
492 for ( const char *p
= text
.c_str(); p
< stop
; p
++ )
503 else // single line control
505 if ( pos
<= GTK_ENTRY(m_text
)->text_length
)
512 // index out of bounds
520 long wxTextCtrl::XYToPosition(long x
, long y
) const
522 if (!(m_windowStyle
& wxTE_MULTILINE
)) return 0;
525 for( int i
=0; i
<y
; i
++ ) pos
+= GetLineLength(i
) + 1; // one for '\n'
531 int wxTextCtrl::GetLineLength(long lineNo
) const
533 wxString str
= GetLineText (lineNo
);
534 return (int) str
.Length();
537 int wxTextCtrl::GetNumberOfLines() const
539 if (m_windowStyle
& wxTE_MULTILINE
)
541 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
542 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
547 for (int i
= 0; i
< len
; i
++ )
554 // currentLine is 0 based, add 1 to get number of lines
555 return currentLine
+ 1;
568 void wxTextCtrl::SetInsertionPoint( long pos
)
570 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
572 if (m_windowStyle
& wxTE_MULTILINE
)
574 /* seems to be broken in GTK 1.0.X:
575 gtk_text_set_point( GTK_TEXT(m_text), (int)pos ); */
577 gtk_signal_disconnect_by_func( GTK_OBJECT(m_text
),
578 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
580 /* we fake a set_point by inserting and deleting. as the user
581 isn't supposed to get to know about thos non-sense, we
582 disconnect so that no events are sent to the user program. */
584 gint tmp
= (gint
)pos
;
585 gtk_editable_insert_text( GTK_EDITABLE(m_text
), " ", 1, &tmp
);
586 gtk_editable_delete_text( GTK_EDITABLE(m_text
), tmp
-1, tmp
);
588 gtk_signal_connect( GTK_OBJECT(m_text
), "changed",
589 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
591 /* bring editable's cursor uptodate. another bug in GTK. */
593 GTK_EDITABLE(m_text
)->current_pos
= gtk_text_get_point( GTK_TEXT(m_text
) );
597 gtk_entry_set_position( GTK_ENTRY(m_text
), (int)pos
);
599 /* bring editable's cursor uptodate. bug in GTK. */
601 GTK_EDITABLE(m_text
)->current_pos
= pos
;
605 void wxTextCtrl::SetInsertionPointEnd()
607 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
609 if (m_windowStyle
& wxTE_MULTILINE
)
610 SetInsertionPoint(gtk_text_get_length(GTK_TEXT(m_text
)));
612 gtk_entry_set_position( GTK_ENTRY(m_text
), -1 );
615 void wxTextCtrl::SetEditable( bool editable
)
617 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
619 if (m_windowStyle
& wxTE_MULTILINE
)
620 gtk_text_set_editable( GTK_TEXT(m_text
), editable
);
622 gtk_entry_set_editable( GTK_ENTRY(m_text
), editable
);
625 void wxTextCtrl::SetSelection( long from
, long to
)
627 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
629 gtk_editable_select_region( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
632 void wxTextCtrl::ShowPosition( long WXUNUSED(pos
) )
634 wxFAIL_MSG( "wxTextCtrl::ShowPosition not implemented" );
637 long wxTextCtrl::GetInsertionPoint() const
639 wxCHECK_MSG( m_text
!= NULL
, 0, "invalid text ctrl" );
641 return (long) GTK_EDITABLE(m_text
)->current_pos
;
644 long wxTextCtrl::GetLastPosition() const
646 wxCHECK_MSG( m_text
!= NULL
, 0, "invalid text ctrl" );
649 if (m_windowStyle
& wxTE_MULTILINE
)
650 pos
= gtk_text_get_length( GTK_TEXT(m_text
) );
652 pos
= GTK_ENTRY(m_text
)->text_length
;
657 void wxTextCtrl::Remove( long from
, long to
)
659 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
661 gtk_editable_delete_text( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
664 void wxTextCtrl::Replace( long from
, long to
, const wxString
&value
)
666 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
668 gtk_editable_delete_text( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
669 if (value
.IsNull()) return;
670 gint pos
= (gint
)from
;
671 gtk_editable_insert_text( GTK_EDITABLE(m_text
), value
, value
.Length(), &pos
);
674 void wxTextCtrl::Cut()
676 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
678 #if (GTK_MINOR_VERSION == 1)
679 gtk_editable_cut_clipboard( GTK_EDITABLE(m_text
) );
681 gtk_editable_cut_clipboard( GTK_EDITABLE(m_text
), 0 );
685 void wxTextCtrl::Copy()
687 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
689 #if (GTK_MINOR_VERSION == 1)
690 gtk_editable_copy_clipboard( GTK_EDITABLE(m_text
) );
692 gtk_editable_copy_clipboard( GTK_EDITABLE(m_text
), 0 );
696 void wxTextCtrl::Paste()
698 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
700 #if (GTK_MINOR_VERSION == 1)
701 gtk_editable_paste_clipboard( GTK_EDITABLE(m_text
) );
703 gtk_editable_paste_clipboard( GTK_EDITABLE(m_text
), 0 );
707 void wxTextCtrl::Clear()
712 void wxTextCtrl::OnChar( wxKeyEvent
&key_event
)
714 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
716 if ((key_event
.KeyCode() == WXK_RETURN
) && (m_windowStyle
& wxPROCESS_ENTER
))
718 wxCommandEvent
event(wxEVT_COMMAND_TEXT_ENTER
, m_windowId
);
719 event
.SetEventObject(this);
720 if (GetEventHandler()->ProcessEvent(event
)) return;
726 #ifndef NO_TEXT_WINDOW_STREAM
727 int wxTextCtrl::overflow( int WXUNUSED(c
) )
729 int len
= pptr() - pbase();
730 char *txt
= new char[len
+1];
731 strncpy(txt
, pbase(), len
);
734 setp(pbase(), epptr());
739 int wxTextCtrl::sync()
741 int len
= pptr() - pbase();
742 char *txt
= new char[len
+1];
743 strncpy(txt
, pbase(), len
);
746 setp(pbase(), epptr());
751 int wxTextCtrl::underflow()
756 wxTextCtrl
& wxTextCtrl::operator<<(const wxString
& s
)
762 wxTextCtrl
& wxTextCtrl::operator<<(float f
)
764 static char buf
[100];
765 sprintf(buf
, "%.2f", f
);
770 wxTextCtrl
& wxTextCtrl::operator<<(double d
)
772 static char buf
[100];
773 sprintf(buf
, "%.2f", d
);
778 wxTextCtrl
& wxTextCtrl::operator<<(int i
)
780 static char buf
[100];
781 sprintf(buf
, "%i", i
);
786 wxTextCtrl
& wxTextCtrl::operator<<(long i
)
788 static char buf
[100];
789 sprintf(buf
, "%ld", i
);
794 wxTextCtrl
& wxTextCtrl::operator<<(const char c
)
805 GtkWidget
* wxTextCtrl::GetConnectWidget()
807 return GTK_WIDGET(m_text
);
810 bool wxTextCtrl::IsOwnGtkWindow( GdkWindow
*window
)
812 if (m_windowStyle
& wxTE_MULTILINE
)
813 return (window
== GTK_TEXT(m_text
)->text_area
);
815 return (window
== GTK_ENTRY(m_text
)->text_area
);
818 void wxTextCtrl::SetFont( const wxFont
&WXUNUSED(font
) )
820 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
825 void wxTextCtrl::SetForegroundColour( const wxColour
&WXUNUSED(colour
) )
827 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
832 void wxTextCtrl::SetBackgroundColour( const wxColour
&colour
)
834 wxCHECK_RET( m_text
!= NULL
, "invalid text ctrl" );
836 wxControl::SetBackgroundColour( colour
);
838 wxColour sysbg
= wxSystemSettings::GetSystemColour( wxSYS_COLOUR_BTNFACE
);
839 if (sysbg
.Red() == colour
.Red() &&
840 sysbg
.Green() == colour
.Green() &&
841 sysbg
.Blue() == colour
.Blue())
846 if (!m_backgroundColour
.Ok()) return;
848 if (m_windowStyle
& wxTE_MULTILINE
)
850 GdkWindow
*window
= GTK_TEXT(m_text
)->text_area
;
851 m_backgroundColour
.CalcPixel( gdk_window_get_colormap( window
) );
852 gdk_window_set_background( window
, m_backgroundColour
.GetColor() );
853 gdk_window_clear( window
);
857 void wxTextCtrl::ApplyWidgetStyle()
859 if (m_windowStyle
& wxTE_MULTILINE
)
866 gtk_widget_set_style( m_text
, m_widgetStyle
);