1 /////////////////////////////////////////////////////////////////////////////
4 // Author: Robert Roebling
6 // Copyright: (c) 1998 Robert Roebling, Vadim Zeitlin
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
10 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
11 #pragma implementation "textctrl.h"
14 // For compilers that support precompilation, includes "wx.h".
15 #include "wx/wxprec.h"
17 #include "wx/textctrl.h"
21 #include "wx/settings.h"
23 #include "wx/strconv.h"
24 #include "wx/fontutil.h" // for wxNativeFontInfo (GetNativeFontInfo())
26 #include <sys/types.h>
29 #include <math.h> // for fabs
31 #include "wx/gtk/private.h"
32 #include <gdk/gdkkeysyms.h>
34 //-----------------------------------------------------------------------------
36 //-----------------------------------------------------------------------------
38 extern void wxapp_install_idle_handler();
41 //-----------------------------------------------------------------------------
43 //-----------------------------------------------------------------------------
45 extern bool g_blockEventsOnDrag
;
46 extern wxCursor g_globalCursor
;
47 extern wxWindowGTK
*g_delayedFocus
;
49 // ----------------------------------------------------------------------------
51 // ----------------------------------------------------------------------------
54 static void wxGtkTextInsert(GtkWidget
*text
,
55 GtkTextBuffer
*text_buffer
,
56 const wxTextAttr
& attr
,
60 PangoFontDescription
*font_description
= attr
.HasFont()
61 ? attr
.GetFont().GetNativeFontInfo()->description
64 GdkColor
*colFg
= attr
.HasTextColour() ? attr
.GetTextColour().GetColor()
67 GdkColor
*colBg
= attr
.HasBackgroundColour()
68 ? attr
.GetBackgroundColour().GetColor()
72 tag
= gtk_text_buffer_create_tag( text_buffer
, NULL
, "font-desc", font_description
,
73 "foreground-gdk", colFg
,
74 "background-gdk", colBg
, NULL
);
77 gtk_text_buffer_get_iter_at_mark( text_buffer
, &iter
,
78 gtk_text_buffer_get_insert (text_buffer
) );
80 gtk_text_buffer_insert_with_tags( text_buffer
, &iter
, buffer
, strlen(buffer
), tag
, NULL
);
83 static void wxGtkTextInsert(GtkWidget
*text
,
84 const wxTextAttr
& attr
,
88 GdkFont
*font
= attr
.HasFont() ? attr
.GetFont().GetInternalFont()
91 GdkColor
*colFg
= attr
.HasTextColour() ? attr
.GetTextColour().GetColor()
94 GdkColor
*colBg
= attr
.HasBackgroundColour()
95 ? attr
.GetBackgroundColour().GetColor()
98 gtk_text_insert( GTK_TEXT(text
), font
, colFg
, colBg
, txt
, len
);
102 // ----------------------------------------------------------------------------
103 // "insert_text" for GtkEntry
104 // ----------------------------------------------------------------------------
107 gtk_insert_text_callback(GtkEditable
*editable
,
108 const gchar
*new_text
,
109 gint new_text_length
,
114 wxapp_install_idle_handler();
116 // we should only be called if we have a max len limit at all
117 GtkEntry
*entry
= GTK_ENTRY (editable
);
119 wxCHECK_RET( entry
->text_max_length
, _T("shouldn't be called") );
121 // check that we don't overflow the max length limit
123 // FIXME: this doesn't work when we paste a string which is going to be
125 if ( entry
->text_length
== entry
->text_max_length
)
127 // we don't need to run the base class version at all
128 gtk_signal_emit_stop_by_name(GTK_OBJECT(editable
), "insert_text");
130 // remember that the next changed signal is to be ignored to avoid
131 // generating a dummy wxEVT_COMMAND_TEXT_UPDATED event
132 win
->IgnoreNextTextUpdate();
134 // and generate the correct one ourselves
135 wxCommandEvent
event(wxEVT_COMMAND_TEXT_MAXLEN
, win
->GetId());
136 event
.SetEventObject(win
);
137 event
.SetString(win
->GetValue());
138 win
->GetEventHandler()->ProcessEvent( event
);
142 //-----------------------------------------------------------------------------
144 //-----------------------------------------------------------------------------
147 gtk_text_changed_callback( GtkWidget
*widget
, wxTextCtrl
*win
)
149 if ( win
->IgnoreTextUpdate() )
152 if (!win
->m_hasVMT
) return;
155 wxapp_install_idle_handler();
158 win
->UpdateFontIfNeeded();
160 wxCommandEvent
event( wxEVT_COMMAND_TEXT_UPDATED
, win
->GetId() );
161 event
.SetEventObject( win
);
162 event
.SetString( win
->GetValue() );
163 win
->GetEventHandler()->ProcessEvent( event
);
166 //-----------------------------------------------------------------------------
167 // "changed" from vertical scrollbar
168 //-----------------------------------------------------------------------------
172 gtk_scrollbar_changed_callback( GtkWidget
*WXUNUSED(widget
), wxTextCtrl
*win
)
174 if (!win
->m_hasVMT
) return;
177 wxapp_install_idle_handler();
179 win
->CalculateScrollbar();
183 // ----------------------------------------------------------------------------
184 // redraw callback for multiline text
185 // ----------------------------------------------------------------------------
189 // redrawing a GtkText from inside a wxYield() call results in crashes (the
190 // text sample shows it in its "Add lines" command which shows wxProgressDialog
191 // which implicitly calls wxYield()) so we override GtkText::draw() and simply
192 // don't do anything if we're inside wxYield()
194 extern bool wxIsInsideYield
;
197 typedef void (*GtkDrawCallback
)(GtkWidget
*widget
, GdkRectangle
*rect
);
200 static GtkDrawCallback gs_gtk_text_draw
= NULL
;
203 void wxgtk_text_draw( GtkWidget
*widget
, GdkRectangle
*rect
)
205 if ( !wxIsInsideYield
)
207 wxCHECK_RET( gs_gtk_text_draw
!= wxgtk_text_draw
,
208 _T("infinite recursion in wxgtk_text_draw aborted") );
210 gs_gtk_text_draw(widget
, rect
);
214 #endif // __WXGTK20__
216 //-----------------------------------------------------------------------------
218 //-----------------------------------------------------------------------------
220 IMPLEMENT_DYNAMIC_CLASS(wxTextCtrl
,wxControl
)
222 BEGIN_EVENT_TABLE(wxTextCtrl
, wxControl
)
223 EVT_CHAR(wxTextCtrl::OnChar
)
225 EVT_MENU(wxID_CUT
, wxTextCtrl::OnCut
)
226 EVT_MENU(wxID_COPY
, wxTextCtrl::OnCopy
)
227 EVT_MENU(wxID_PASTE
, wxTextCtrl::OnPaste
)
228 EVT_MENU(wxID_UNDO
, wxTextCtrl::OnUndo
)
229 EVT_MENU(wxID_REDO
, wxTextCtrl::OnRedo
)
231 EVT_UPDATE_UI(wxID_CUT
, wxTextCtrl::OnUpdateCut
)
232 EVT_UPDATE_UI(wxID_COPY
, wxTextCtrl::OnUpdateCopy
)
233 EVT_UPDATE_UI(wxID_PASTE
, wxTextCtrl::OnUpdatePaste
)
234 EVT_UPDATE_UI(wxID_UNDO
, wxTextCtrl::OnUpdateUndo
)
235 EVT_UPDATE_UI(wxID_REDO
, wxTextCtrl::OnUpdateRedo
)
238 void wxTextCtrl::Init()
242 m_updateFont
= FALSE
;
244 m_vScrollbar
= (GtkWidget
*)NULL
;
247 wxTextCtrl::wxTextCtrl( wxWindow
*parent
,
249 const wxString
&value
,
253 const wxValidator
& validator
,
254 const wxString
&name
)
258 Create( parent
, id
, value
, pos
, size
, style
, validator
, name
);
261 bool wxTextCtrl::Create( wxWindow
*parent
,
263 const wxString
&value
,
267 const wxValidator
& validator
,
268 const wxString
&name
)
271 m_acceptsFocus
= TRUE
;
273 if (!PreCreation( parent
, pos
, size
) ||
274 !CreateBase( parent
, id
, pos
, size
, style
, validator
, name
))
276 wxFAIL_MSG( wxT("wxTextCtrl creation failed") );
281 m_vScrollbarVisible
= FALSE
;
283 bool multi_line
= (style
& wxTE_MULTILINE
) != 0;
286 GtkTextBuffer
*buffer
= NULL
;
293 m_text
= gtk_text_view_new();
295 buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
297 // create scrolled window
298 m_widget
= gtk_scrolled_window_new( NULL
, NULL
);
299 gtk_scrolled_window_set_policy( GTK_SCROLLED_WINDOW( m_widget
),
300 GTK_POLICY_AUTOMATIC
, GTK_POLICY_AUTOMATIC
);
302 // Insert view into scrolled window
303 gtk_container_add( GTK_CONTAINER(m_widget
), m_text
);
305 // Global settings which can be overridden by tags, I guess.
306 if (HasFlag( wxHSCROLL
))
307 gtk_text_view_set_wrap_mode( GTK_TEXT_VIEW( m_text
), GTK_WRAP_NONE
);
309 gtk_text_view_set_wrap_mode( GTK_TEXT_VIEW( m_text
), GTK_WRAP_WORD
);
311 if (!HasFlag(wxNO_BORDER
))
312 gtk_scrolled_window_set_shadow_type( GTK_SCROLLED_WINDOW(m_widget
), GTK_SHADOW_IN
);
314 GTK_WIDGET_UNSET_FLAGS( m_widget
, GTK_CAN_FOCUS
);
316 // create our control ...
317 m_text
= gtk_text_new( (GtkAdjustment
*) NULL
, (GtkAdjustment
*) NULL
);
319 // ... and put into the upper left hand corner of the table
320 bool bHasHScrollbar
= FALSE
;
321 m_widget
= gtk_table_new(bHasHScrollbar
? 2 : 1, 2, FALSE
);
322 GTK_WIDGET_UNSET_FLAGS( m_widget
, GTK_CAN_FOCUS
);
323 gtk_table_attach( GTK_TABLE(m_widget
), m_text
, 0, 1, 0, 1,
324 (GtkAttachOptions
)(GTK_FILL
| GTK_EXPAND
| GTK_SHRINK
),
325 (GtkAttachOptions
)(GTK_FILL
| GTK_EXPAND
| GTK_SHRINK
),
329 gtk_text_set_word_wrap( GTK_TEXT(m_text
), TRUE
);
331 // finally, put the vertical scrollbar in the upper right corner
332 m_vScrollbar
= gtk_vscrollbar_new( GTK_TEXT(m_text
)->vadj
);
333 GTK_WIDGET_UNSET_FLAGS( m_vScrollbar
, GTK_CAN_FOCUS
);
334 gtk_table_attach(GTK_TABLE(m_widget
), m_vScrollbar
, 1, 2, 0, 1,
336 (GtkAttachOptions
)(GTK_EXPAND
| GTK_FILL
| GTK_SHRINK
),
342 // a single-line text control: no need for scrollbars
344 m_text
= gtk_entry_new();
347 m_parent
->DoAddChild( this );
349 m_focusWidget
= m_text
;
354 wxSize
size_best( DoGetBestSize() );
355 wxSize
new_size( size
);
356 if (new_size
.x
== -1)
357 new_size
.x
= size_best
.x
;
358 if (new_size
.y
== -1)
359 new_size
.y
= size_best
.y
;
360 if ((new_size
.x
!= size
.x
) || (new_size
.y
!= size
.y
))
361 SetSize( new_size
.x
, new_size
.y
);
364 gtk_widget_show(m_text
);
369 gtk_signal_connect(GTK_OBJECT(GTK_TEXT(m_text
)->vadj
), "changed",
370 (GtkSignalFunc
) gtk_scrollbar_changed_callback
, (gpointer
) this );
372 // only initialize gs_gtk_text_draw once, starting from the next the
373 // klass::draw will already be wxgtk_text_draw
374 if ( !gs_gtk_text_draw
)
377 draw
= GTK_WIDGET_CLASS(GTK_OBJECT(m_text
)->klass
)->draw
;
379 gs_gtk_text_draw
= draw
;
381 draw
= wxgtk_text_draw
;
386 if (!value
.IsEmpty())
392 #if !GTK_CHECK_VERSION(1, 2, 0)
393 // if we don't realize it, GTK 1.0.6 dies with a SIGSEGV in
394 // gtk_editable_insert_text()
395 gtk_widget_realize(m_text
);
400 wxWX2MBbuf val
= value
.mbc_str();
401 gtk_editable_insert_text( GTK_EDITABLE(m_text
), val
, strlen(val
), &tmp
);
403 gtk_editable_insert_text( GTK_EDITABLE(m_text
), value
, value
.Length(), &tmp
);
408 // Bring editable's cursor uptodate. Bug in GTK.
409 SET_EDITABLE_POS(m_text
, gtk_text_get_point( GTK_TEXT(m_text
) ));
415 if (style
& wxTE_PASSWORD
)
418 gtk_entry_set_visibility( GTK_ENTRY(m_text
), FALSE
);
421 if (style
& wxTE_READONLY
)
424 gtk_entry_set_editable( GTK_ENTRY(m_text
), FALSE
);
427 gtk_text_view_set_editable( GTK_TEXT_VIEW( m_text
), FALSE
);
434 gtk_text_set_editable( GTK_TEXT(m_text
), 1 );
438 // We want to be notified about text changes.
442 g_signal_connect( G_OBJECT(buffer
), "changed",
443 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
448 gtk_signal_connect( GTK_OBJECT(m_text
), "changed",
449 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
452 // we don't set a valid background colour, because the window
453 // manager should use a default one
454 m_backgroundColour
= wxColour();
456 wxColour colFg
= parent
->GetForegroundColour();
457 SetForegroundColour( colFg
);
459 m_cursor
= wxCursor( wxCURSOR_IBEAM
);
461 wxTextAttr
attrDef( colFg
, m_backgroundColour
, parent
->GetFont() );
462 SetDefaultStyle( attrDef
);
469 void wxTextCtrl::CalculateScrollbar()
472 if ((m_windowStyle
& wxTE_MULTILINE
) == 0) return;
474 GtkAdjustment
*adj
= GTK_TEXT(m_text
)->vadj
;
476 if (adj
->upper
- adj
->page_size
< 0.8)
478 if (m_vScrollbarVisible
)
480 gtk_widget_hide( m_vScrollbar
);
481 m_vScrollbarVisible
= FALSE
;
486 if (!m_vScrollbarVisible
)
488 gtk_widget_show( m_vScrollbar
);
489 m_vScrollbarVisible
= TRUE
;
495 wxString
wxTextCtrl::GetValue() const
497 wxCHECK_MSG( m_text
!= NULL
, wxT(""), wxT("invalid text ctrl") );
500 if (m_windowStyle
& wxTE_MULTILINE
)
503 GtkTextBuffer
*text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
506 gtk_text_buffer_get_start_iter( text_buffer
, &start
);
508 gtk_text_buffer_get_end_iter( text_buffer
, &end
);
509 gchar
*text
= gtk_text_buffer_get_text( text_buffer
, &start
, &end
, TRUE
);
512 wxWCharBuffer
buffer( wxConvUTF8
.cMB2WX( text
) );
514 wxCharBuffer
buffer( wxConvLocal
.cWC2WX( wxConvUTF8
.cMB2WC( text
) ) );
520 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
521 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
528 tmp
= wxGTK_CONV_BACK( gtk_entry_get_text( GTK_ENTRY(m_text
) ) );
534 void wxTextCtrl::SetValue( const wxString
&value
)
536 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
538 if (m_windowStyle
& wxTE_MULTILINE
)
543 wxCharBuffer
buffer( wxConvUTF8
.cWX2MB( value
) );
545 wxCharBuffer
buffer( wxConvUTF8
.cWC2MB( wxConvLocal
.cWX2WC( value
) ) );
547 GtkTextBuffer
*text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
548 gtk_text_buffer_set_text( text_buffer
, buffer
, strlen(buffer
) );
551 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
552 gtk_editable_delete_text( GTK_EDITABLE(m_text
), 0, len
);
554 gtk_editable_insert_text( GTK_EDITABLE(m_text
), value
.mbc_str(), value
.Length(), &len
);
559 gtk_entry_set_text( GTK_ENTRY(m_text
), wxGTK_CONV( value
) );
562 // GRG, Jun/2000: Changed this after a lot of discussion in
563 // the lists. wxWindows 2.2 will have a set of flags to
564 // customize this behaviour.
565 SetInsertionPoint(0);
570 void wxTextCtrl::WriteText( const wxString
&text
)
572 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
577 if ( m_windowStyle
& wxTE_MULTILINE
)
582 wxCharBuffer
buffer( wxConvUTF8
.cWX2MB( text
) );
584 wxCharBuffer
buffer( wxConvUTF8
.cWC2MB( wxConvLocal
.cWX2WC( text
) ) );
586 GtkTextBuffer
*text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
588 // TODO: Call whatever is needed to delete the selection.
589 wxGtkTextInsert( m_text
, text_buffer
, m_defaultStyle
, buffer
);
591 GtkAdjustment
*adj
= gtk_scrolled_window_get_vadjustment( GTK_SCROLLED_WINDOW(m_widget
) );
592 // Scroll to cursor, but only if scrollbar thumb is at the very bottom
593 if ( adj
->value
== adj
->upper
- adj
->page_size
)
595 gtk_text_view_scroll_to_mark( GTK_TEXT_VIEW(m_text
),
596 gtk_text_buffer_get_insert( text_buffer
), 0.0, FALSE
, 0.0, 1.0 );
599 // After cursor movements, gtk_text_get_point() is wrong by one.
600 gtk_text_set_point( GTK_TEXT(m_text
), GET_EDITABLE_POS(m_text
) );
602 // always use m_defaultStyle, even if it is empty as otherwise
603 // resetting the style and appending some more text wouldn't work: if
604 // we don't specify the style explicitly, the old style would be used
605 gtk_editable_delete_selection( GTK_EDITABLE(m_text
) );
606 wxGtkTextInsert(m_text
, m_defaultStyle
, text
.c_str(), text
.Len());
608 // we called wxGtkTextInsert with correct font, no need to do anything
609 // in UpdateFontIfNeeded() any longer
612 m_updateFont
= FALSE
;
615 // Bring editable's cursor back uptodate.
616 SET_EDITABLE_POS(m_text
, gtk_text_get_point( GTK_TEXT(m_text
) ));
617 #endif // GTK 1.x/2.0
621 // First remove the selection if there is one
622 gtk_editable_delete_selection( GTK_EDITABLE(m_text
) );
624 // This moves the cursor pos to behind the inserted text.
625 gint len
= GET_EDITABLE_POS(m_text
);
630 wxCharBuffer
buffer( wxConvUTF8
.cWX2MB( text
) );
632 wxCharBuffer
buffer( wxConvUTF8
.cWC2MB( wxConvLocal
.cWX2WC( text
) ) );
634 gtk_editable_insert_text( GTK_EDITABLE(m_text
), buffer
, strlen(buffer
), &len
);
637 gtk_editable_insert_text( GTK_EDITABLE(m_text
), text
.c_str(), text
.Len(), &len
);
640 // Bring entry's cursor uptodate.
641 gtk_entry_set_position( GTK_ENTRY(m_text
), len
);
647 void wxTextCtrl::AppendText( const wxString
&text
)
649 SetInsertionPointEnd();
653 wxString
wxTextCtrl::GetLineText( long lineNo
) const
655 if (m_windowStyle
& wxTE_MULTILINE
)
658 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
659 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
663 wxString
buf(wxT(""));
666 for (i
= 0; currentLine
!= lineNo
&& text
[i
]; i
++ )
671 for (j
= 0; text
[i
] && text
[i
] != '\n'; i
++, j
++ )
679 return wxEmptyString
;
682 GtkTextBuffer
*text_buffer
;
683 text_buffer
= gtk_text_view_get_buffer(GTK_TEXT_VIEW(m_text
));
685 gtk_text_buffer_get_iter_at_line(text_buffer
,&line
,lineNo
);
687 gtk_text_buffer_get_end_iter(text_buffer
,&end
);
688 gchar
*text
= gtk_text_buffer_get_text(text_buffer
,&line
,&end
,TRUE
);
689 wxString
result(wxGTK_CONV_BACK(text
));
691 return result
.BeforeFirst(wxT('\n'));
696 if (lineNo
== 0) return GetValue();
697 return wxEmptyString
;
701 void wxTextCtrl::OnDropFiles( wxDropFilesEvent
&WXUNUSED(event
) )
703 /* If you implement this, don't forget to update the documentation!
704 * (file docs/latex/wx/text.tex) */
705 wxFAIL_MSG( wxT("wxTextCtrl::OnDropFiles not implemented") );
708 bool wxTextCtrl::PositionToXY(long pos
, long *x
, long *y
) const
710 if ( m_windowStyle
& wxTE_MULTILINE
)
712 wxString text
= GetValue();
714 // cast to prevent warning. But pos really should've been unsigned.
715 if( (unsigned long)pos
> text
.Len() )
721 const wxChar
* stop
= text
.c_str() + pos
;
722 for ( const wxChar
*p
= text
.c_str(); p
< stop
; p
++ )
733 else // single line control
735 if ( pos
<= GTK_ENTRY(m_text
)->text_length
)
742 // index out of bounds
750 long wxTextCtrl::XYToPosition(long x
, long y
) const
752 if (!(m_windowStyle
& wxTE_MULTILINE
)) return 0;
755 for( int i
=0; i
<y
; i
++ ) pos
+= GetLineLength(i
) + 1; // one for '\n'
761 int wxTextCtrl::GetLineLength(long lineNo
) const
763 wxString str
= GetLineText (lineNo
);
764 return (int) str
.Length();
767 int wxTextCtrl::GetNumberOfLines() const
769 if (m_windowStyle
& wxTE_MULTILINE
)
772 GtkTextBuffer
*buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
774 return gtk_text_buffer_get_line_count( buffer
);
776 gint len
= gtk_text_get_length( GTK_TEXT(m_text
) );
777 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), 0, len
);
782 for (int i
= 0; i
< len
; i
++ )
789 // currentLine is 0 based, add 1 to get number of lines
790 return currentLine
+ 1;
804 void wxTextCtrl::SetInsertionPoint( long pos
)
806 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
808 if (m_windowStyle
& wxTE_MULTILINE
)
811 GtkTextBuffer
*text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
813 gtk_text_buffer_get_iter_at_offset( text_buffer
, &iter
, pos
);
814 gtk_text_buffer_place_cursor( text_buffer
, &iter
);
816 gtk_signal_disconnect_by_func( GTK_OBJECT(m_text
),
817 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
819 /* we fake a set_point by inserting and deleting. as the user
820 isn't supposed to get to know about this non-sense, we
821 disconnect so that no events are sent to the user program. */
823 gint tmp
= (gint
)pos
;
824 gtk_editable_insert_text( GTK_EDITABLE(m_text
), " ", 1, &tmp
);
825 gtk_editable_delete_text( GTK_EDITABLE(m_text
), tmp
-1, tmp
);
827 gtk_signal_connect( GTK_OBJECT(m_text
), "changed",
828 GTK_SIGNAL_FUNC(gtk_text_changed_callback
), (gpointer
)this);
830 // bring editable's cursor uptodate. Bug in GTK.
831 SET_EDITABLE_POS(m_text
, gtk_text_get_point( GTK_TEXT(m_text
) ));
836 gtk_entry_set_position( GTK_ENTRY(m_text
), (int)pos
);
838 // Bring editable's cursor uptodate. Bug in GTK.
839 SET_EDITABLE_POS(m_text
, (guint32
)pos
);
843 void wxTextCtrl::SetInsertionPointEnd()
845 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
847 if (m_windowStyle
& wxTE_MULTILINE
)
850 GtkTextBuffer
*text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
852 gtk_text_buffer_get_end_iter( text_buffer
, &end
);
853 gtk_text_buffer_place_cursor( text_buffer
, &end
);
855 SetInsertionPoint(gtk_text_get_length(GTK_TEXT(m_text
)));
860 gtk_entry_set_position( GTK_ENTRY(m_text
), -1 );
864 void wxTextCtrl::SetEditable( bool editable
)
866 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
868 if (m_windowStyle
& wxTE_MULTILINE
)
871 gtk_text_view_set_editable( GTK_TEXT_VIEW(m_text
), editable
);
873 gtk_text_set_editable( GTK_TEXT(m_text
), editable
);
878 gtk_entry_set_editable( GTK_ENTRY(m_text
), editable
);
882 bool wxTextCtrl::Enable( bool enable
)
884 if (!wxWindowBase::Enable(enable
))
890 if (m_windowStyle
& wxTE_MULTILINE
)
893 SetEditable( enable
);
895 gtk_text_set_editable( GTK_TEXT(m_text
), enable
);
896 OnParentEnable(enable
);
901 gtk_widget_set_sensitive( m_text
, enable
);
907 // wxGTK-specific: called recursively by Enable,
908 // to give widgets an oppprtunity to correct their colours after they
909 // have been changed by Enable
910 void wxTextCtrl::OnParentEnable( bool enable
)
912 // If we have a custom background colour, we use this colour in both
913 // disabled and enabled mode, or we end up with a different colour under the
915 wxColour oldColour
= GetBackgroundColour();
918 // Need to set twice or it'll optimize the useful stuff out
919 if (oldColour
== * wxWHITE
)
920 SetBackgroundColour(*wxBLACK
);
922 SetBackgroundColour(*wxWHITE
);
923 SetBackgroundColour(oldColour
);
927 void wxTextCtrl::MarkDirty()
932 void wxTextCtrl::DiscardEdits()
937 // ----------------------------------------------------------------------------
938 // max text length support
939 // ----------------------------------------------------------------------------
941 void wxTextCtrl::IgnoreNextTextUpdate()
943 m_ignoreNextUpdate
= TRUE
;
946 bool wxTextCtrl::IgnoreTextUpdate()
948 if ( m_ignoreNextUpdate
)
950 m_ignoreNextUpdate
= FALSE
;
958 void wxTextCtrl::SetMaxLength(unsigned long len
)
960 if ( !HasFlag(wxTE_MULTILINE
) )
962 gtk_entry_set_max_length(GTK_ENTRY(m_text
), len
);
964 // there is a bug in GTK+ 1.2.x: "changed" signal is emitted even if
965 // we had tried to enter more text than allowed by max text length and
966 // the text wasn't really changed
968 // to detect this and generate TEXT_MAXLEN event instead of
969 // TEXT_CHANGED one in this case we also catch "insert_text" signal
971 // when max len is set to 0 we disconnect our handler as it means that
972 // we shouldn't check anything any more
975 gtk_signal_connect( GTK_OBJECT(m_text
),
977 GTK_SIGNAL_FUNC(gtk_insert_text_callback
),
982 gtk_signal_disconnect_by_func
985 GTK_SIGNAL_FUNC(gtk_insert_text_callback
),
992 void wxTextCtrl::SetSelection( long from
, long to
)
994 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
996 if (from
== -1 && to
== -1)
999 to
= GetValue().Length();
1003 if ( (m_windowStyle
& wxTE_MULTILINE
) &&
1004 !GTK_TEXT(m_text
)->line_start_cache
)
1006 // tell the programmer that it didn't work
1007 wxLogDebug(_T("Can't call SetSelection() before realizing the control"));
1012 if (m_windowStyle
& wxTE_MULTILINE
)
1015 GtkTextBuffer
*buf
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
1017 GtkTextIter fromi
, toi
;
1018 gtk_text_buffer_get_iter_at_offset( buf
, &fromi
, from
);
1019 gtk_text_buffer_get_iter_at_offset( buf
, &toi
, to
);
1021 gtk_text_buffer_place_cursor( buf
, &toi
);
1022 gtk_text_buffer_move_mark_by_name( buf
, "selection_bound", &fromi
);
1024 gtk_editable_select_region( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
1029 gtk_editable_select_region( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
1033 void wxTextCtrl::ShowPosition( long pos
)
1035 if (m_windowStyle
& wxTE_MULTILINE
)
1038 GtkTextBuffer
*buf
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
1040 gtk_text_buffer_get_start_iter( buf
, &iter
);
1041 gtk_text_iter_set_offset( &iter
, pos
);
1042 GtkTextMark
*mark
= gtk_text_buffer_create_mark( buf
, NULL
, &iter
, TRUE
);
1043 gtk_text_view_scroll_to_mark( GTK_TEXT_VIEW(m_text
), mark
, 0.0, FALSE
, 0.0, 0.0 );
1045 GtkAdjustment
*vp
= GTK_TEXT(m_text
)->vadj
;
1046 float totalLines
= (float) GetNumberOfLines();
1049 PositionToXY(pos
, &posX
, &posY
);
1050 float posLine
= (float) posY
;
1051 float p
= (posLine
/totalLines
)*(vp
->upper
- vp
->lower
) + vp
->lower
;
1052 gtk_adjustment_set_value(GTK_TEXT(m_text
)->vadj
, p
);
1053 #endif // GTK 1.x/2.x
1057 long wxTextCtrl::GetInsertionPoint() const
1059 wxCHECK_MSG( m_text
!= NULL
, 0, wxT("invalid text ctrl") );
1062 if (m_windowStyle
& wxTE_MULTILINE
)
1064 GtkTextBuffer
*text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
1066 // There is no direct accessor for the cursor, but
1067 // internally, the cursor is the "mark" called
1068 // "insert" in the text view's btree structure.
1070 GtkTextMark
*mark
= gtk_text_buffer_get_insert( text_buffer
);
1072 gtk_text_buffer_get_iter_at_mark( text_buffer
, &cursor
, mark
);
1074 return gtk_text_iter_get_offset( &cursor
);
1079 return (long) GET_EDITABLE_POS(m_text
);
1083 long wxTextCtrl::GetLastPosition() const
1085 wxCHECK_MSG( m_text
!= NULL
, 0, wxT("invalid text ctrl") );
1089 if (m_windowStyle
& wxTE_MULTILINE
)
1092 GtkTextBuffer
*text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
1094 gtk_text_buffer_get_end_iter( text_buffer
, &end
);
1096 pos
= gtk_text_iter_get_offset( &end
);
1098 pos
= gtk_text_get_length( GTK_TEXT(m_text
) );
1103 pos
= GTK_ENTRY(m_text
)->text_length
;
1109 void wxTextCtrl::Remove( long from
, long to
)
1111 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
1114 if (m_windowStyle
& wxTE_MULTILINE
)
1117 text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
1119 GtkTextIter fromi
, toi
;
1120 gtk_text_buffer_get_iter_at_offset( text_buffer
, &fromi
, from
);
1121 gtk_text_buffer_get_iter_at_offset( text_buffer
, &toi
, to
);
1123 gtk_text_buffer_delete( text_buffer
, &fromi
, &toi
);
1127 gtk_editable_delete_text( GTK_EDITABLE(m_text
), (gint
)from
, (gint
)to
);
1130 void wxTextCtrl::Replace( long from
, long to
, const wxString
&value
)
1132 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
1136 if (!value
.IsEmpty())
1139 SetInsertionPoint( from
);
1142 gint pos
= (gint
)from
;
1144 wxWX2MBbuf buf
= value
.mbc_str();
1145 gtk_editable_insert_text( GTK_EDITABLE(m_text
), buf
, strlen(buf
), &pos
);
1147 gtk_editable_insert_text( GTK_EDITABLE(m_text
), value
, value
.Length(), &pos
);
1148 #endif // wxUSE_UNICODE
1149 #endif // GTK 1.x/2.x
1153 void wxTextCtrl::Cut()
1155 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
1158 gtk_editable_cut_clipboard( GTK_EDITABLE(m_text
) DUMMY_CLIPBOARD_ARG
);
1162 void wxTextCtrl::Copy()
1164 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
1167 gtk_editable_copy_clipboard( GTK_EDITABLE(m_text
) DUMMY_CLIPBOARD_ARG
);
1171 void wxTextCtrl::Paste()
1173 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
1176 gtk_editable_paste_clipboard( GTK_EDITABLE(m_text
) DUMMY_CLIPBOARD_ARG
);
1181 void wxTextCtrl::Undo()
1184 wxFAIL_MSG( wxT("wxTextCtrl::Undo not implemented") );
1187 void wxTextCtrl::Redo()
1190 wxFAIL_MSG( wxT("wxTextCtrl::Redo not implemented") );
1193 bool wxTextCtrl::CanUndo() const
1196 //wxFAIL_MSG( wxT("wxTextCtrl::CanUndo not implemented") );
1200 bool wxTextCtrl::CanRedo() const
1203 //wxFAIL_MSG( wxT("wxTextCtrl::CanRedo not implemented") );
1207 // If the return values from and to are the same, there is no
1209 void wxTextCtrl::GetSelection(long* fromOut
, long* toOut
) const
1211 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
1215 bool haveSelection
= FALSE
;
1218 if (m_windowStyle
& wxTE_MULTILINE
)
1220 GtkTextBuffer
*buffer
= gtk_text_view_get_buffer (GTK_TEXT_VIEW (m_text
));
1221 GtkTextIter ifrom
, ito
;
1222 if ( gtk_text_buffer_get_selection_bounds(buffer
, &ifrom
, &ito
) )
1224 haveSelection
= TRUE
;
1225 from
= gtk_text_iter_get_offset(&ifrom
);
1226 to
= gtk_text_iter_get_offset(&ito
);
1229 else // not multi-line
1231 if ( gtk_editable_get_selection_bounds( GTK_EDITABLE(m_text
),
1234 haveSelection
= TRUE
;
1238 if ( (GTK_EDITABLE(m_text
)->has_selection
) )
1240 haveSelection
= TRUE
;
1241 from
= (long) GTK_EDITABLE(m_text
)->selection_start_pos
;
1242 to
= (long) GTK_EDITABLE(m_text
)->selection_end_pos
;
1246 if (! haveSelection
)
1247 from
= to
= GetInsertionPoint();
1251 // exchange them to be compatible with wxMSW
1264 bool wxTextCtrl::IsEditable() const
1266 wxCHECK_MSG( m_text
!= NULL
, FALSE
, wxT("invalid text ctrl") );
1269 if (m_windowStyle
& wxTE_MULTILINE
)
1271 return gtk_text_view_get_editable(GTK_TEXT_VIEW(m_text
));
1275 return gtk_editable_get_editable(GTK_EDITABLE(m_text
));
1278 return GTK_EDITABLE(m_text
)->editable
;
1282 bool wxTextCtrl::IsModified() const
1287 void wxTextCtrl::Clear()
1289 SetValue( wxT("") );
1292 void wxTextCtrl::OnChar( wxKeyEvent
&key_event
)
1294 wxCHECK_RET( m_text
!= NULL
, wxT("invalid text ctrl") );
1296 if ((key_event
.GetKeyCode() == WXK_RETURN
) && (m_windowStyle
& wxPROCESS_ENTER
))
1298 wxCommandEvent
event(wxEVT_COMMAND_TEXT_ENTER
, m_windowId
);
1299 event
.SetEventObject(this);
1300 event
.SetString(GetValue());
1301 if (GetEventHandler()->ProcessEvent(event
)) return;
1304 if ((key_event
.GetKeyCode() == WXK_RETURN
) && !(m_windowStyle
& wxTE_MULTILINE
))
1306 // This will invoke the dialog default action, such
1307 // as the clicking the default button.
1309 wxWindow
*top_frame
= m_parent
;
1310 while (top_frame
->GetParent() && !(top_frame
->IsTopLevel()))
1311 top_frame
= top_frame
->GetParent();
1313 if (top_frame
&& GTK_IS_WINDOW(top_frame
->m_widget
))
1315 GtkWindow
*window
= GTK_WINDOW(top_frame
->m_widget
);
1317 if (window
->default_widget
)
1319 gtk_widget_activate (window
->default_widget
);
1328 GtkWidget
* wxTextCtrl::GetConnectWidget()
1330 return GTK_WIDGET(m_text
);
1333 bool wxTextCtrl::IsOwnGtkWindow( GdkWindow
*window
)
1335 if (m_windowStyle
& wxTE_MULTILINE
)
1338 return window
== gtk_text_view_get_window( GTK_TEXT_VIEW( m_text
), GTK_TEXT_WINDOW_TEXT
); // pure guesswork
1340 return (window
== GTK_TEXT(m_text
)->text_area
);
1345 return (window
== GTK_ENTRY(m_text
)->text_area
);
1349 // the font will change for subsequent text insertiongs
1350 bool wxTextCtrl::SetFont( const wxFont
&font
)
1352 wxCHECK_MSG( m_text
!= NULL
, FALSE
, wxT("invalid text ctrl") );
1354 if ( !wxTextCtrlBase::SetFont(font
) )
1356 // font didn't change, nothing to do
1360 if ( m_windowStyle
& wxTE_MULTILINE
)
1362 m_updateFont
= TRUE
;
1364 m_defaultStyle
.SetFont(font
);
1366 ChangeFontGlobally();
1372 void wxTextCtrl::ChangeFontGlobally()
1374 // this method is very inefficient and hence should be called as rarely as
1376 wxASSERT_MSG( (m_windowStyle
& wxTE_MULTILINE
) && m_updateFont
,
1377 _T("shouldn't be called for single line controls") );
1379 wxString value
= GetValue();
1380 if ( !value
.IsEmpty() )
1382 m_updateFont
= FALSE
;
1389 void wxTextCtrl::UpdateFontIfNeeded()
1392 ChangeFontGlobally();
1395 bool wxTextCtrl::SetForegroundColour(const wxColour
& colour
)
1397 if ( !wxControl::SetForegroundColour(colour
) )
1400 // update default fg colour too
1401 m_defaultStyle
.SetTextColour(colour
);
1406 bool wxTextCtrl::SetBackgroundColour( const wxColour
&colour
)
1408 wxCHECK_MSG( m_text
!= NULL
, FALSE
, wxT("invalid text ctrl") );
1410 if ( !wxControl::SetBackgroundColour( colour
) )
1413 if (!m_widget
->window
)
1416 wxColour sysbg
= wxSystemSettings::GetColour( wxSYS_COLOUR_BTNFACE
);
1417 if (sysbg
.Red() == colour
.Red() &&
1418 sysbg
.Green() == colour
.Green() &&
1419 sysbg
.Blue() == colour
.Blue())
1421 return FALSE
; // FIXME or TRUE?
1424 if (!m_backgroundColour
.Ok())
1427 if (m_windowStyle
& wxTE_MULTILINE
)
1430 GdkWindow
*window
= GTK_TEXT(m_text
)->text_area
;
1433 m_backgroundColour
.CalcPixel( gdk_window_get_colormap( window
) );
1434 gdk_window_set_background( window
, m_backgroundColour
.GetColor() );
1435 gdk_window_clear( window
);
1439 // change active background color too
1440 m_defaultStyle
.SetBackgroundColour( colour
);
1445 bool wxTextCtrl::SetStyle( long start
, long end
, const wxTextAttr
& style
)
1447 if ( m_windowStyle
& wxTE_MULTILINE
)
1449 if ( style
.IsDefault() )
1455 GtkTextBuffer
*text_buffer
= gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text
) );
1456 gint l
= gtk_text_buffer_get_char_count( text_buffer
);
1458 wxCHECK_MSG( start
>= 0 && end
<= l
, FALSE
,
1459 _T("invalid range in wxTextCtrl::SetStyle") );
1461 GtkTextIter starti
, endi
;
1462 gtk_text_buffer_get_iter_at_offset( text_buffer
, &starti
, start
);
1463 gtk_text_buffer_get_iter_at_offset( text_buffer
, &endi
, end
);
1465 // use the attributes from style which are set in it and fall back
1466 // first to the default style and then to the text control default
1467 // colours for the others
1468 wxTextAttr attr
= wxTextAttr::Combine(style
, m_defaultStyle
, this);
1470 PangoFontDescription
*font_description
= attr
.HasFont()
1471 ? attr
.GetFont().GetNativeFontInfo()->description
1474 GdkColor
*colFg
= attr
.HasTextColour() ? attr
.GetTextColour().GetColor()
1477 GdkColor
*colBg
= attr
.HasBackgroundColour()
1478 ? attr
.GetBackgroundColour().GetColor()
1482 tag
= gtk_text_buffer_create_tag( text_buffer
, NULL
, "font-desc", font_description
,
1483 "foreground-gdk", colFg
,
1484 "background-gdk", colBg
, NULL
);
1485 gtk_text_buffer_apply_tag( text_buffer
, tag
, &starti
, &endi
);
1489 // VERY dirty way to do that - removes the required text and re-adds it
1490 // with styling (FIXME)
1492 gint l
= gtk_text_get_length( GTK_TEXT(m_text
) );
1494 wxCHECK_MSG( start
>= 0 && end
<= l
, FALSE
,
1495 _T("invalid range in wxTextCtrl::SetStyle") );
1497 gint old_pos
= gtk_editable_get_position( GTK_EDITABLE(m_text
) );
1498 char *text
= gtk_editable_get_chars( GTK_EDITABLE(m_text
), start
, end
);
1499 wxString
tmp(text
,*wxConvCurrent
);
1502 gtk_editable_delete_text( GTK_EDITABLE(m_text
), start
, end
);
1503 gtk_editable_set_position( GTK_EDITABLE(m_text
), start
);
1506 wxWX2MBbuf buf
= tmp
.mbc_str();
1507 const char *txt
= buf
;
1508 size_t txtlen
= strlen(buf
);
1510 const char *txt
= tmp
;
1511 size_t txtlen
= tmp
.length();
1514 // use the attributes from style which are set in it and fall back
1515 // first to the default style and then to the text control default
1516 // colours for the others
1517 wxGtkTextInsert(m_text
,
1518 wxTextAttr::Combine(style
, m_defaultStyle
, this),
1522 /* does not seem to help under GTK+ 1.2 !!!
1523 gtk_editable_set_position( GTK_EDITABLE(m_text), old_pos ); */
1524 SetInsertionPoint( old_pos
);
1530 // cannot do this for GTK+'s Entry widget
1535 void wxTextCtrl::ApplyWidgetStyle()
1537 if (m_windowStyle
& wxTE_MULTILINE
)
1544 gtk_widget_set_style( m_text
, m_widgetStyle
);
1548 void wxTextCtrl::OnCut(wxCommandEvent
& WXUNUSED(event
))
1553 void wxTextCtrl::OnCopy(wxCommandEvent
& WXUNUSED(event
))
1558 void wxTextCtrl::OnPaste(wxCommandEvent
& WXUNUSED(event
))
1563 void wxTextCtrl::OnUndo(wxCommandEvent
& WXUNUSED(event
))
1568 void wxTextCtrl::OnRedo(wxCommandEvent
& WXUNUSED(event
))
1573 void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent
& event
)
1575 event
.Enable( CanCut() );
1578 void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent
& event
)
1580 event
.Enable( CanCopy() );
1583 void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent
& event
)
1585 event
.Enable( CanPaste() );
1588 void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent
& event
)
1590 event
.Enable( CanUndo() );
1593 void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent
& event
)
1595 event
.Enable( CanRedo() );
1598 void wxTextCtrl::OnInternalIdle()
1600 wxCursor cursor
= m_cursor
;
1601 if (g_globalCursor
.Ok()) cursor
= g_globalCursor
;
1606 GdkWindow
*window
= (GdkWindow
*) NULL
;
1607 if (HasFlag(wxTE_MULTILINE
))
1608 window
= GTK_TEXT(m_text
)->text_area
;
1610 window
= GTK_ENTRY(m_text
)->text_area
;
1613 gdk_window_set_cursor( window
, cursor
.GetCursor() );
1615 if (!g_globalCursor
.Ok())
1616 cursor
= *wxSTANDARD_CURSOR
;
1618 window
= m_widget
->window
;
1619 if ((window
) && !(GTK_WIDGET_NO_WINDOW(m_widget
)))
1620 gdk_window_set_cursor( window
, cursor
.GetCursor() );
1624 if (g_delayedFocus
== this)
1626 if (GTK_WIDGET_REALIZED(m_widget
))
1628 gtk_widget_grab_focus( m_widget
);
1629 g_delayedFocus
= NULL
;
1633 if (wxUpdateUIEvent::CanUpdate(this))
1634 UpdateWindowUI(wxUPDATE_UI_FROMIDLE
);
1637 wxSize
wxTextCtrl::DoGetBestSize() const
1639 // FIXME should be different for multi-line controls...
1640 wxSize
ret( wxControl::DoGetBestSize() );
1641 return wxSize(80, ret
.y
);
1644 // ----------------------------------------------------------------------------
1646 // ----------------------------------------------------------------------------
1648 void wxTextCtrl::Freeze()
1651 if ( HasFlag(wxTE_MULTILINE
) )
1653 gtk_text_freeze(GTK_TEXT(m_text
));
1658 void wxTextCtrl::Thaw()
1661 if ( HasFlag(wxTE_MULTILINE
) )
1663 GTK_TEXT(m_text
)->vadj
->value
= 0.0;
1665 gtk_text_thaw(GTK_TEXT(m_text
));
1670 // ----------------------------------------------------------------------------
1672 // ----------------------------------------------------------------------------
1674 GtkAdjustment
*wxTextCtrl::GetVAdj() const
1679 return HasFlag(wxTE_MULTILINE
) ? GTK_TEXT(m_text
)->vadj
: NULL
;
1683 bool wxTextCtrl::DoScroll(GtkAdjustment
*adj
, int diff
)
1686 float value
= adj
->value
+ diff
;
1691 float upper
= adj
->upper
- adj
->page_size
;
1692 if ( value
> upper
)
1695 // did we noticeably change the scroll position?
1696 if ( fabs(adj
->value
- value
) < 0.2 )
1698 // well, this is what Robert does in wxScrollBar, so it must be good...
1704 gtk_signal_emit_by_name(GTK_OBJECT(adj
), "value_changed");
1710 bool wxTextCtrl::ScrollLines(int lines
)
1715 GtkAdjustment
*adj
= GetVAdj();
1719 // this is hardcoded to 10 in GTK+ 1.2 (great idea)
1720 static const int KEY_SCROLL_PIXELS
= 10;
1722 return DoScroll(adj
, lines
*KEY_SCROLL_PIXELS
);
1726 bool wxTextCtrl::ScrollPages(int pages
)
1731 GtkAdjustment
*adj
= GetVAdj();
1735 return DoScroll(adj
, (int)ceil(pages
*adj
->page_increment
));