#include "wx/textctrl.h"
#include "wx/utils.h"
#include "wx/intl.h"
+#include "wx/log.h"
#include "wx/settings.h"
+#include "wx/panel.h"
#include <sys/types.h>
#include <sys/stat.h>
#include <ctype.h>
+#include <math.h> // for fabs
#include "gdk/gdk.h"
#include "gtk/gtk.h"
#include "gdk/gdkkeysyms.h"
+//-----------------------------------------------------------------------------
+// idle system
+//-----------------------------------------------------------------------------
+
+extern void wxapp_install_idle_handler();
+extern bool g_isIdle;
+
//-----------------------------------------------------------------------------
// data
//-----------------------------------------------------------------------------
-extern bool g_blockEventsOnDrag;
+extern bool g_blockEventsOnDrag;
+extern wxCursor g_globalCursor;
+
+// ----------------------------------------------------------------------------
+// "insert_text" for GtkEntry
+// ----------------------------------------------------------------------------
+
+static void
+gtk_insert_text_callback(GtkEditable *editable,
+ const gchar *new_text,
+ gint new_text_length,
+ gint *position,
+ wxTextCtrl *win)
+{
+ if (g_isIdle)
+ wxapp_install_idle_handler();
+
+ // we should only be called if we have a max len limit at all
+ GtkEntry *entry = GTK_ENTRY (editable);
+
+ wxCHECK_RET( entry->text_max_length, _T("shouldn't be called") );
+
+ // check that we don't overflow the max length limit
+ //
+ // FIXME: this doesn't work when we paste a string which is going to be
+ // truncated
+ if ( entry->text_length == entry->text_max_length )
+ {
+ // we don't need to run the base class version at all
+ gtk_signal_emit_stop_by_name(GTK_OBJECT(editable), "insert_text");
+
+ // remember that the next changed signal is to be ignored to avoid
+ // generating a dummy wxEVT_COMMAND_TEXT_UPDATED event
+ win->IgnoreNextTextUpdate();
+
+ // and generate the correct one ourselves
+ wxCommandEvent event(wxEVT_COMMAND_TEXT_MAXLEN, win->GetId());
+ event.SetEventObject(win);
+ event.SetString(win->GetValue());
+ win->GetEventHandler()->ProcessEvent( event );
+ }
+}
//-----------------------------------------------------------------------------
// "changed"
static void
gtk_text_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win )
{
- win->SetModified();
+ if ( win->IgnoreTextUpdate() )
+ return;
- win->CalculateScrollbar();
+ if (!win->m_hasVMT) return;
+
+ if (g_isIdle)
+ wxapp_install_idle_handler();
- wxCommandEvent event( wxEVT_COMMAND_TEXT_UPDATED, win->m_windowId );
- event.SetString( copystring(win->GetValue()) );
+ win->SetModified();
+ win->UpdateFontIfNeeded();
+
+ wxCommandEvent event( wxEVT_COMMAND_TEXT_UPDATED, win->GetId() );
event.SetEventObject( win );
+ event.SetString( win->GetValue() );
win->GetEventHandler()->ProcessEvent( event );
- delete[] event.GetString();
}
//-----------------------------------------------------------------------------
-// "size_allocate"
+// "changed" from vertical scrollbar
//-----------------------------------------------------------------------------
static void
-gtk_text_size_callback( GtkWidget *WXUNUSED(widget), GtkAllocation* WXUNUSED(alloc), wxTextCtrl *win )
+gtk_scrollbar_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win )
{
+ if (!win->m_hasVMT) return;
+
+ if (g_isIdle)
+ wxapp_install_idle_handler();
+
win->CalculateScrollbar();
}
BEGIN_EVENT_TABLE(wxTextCtrl, wxControl)
EVT_CHAR(wxTextCtrl::OnChar)
-END_EVENT_TABLE()
-#ifndef NO_TEXT_WINDOW_STREAM
-wxTextCtrl::wxTextCtrl() : streambuf()
-{
- if (allocate()) setp(base(),ebuf());
+ EVT_MENU(wxID_CUT, wxTextCtrl::OnCut)
+ EVT_MENU(wxID_COPY, wxTextCtrl::OnCopy)
+ EVT_MENU(wxID_PASTE, wxTextCtrl::OnPaste)
+ EVT_MENU(wxID_UNDO, wxTextCtrl::OnUndo)
+ EVT_MENU(wxID_REDO, wxTextCtrl::OnRedo)
+
+ EVT_UPDATE_UI(wxID_CUT, wxTextCtrl::OnUpdateCut)
+ EVT_UPDATE_UI(wxID_COPY, wxTextCtrl::OnUpdateCopy)
+ EVT_UPDATE_UI(wxID_PASTE, wxTextCtrl::OnUpdatePaste)
+ EVT_UPDATE_UI(wxID_UNDO, wxTextCtrl::OnUpdateUndo)
+ EVT_UPDATE_UI(wxID_REDO, wxTextCtrl::OnUpdateRedo)
+END_EVENT_TABLE()
- m_modified = FALSE;
-}
-#else
-wxTextCtrl::wxTextCtrl()
+void wxTextCtrl::Init()
{
+ m_ignoreNextUpdate =
m_modified = FALSE;
+ m_updateFont = FALSE;
+ m_text =
+ m_vScrollbar = (GtkWidget *)NULL;
}
-#endif
-#ifndef NO_TEXT_WINDOW_STREAM
-wxTextCtrl::wxTextCtrl( wxWindow *parent, wxWindowID id, const wxString &value,
- const wxPoint &pos, const wxSize &size,
- int style, const wxValidator& validator, const wxString &name ) : streambuf()
+wxTextCtrl::wxTextCtrl( wxWindow *parent,
+ wxWindowID id,
+ const wxString &value,
+ const wxPoint &pos,
+ const wxSize &size,
+ long style,
+ const wxValidator& validator,
+ const wxString &name )
{
- if (allocate()) setp(base(),ebuf());
+ Init();
- m_modified = FALSE;
- Create( parent, id, value, pos, size, style, validator, name );
-}
-#else
-wxTextCtrl::wxTextCtrl( wxWindow *parent, wxWindowID id, const wxString &value,
- const wxPoint &pos, const wxSize &size,
- int style, const wxValidator& validator, const wxString &name )
-{
- m_modified = FALSE;
Create( parent, id, value, pos, size, style, validator, name );
}
-#endif
-bool wxTextCtrl::Create( wxWindow *parent, wxWindowID id, const wxString &value,
- const wxPoint &pos, const wxSize &size,
- int style, const wxValidator& validator, const wxString &name )
+bool wxTextCtrl::Create( wxWindow *parent,
+ wxWindowID id,
+ const wxString &value,
+ const wxPoint &pos,
+ const wxSize &size,
+ long style,
+ const wxValidator& validator,
+ const wxString &name )
{
m_needParent = TRUE;
m_acceptsFocus = TRUE;
- PreCreation( parent, id, pos, size, style, name );
+ if (!PreCreation( parent, pos, size ) ||
+ !CreateBase( parent, id, pos, size, style, validator, name ))
+ {
+ wxFAIL_MSG( wxT("wxTextCtrl creation failed") );
+ return FALSE;
+ }
- SetValidator( validator );
- m_vScrollbarVisible = TRUE;
+ m_vScrollbarVisible = FALSE;
bool multi_line = (style & wxTE_MULTILINE) != 0;
- if ( multi_line )
+ if (multi_line)
{
- // a multi-line edit control: create a vertical scrollbar by default and
- // horizontal if requested
+#if (GTK_MINOR_VERSION > 2)
+ /* a multi-line edit control: create a vertical scrollbar by default and
+ horizontal if requested */
bool bHasHScrollbar = (style & wxHSCROLL) != 0;
+#else
+ bool bHasHScrollbar = FALSE;
+#endif
- // create our control...
+ /* create our control ... */
m_text = gtk_text_new( (GtkAdjustment *) NULL, (GtkAdjustment *) NULL );
- // ... and put into the upper left hand corner of the table
+ /* ... and put into the upper left hand corner of the table */
m_widget = gtk_table_new(bHasHScrollbar ? 2 : 1, 2, FALSE);
+ GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
gtk_table_attach( GTK_TABLE(m_widget), m_text, 0, 1, 0, 1,
(GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK),
(GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK),
0, 0);
- // put the horizontal scrollbar in the lower left hand corner
+ /* always wrap words */
+ gtk_text_set_word_wrap( GTK_TEXT(m_text), TRUE );
+
+#if (GTK_MINOR_VERSION > 2)
+ /* put the horizontal scrollbar in the lower left hand corner */
if (bHasHScrollbar)
{
GtkWidget *hscrollbar = gtk_hscrollbar_new(GTK_TEXT(m_text)->hadj);
+ GTK_WIDGET_UNSET_FLAGS( hscrollbar, GTK_CAN_FOCUS );
gtk_table_attach(GTK_TABLE(m_widget), hscrollbar, 0, 1, 1, 2,
- (GtkAttachOptions)(GTK_EXPAND | GTK_FILL),
+ (GtkAttachOptions)(GTK_EXPAND | GTK_FILL | GTK_SHRINK),
GTK_FILL,
0, 0);
gtk_widget_show(hscrollbar);
+
+ /* don't wrap lines, otherwise we wouldn't need the scrollbar */
+ gtk_text_set_line_wrap( GTK_TEXT(m_text), FALSE );
}
+#endif
- // finally, put the vertical scrollbar in the upper right corner
+ /* finally, put the vertical scrollbar in the upper right corner */
m_vScrollbar = gtk_vscrollbar_new( GTK_TEXT(m_text)->vadj );
+ GTK_WIDGET_UNSET_FLAGS( m_vScrollbar, GTK_CAN_FOCUS );
gtk_table_attach(GTK_TABLE(m_widget), m_vScrollbar, 1, 2, 0, 1,
GTK_FILL,
(GtkAttachOptions)(GTK_EXPAND | GTK_FILL | GTK_SHRINK),
0, 0);
- gtk_widget_show( m_vScrollbar );
-
- gtk_signal_connect( GTK_OBJECT(m_widget), "size_allocate",
- GTK_SIGNAL_FUNC(gtk_text_size_callback), (gpointer)this );
}
else
{
- // a single-line text control: no need for scrollbars
+ /* a single-line text control: no need for scrollbars */
m_widget =
m_text = gtk_entry_new();
}
- wxSize newSize = size;
- if (newSize.x == -1) newSize.x = 80;
- if (newSize.y == -1) newSize.y = 26;
- SetSize( newSize.x, newSize.y );
+ m_parent->DoAddChild( this );
+
+ m_focusWidget = m_text;
+
+ PostCreation();
- m_parent->AddChild( this );
+ SetFont( parent->GetFont() );
- (m_parent->m_insertCallback)( m_parent, this );
+ wxSize size_best( DoGetBestSize() );
+ wxSize new_size( size );
+ if (new_size.x == -1)
+ new_size.x = size_best.x;
+ if (new_size.y == -1)
+ new_size.y = size_best.y;
+ if ((new_size.x != size.x) || (new_size.y != size.y))
+ SetSize( new_size.x, new_size.y );
- PostCreation();
+ if (multi_line)
+ gtk_widget_show(m_text);
if (multi_line)
{
- gtk_widget_realize(m_text);
- gtk_widget_show(m_text);
+ gtk_signal_connect(GTK_OBJECT(GTK_TEXT(m_text)->vadj), "changed",
+ (GtkSignalFunc) gtk_scrollbar_changed_callback, (gpointer) this );
}
- // we want to be notified about text changes
- gtk_signal_connect( GTK_OBJECT(m_text), "changed",
- GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
-
- if (!value.IsNull())
+ if (!value.IsEmpty())
{
gint tmp = 0;
+
+#if GTK_MINOR_VERSION == 0
+ // if we don't realize it, GTK 1.0.6 dies with a SIGSEGV in
+ // gtk_editable_insert_text()
+ gtk_widget_realize(m_text);
+#endif // GTK 1.0
+
+#if wxUSE_UNICODE
+ wxWX2MBbuf val = value.mbc_str();
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), val, strlen(val), &tmp );
+#else // !Unicode
gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &tmp );
- SetInsertionPointEnd();
+#endif // Unicode/!Unicode
+
+ if (multi_line)
+ {
+ /* bring editable's cursor uptodate. bug in GTK. */
+
+ GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
+ }
}
if (style & wxTE_PASSWORD)
gtk_text_set_editable( GTK_TEXT(m_text), 1 );
}
- Show( TRUE );
+ /* we want to be notified about text changes */
+ gtk_signal_connect( GTK_OBJECT(m_text), "changed",
+ GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
+
+ /* we don't set a valid background colour, because the window
+ manager should use a default one */
+ m_backgroundColour = wxColour();
+
+ wxColour colFg = parent->GetForegroundColour();
+ SetForegroundColour( colFg );
+
+ m_cursor = wxCursor( wxCURSOR_IBEAM );
- SetBackgroundColour( parent->GetBackgroundColour() );
- SetForegroundColour( parent->GetForegroundColour() );
+ wxTextAttr attrDef( colFg, m_backgroundColour, parent->GetFont() );
+ SetDefaultStyle( attrDef );
+
+ Show( TRUE );
return TRUE;
}
{
if (m_vScrollbarVisible)
{
- gtk_widget_hide( m_vScrollbar );
-
- m_vScrollbarVisible = FALSE;
+ gtk_widget_hide( m_vScrollbar );
+ m_vScrollbarVisible = FALSE;
}
}
else
{
if (!m_vScrollbarVisible)
{
- gtk_widget_show( m_vScrollbar );
-
- m_vScrollbarVisible = TRUE;
+ gtk_widget_show( m_vScrollbar );
+ m_vScrollbarVisible = TRUE;
}
}
}
wxString wxTextCtrl::GetValue() const
{
- wxCHECK_MSG( m_text != NULL, "", "invalid text ctrl" );
+ wxCHECK_MSG( m_text != NULL, wxT(""), wxT("invalid text ctrl") );
wxString tmp;
if (m_windowStyle & wxTE_MULTILINE)
{
gint len = gtk_text_get_length( GTK_TEXT(m_text) );
char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
- tmp = text;
+ tmp = wxString(text,*wxConvCurrent);
g_free( text );
}
else
{
- tmp = gtk_entry_get_text( GTK_ENTRY(m_text) );
+ tmp = wxString(gtk_entry_get_text( GTK_ENTRY(m_text) ),*wxConvCurrent);
}
return tmp;
}
void wxTextCtrl::SetValue( const wxString &value )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
- wxString tmp = "";
- if (!value.IsNull()) tmp = value;
if (m_windowStyle & wxTE_MULTILINE)
{
gint len = gtk_text_get_length( GTK_TEXT(m_text) );
gtk_editable_delete_text( GTK_EDITABLE(m_text), 0, len );
len = 0;
- gtk_editable_insert_text( GTK_EDITABLE(m_text), tmp, tmp.Length(), &len );
+#if wxUSE_UNICODE
+ wxWX2MBbuf tmpbuf = value.mbc_str();
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), tmpbuf, strlen(tmpbuf), &len );
+#else
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), value.mbc_str(), value.Length(), &len );
+#endif
}
else
{
- gtk_entry_set_text( GTK_ENTRY(m_text), tmp );
+ gtk_entry_set_text( GTK_ENTRY(m_text), value.mbc_str() );
}
+
+ // GRG, Jun/2000: Changed this after a lot of discussion in
+ // the lists. wxWindows 2.2 will have a set of flags to
+ // customize this behaviour.
+ SetInsertionPoint(0);
+
+ m_modified = FALSE;
}
void wxTextCtrl::WriteText( const wxString &text )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
- if (text.IsNull()) return;
+ if ( text.empty() )
+ return;
- if (m_windowStyle & wxTE_MULTILINE)
- {
- gint len = gtk_text_get_length( GTK_TEXT(m_text) );
- gtk_editable_insert_text( GTK_EDITABLE(m_text), text, text.Length(), &len );
- }
- else
+#if wxUSE_UNICODE
+ wxWX2MBbuf buf = text.mbc_str();
+ const char *txt = buf;
+ size_t txtlen = strlen(buf);
+#else
+ const char *txt = text;
+ size_t txtlen = text.length();
+#endif
+
+ if ( m_windowStyle & wxTE_MULTILINE )
{
- gtk_entry_append_text( GTK_ENTRY(m_text), text );
- }
-}
+ /* this moves the cursor pos to behind the inserted text */
+ gint len = GTK_EDITABLE(m_text)->current_pos;
-bool wxTextCtrl::LoadFile( const wxString &file )
-{
- wxCHECK_MSG( m_text != NULL, FALSE, "invalid text ctrl" );
+ // if we have any special style, use it
+ if ( !m_defaultStyle.IsDefault() )
+ {
+ GdkFont *font = m_defaultStyle.HasFont()
+ ? m_defaultStyle.GetFont().GetInternalFont()
+ : NULL;
- if (!wxFileExists(file)) return FALSE;
+ GdkColor *colFg = m_defaultStyle.HasTextColour()
+ ? m_defaultStyle.GetTextColour().GetColor()
+ : NULL;
- Clear();
+ GdkColor *colBg = m_defaultStyle.HasBackgroundColour()
+ ? m_defaultStyle.GetBackgroundColour().GetColor()
+ : NULL;
- FILE *fp = (FILE*) NULL;
- struct stat statb;
+ gtk_text_insert( GTK_TEXT(m_text), font, colFg, colBg, txt, txtlen );
+ }
+ else // no style
+ {
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), txt, txtlen, &len );
+ }
- if ((stat ((char*) (const char*) file, &statb) == -1) || (statb.st_mode & S_IFMT) != S_IFREG ||
- !(fp = fopen ((char*) (const char*) file, "r")))
- {
- return FALSE;
- }
- else
- {
- gint len = statb.st_size;
- char *text;
- if (!(text = (char*)malloc ((unsigned) (len + 1))))
- {
- fclose (fp);
- return FALSE;
+ /* bring editable's cursor uptodate. bug in GTK. */
+ GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
}
- if (fread (text, sizeof (char), len, fp) != (size_t) len)
+ else // single line
{
- }
- fclose (fp);
+ /* this moves the cursor pos to behind the inserted text */
+ gint len = GTK_EDITABLE(m_text)->current_pos;
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), txt, txtlen, &len );
- text[len] = 0;
+ /* bring editable's cursor uptodate. bug in GTK. */
+ GTK_EDITABLE(m_text)->current_pos += text.Len();
- if (m_windowStyle & wxTE_MULTILINE)
- {
- gint pos = 0;
- gtk_editable_insert_text( GTK_EDITABLE(m_text), text, len, &pos );
+ /* bring entry's cursor uptodate. bug in GTK. */
+ gtk_entry_set_position( GTK_ENTRY(m_text), GTK_EDITABLE(m_text)->current_pos );
}
- else
- {
- gtk_entry_set_text( GTK_ENTRY(m_text), text );
- }
-
- free (text);
- m_modified = FALSE;
- return TRUE;
- }
- return FALSE;
}
-bool wxTextCtrl::SaveFile( const wxString &file )
+void wxTextCtrl::AppendText( const wxString &text )
{
- wxCHECK_MSG( m_text != NULL, FALSE, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
- if (file == "") return FALSE;
+ if ( text.empty() )
+ return;
- FILE *fp;
+#if wxUSE_UNICODE
+ wxWX2MBbuf buf = text.mbc_str();
+ const char *txt = buf;
+ size_t txtlen = strlen(buf);
+#else
+ const char *txt = text;
+ size_t txtlen = text.length();
+#endif
- if (!(fp = fopen ((char*) (const char*) file, "w")))
- {
- return FALSE;
- }
- else
+ if (m_windowStyle & wxTE_MULTILINE)
{
- char *text = (char*) NULL;
- gint len = 0;
-
- if (m_windowStyle & wxTE_MULTILINE)
- {
- len = gtk_text_get_length( GTK_TEXT(m_text) );
- text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
- }
- else
- {
- text = gtk_entry_get_text( GTK_ENTRY(m_text) );
- }
-
- if (fwrite (text, sizeof (char), len, fp) != (size_t) len)
- {
- // Did not write whole file
- }
+ if ( !m_defaultStyle.IsDefault() )
+ {
+ wxFont font = m_defaultStyle.HasFont() ? m_defaultStyle.GetFont()
+ : m_font;
+ GdkFont *fnt = font.Ok() ? font.GetInternalFont() : NULL;
- // Make sure newline terminates the file
- if (text[len - 1] != '\n')
- fputc ('\n', fp);
+ wxColour col = m_defaultStyle.HasTextColour()
+ ? m_defaultStyle.GetTextColour()
+ : m_foregroundColour;
+ GdkColor *colFg = col.Ok() ? col.GetColor() : NULL;
- fclose (fp);
+ col = m_defaultStyle.HasBackgroundColour()
+ ? m_defaultStyle.GetBackgroundColour()
+ : m_backgroundColour;
+ GdkColor *colBg = col.Ok() ? col.GetColor() : NULL;
- if (m_windowStyle & wxTE_MULTILINE) g_free( text );
+ gtk_text_insert( GTK_TEXT(m_text), fnt, colFg, colBg, txt, txtlen );
+ }
+ else // no style
+ {
+ /* we'll insert at the last position */
+ gint len = gtk_text_get_length( GTK_TEXT(m_text) );
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), txt, txtlen, &len );
+ }
- m_modified = FALSE;
- return TRUE;
+ /* bring editable's cursor uptodate. bug in GTK. */
+ GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
+ }
+ else // single line
+ {
+ gtk_entry_append_text( GTK_ENTRY(m_text), txt );
}
-
- return TRUE;
}
wxString wxTextCtrl::GetLineText( long lineNo ) const
if (text)
{
- wxString buf("");
+ wxString buf(wxT(""));
long i;
int currentLine = 0;
for (i = 0; currentLine != lineNo && text[i]; i++ )
void wxTextCtrl::OnDropFiles( wxDropFilesEvent &WXUNUSED(event) )
{
- wxFAIL_MSG( "wxTextCtrl::OnDropFiles not implemented" );
+ /* If you implement this, don't forget to update the documentation!
+ * (file docs/latex/wx/text.tex) */
+ wxFAIL_MSG( wxT("wxTextCtrl::OnDropFiles not implemented") );
}
-long wxTextCtrl::PositionToXY(long pos, long *x, long *y ) const
+bool wxTextCtrl::PositionToXY(long pos, long *x, long *y ) const
{
if ( m_windowStyle & wxTE_MULTILINE )
{
wxString text = GetValue();
- if( pos >= (long)text.Len() )
+ // cast to prevent warning. But pos really should've been unsigned.
+ if( (unsigned long)pos > text.Len() )
return FALSE;
- *x=1; // Col 1
- *y=1; // Line 1
- for ( const char *p = text.c_str(); *p; p++ )
+ *x=0; // First Col
+ *y=0; // First Line
+
+ const wxChar* stop = text.c_str() + pos;
+ for ( const wxChar *p = text.c_str(); p < stop; p++ )
{
- if (*p == '\n')
+ if (*p == wxT('\n'))
{
(*y)++;
- *x=1;
+ *x=0;
}
else
(*x)++;
}
else // single line control
{
- if ( pos < GTK_ENTRY(m_text)->text_length )
+ if ( pos <= GTK_ENTRY(m_text)->text_length )
{
- *y = 1;
+ *y = 0;
*x = pos;
}
else
if (!(m_windowStyle & wxTE_MULTILINE)) return 0;
long pos=0;
+ for( int i=0; i<y; i++ ) pos += GetLineLength(i) + 1; // one for '\n'
- for( int i=1; i<y; i++ ) pos += GetLineLength(i);
-
- pos +=x-1; // Pos start with 0
+ pos += x;
return pos;
}
currentLine++;
}
g_free( text );
- return currentLine;
+
+ // currentLine is 0 based, add 1 to get number of lines
+ return currentLine + 1;
}
else
{
void wxTextCtrl::SetInsertionPoint( long pos )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
if (m_windowStyle & wxTE_MULTILINE)
- gtk_text_set_point( GTK_TEXT(m_text), (int)pos );
+ {
+ /* seems to be broken in GTK 1.0.X:
+ gtk_text_set_point( GTK_TEXT(m_text), (int)pos ); */
+
+ gtk_signal_disconnect_by_func( GTK_OBJECT(m_text),
+ GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
+
+ /* we fake a set_point by inserting and deleting. as the user
+ isn't supposed to get to know about thos non-sense, we
+ disconnect so that no events are sent to the user program. */
+
+ gint tmp = (gint)pos;
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), " ", 1, &tmp );
+ gtk_editable_delete_text( GTK_EDITABLE(m_text), tmp-1, tmp );
+
+ gtk_signal_connect( GTK_OBJECT(m_text), "changed",
+ GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
+
+ /* bring editable's cursor uptodate. another bug in GTK. */
+
+ GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
+ }
else
+ {
gtk_entry_set_position( GTK_ENTRY(m_text), (int)pos );
+
+ /* bring editable's cursor uptodate. bug in GTK. */
+
+ GTK_EDITABLE(m_text)->current_pos = (guint32)pos;
+ }
}
void wxTextCtrl::SetInsertionPointEnd()
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
if (m_windowStyle & wxTE_MULTILINE)
SetInsertionPoint(gtk_text_get_length(GTK_TEXT(m_text)));
void wxTextCtrl::SetEditable( bool editable )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
if (m_windowStyle & wxTE_MULTILINE)
gtk_text_set_editable( GTK_TEXT(m_text), editable );
gtk_entry_set_editable( GTK_ENTRY(m_text), editable );
}
+bool wxTextCtrl::Enable( bool enable )
+{
+ if (!wxWindowBase::Enable(enable))
+ {
+ // nothing to do
+ return FALSE;
+ }
+
+ if (m_windowStyle & wxTE_MULTILINE)
+ {
+ gtk_text_set_editable( GTK_TEXT(m_text), enable );
+ OnParentEnable(enable);
+ }
+ else
+ {
+ gtk_widget_set_sensitive( m_text, enable );
+ }
+
+ return TRUE;
+}
+
+// wxGTK-specific: called recursively by Enable,
+// to give widgets an oppprtunity to correct their colours after they
+// have been changed by Enable
+void wxTextCtrl::OnParentEnable( bool enable )
+{
+ // If we have a custom background colour, we use this colour in both
+ // disabled and enabled mode, or we end up with a different colour under the
+ // text.
+ wxColour oldColour = GetBackgroundColour();
+ if (oldColour.Ok())
+ {
+ // Need to set twice or it'll optimize the useful stuff out
+ if (oldColour == * wxWHITE)
+ SetBackgroundColour(*wxBLACK);
+ else
+ SetBackgroundColour(*wxWHITE);
+ SetBackgroundColour(oldColour);
+ }
+}
+
+void wxTextCtrl::DiscardEdits()
+{
+ m_modified = FALSE;
+}
+
+// ----------------------------------------------------------------------------
+// max text length support
+// ----------------------------------------------------------------------------
+
+void wxTextCtrl::IgnoreNextTextUpdate()
+{
+ m_ignoreNextUpdate = TRUE;
+}
+
+bool wxTextCtrl::IgnoreTextUpdate()
+{
+ if ( m_ignoreNextUpdate )
+ {
+ m_ignoreNextUpdate = FALSE;
+
+ return TRUE;
+ }
+
+ return FALSE;
+}
+
+void wxTextCtrl::SetMaxLength(unsigned long len)
+{
+ if ( !HasFlag(wxTE_MULTILINE) )
+ {
+ gtk_entry_set_max_length(GTK_ENTRY(m_text), len);
+
+ // there is a bug in GTK+ 1.2.x: "changed" signal is emitted even if
+ // we had tried to enter more text than allowed by max text length and
+ // the text wasn't really changed
+ //
+ // to detect this and generate TEXT_MAXLEN event instead of
+ // TEXT_CHANGED one in this case we also catch "insert_text" signal
+ //
+ // when max len is set to 0 we disconnect our handler as it means that
+ // we shouldn't check anything any more
+ if ( len )
+ {
+ gtk_signal_connect( GTK_OBJECT(m_text),
+ "insert_text",
+ GTK_SIGNAL_FUNC(gtk_insert_text_callback),
+ (gpointer)this);
+ }
+ else // no checking
+ {
+ gtk_signal_disconnect_by_func
+ (
+ GTK_OBJECT(m_text),
+ GTK_SIGNAL_FUNC(gtk_insert_text_callback),
+ (gpointer)this
+ );
+ }
+ }
+}
+
void wxTextCtrl::SetSelection( long from, long to )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
+
+ if ( (m_windowStyle & wxTE_MULTILINE) &&
+ !GTK_TEXT(m_text)->line_start_cache )
+ {
+ // tell the programmer that it didn't work
+ wxLogDebug(_T("Can't call SetSelection() before realizing the control"));
+ return;
+ }
gtk_editable_select_region( GTK_EDITABLE(m_text), (gint)from, (gint)to );
}
void wxTextCtrl::ShowPosition( long WXUNUSED(pos) )
{
- wxFAIL_MSG( "wxTextCtrl::ShowPosition not implemented" );
+// SetInsertionPoint( pos );
}
long wxTextCtrl::GetInsertionPoint() const
{
- wxCHECK_MSG( m_text != NULL, 0, "invalid text ctrl" );
+ wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
return (long) GTK_EDITABLE(m_text)->current_pos;
}
long wxTextCtrl::GetLastPosition() const
{
- wxCHECK_MSG( m_text != NULL, 0, "invalid text ctrl" );
+ wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
int pos = 0;
if (m_windowStyle & wxTE_MULTILINE)
else
pos = GTK_ENTRY(m_text)->text_length;
- return (long)pos-1;
+ return (long)pos;
}
void wxTextCtrl::Remove( long from, long to )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to );
}
void wxTextCtrl::Replace( long from, long to, const wxString &value )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to );
- if (value.IsNull()) return;
- gint pos = (gint)from;
- gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &pos );
+
+ if (!value.IsEmpty())
+ {
+ gint pos = (gint)from;
+#if wxUSE_UNICODE
+ wxWX2MBbuf buf = value.mbc_str();
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), buf, strlen(buf), &pos );
+#else
+ gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &pos );
+#endif
+ }
}
void wxTextCtrl::Cut()
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
-#if (GTK_MINOR_VERSION == 1)
+#if (GTK_MINOR_VERSION > 0)
gtk_editable_cut_clipboard( GTK_EDITABLE(m_text) );
#else
gtk_editable_cut_clipboard( GTK_EDITABLE(m_text), 0 );
void wxTextCtrl::Copy()
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
-#if (GTK_MINOR_VERSION == 1)
+#if (GTK_MINOR_VERSION > 0)
gtk_editable_copy_clipboard( GTK_EDITABLE(m_text) );
#else
gtk_editable_copy_clipboard( GTK_EDITABLE(m_text), 0 );
void wxTextCtrl::Paste()
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
-#if (GTK_MINOR_VERSION == 1)
+#if (GTK_MINOR_VERSION > 0)
gtk_editable_paste_clipboard( GTK_EDITABLE(m_text) );
#else
gtk_editable_paste_clipboard( GTK_EDITABLE(m_text), 0 );
#endif
}
-void wxTextCtrl::Clear()
+// Undo/redo
+void wxTextCtrl::Undo()
{
- SetValue( "" );
+ // TODO
+ wxFAIL_MSG( wxT("wxTextCtrl::Undo not implemented") );
}
-void wxTextCtrl::OnChar( wxKeyEvent &key_event )
+void wxTextCtrl::Redo()
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
-
- if ((key_event.KeyCode() == WXK_RETURN) && (m_windowStyle & wxPROCESS_ENTER))
- {
- wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId);
- event.SetEventObject(this);
- if (GetEventHandler()->ProcessEvent(event)) return;
- }
-
- key_event.Skip();
+ // TODO
+ wxFAIL_MSG( wxT("wxTextCtrl::Redo not implemented") );
}
-#ifndef NO_TEXT_WINDOW_STREAM
-int wxTextCtrl::overflow( int WXUNUSED(c) )
+bool wxTextCtrl::CanUndo() const
{
- int len = pptr() - pbase();
- char *txt = new char[len+1];
- strncpy(txt, pbase(), len);
- txt[len] = '\0';
- (*this) << txt;
- setp(pbase(), epptr());
- delete[] txt;
- return EOF;
+ // TODO
+ wxFAIL_MSG( wxT("wxTextCtrl::CanUndo not implemented") );
+ return FALSE;
}
-int wxTextCtrl::sync()
+bool wxTextCtrl::CanRedo() const
{
- int len = pptr() - pbase();
- char *txt = new char[len+1];
- strncpy(txt, pbase(), len);
- txt[len] = '\0';
- (*this) << txt;
- setp(pbase(), epptr());
- delete[] txt;
- return 0;
+ // TODO
+ wxFAIL_MSG( wxT("wxTextCtrl::CanRedo not implemented") );
+ return FALSE;
}
-int wxTextCtrl::underflow()
+// If the return values from and to are the same, there is no
+// selection.
+void wxTextCtrl::GetSelection(long* fromOut, long* toOut) const
{
- return EOF;
-}
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
-wxTextCtrl& wxTextCtrl::operator<<(const wxString& s)
-{
- WriteText(s);
- return *this;
-}
+ long from, to;
+ if ( !(GTK_EDITABLE(m_text)->has_selection) )
+ {
+ from =
+ to = GetInsertionPoint();
+ }
+ else // got selection
+ {
+ from = (long) GTK_EDITABLE(m_text)->selection_start_pos;
+ to = (long) GTK_EDITABLE(m_text)->selection_end_pos;
-wxTextCtrl& wxTextCtrl::operator<<(float f)
-{
- static char buf[100];
- sprintf(buf, "%.2f", f);
- WriteText(buf);
- return *this;
+ if ( from > to )
+ {
+ // exchange them to be compatible with wxMSW
+ long tmp = from;
+ from = to;
+ to = tmp;
+ }
+ }
+
+ if ( fromOut )
+ *fromOut = from;
+ if ( toOut )
+ *toOut = to;
}
-wxTextCtrl& wxTextCtrl::operator<<(double d)
+bool wxTextCtrl::IsEditable() const
{
- static char buf[100];
- sprintf(buf, "%.2f", d);
- WriteText(buf);
- return *this;
+ wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
+
+ return GTK_EDITABLE(m_text)->editable;
}
-wxTextCtrl& wxTextCtrl::operator<<(int i)
+bool wxTextCtrl::IsModified() const
{
- static char buf[100];
- sprintf(buf, "%i", i);
- WriteText(buf);
- return *this;
+ return m_modified;
}
-wxTextCtrl& wxTextCtrl::operator<<(long i)
+void wxTextCtrl::Clear()
{
- static char buf[100];
- sprintf(buf, "%ld", i);
- WriteText(buf);
- return *this;
+ SetValue( wxT("") );
}
-wxTextCtrl& wxTextCtrl::operator<<(const char c)
+void wxTextCtrl::OnChar( wxKeyEvent &key_event )
{
- char buf[2];
+ wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
+
+ if ((key_event.KeyCode() == WXK_RETURN) && (m_windowStyle & wxPROCESS_ENTER))
+ {
+ wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId);
+ event.SetEventObject(this);
+ event.SetString(GetValue());
+ if (GetEventHandler()->ProcessEvent(event)) return;
+ }
+
+ if ((key_event.KeyCode() == WXK_RETURN) && !(m_windowStyle & wxTE_MULTILINE))
+ {
+ wxWindow *top_frame = m_parent;
+ while (top_frame->GetParent() && !(top_frame->IsTopLevel()))
+ top_frame = top_frame->GetParent();
+ GtkWindow *window = GTK_WINDOW(top_frame->m_widget);
+
+ if (window->default_widget)
+ {
+ gtk_widget_activate (window->default_widget);
+ return;
+ }
+ }
- buf[0] = c;
- buf[1] = 0;
- WriteText(buf);
- return *this;
+ key_event.Skip();
}
-#endif
GtkWidget* wxTextCtrl::GetConnectWidget()
{
return (window == GTK_ENTRY(m_text)->text_area);
}
-void wxTextCtrl::SetFont( const wxFont &WXUNUSED(font) )
+// the font will change for subsequent text insertiongs
+bool wxTextCtrl::SetFont( const wxFont &font )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
+
+ if ( !wxWindowBase::SetFont(font) )
+ {
+ // font didn't change, nothing to do
+ return FALSE;
+ }
+
+ if ( m_windowStyle & wxTE_MULTILINE )
+ {
+ m_updateFont = TRUE;
+
+ m_defaultStyle.SetFont(font);
+
+ ChangeFontGlobally();
+ }
+
+ return TRUE;
+}
+
+void wxTextCtrl::ChangeFontGlobally()
+{
+ // this method is very inefficient and hence should be called as rarely as
+ // possible!
+ wxASSERT_MSG( (m_windowStyle & wxTE_MULTILINE) && m_updateFont,
+ _T("shouldn't be called for single line controls") );
+
+ wxString value = GetValue();
+ if ( !value.IsEmpty() )
+ {
+ m_updateFont = FALSE;
+
+ Clear();
+ AppendText(value);
+ }
+}
- // doesn't work
+void wxTextCtrl::UpdateFontIfNeeded()
+{
+ if ( m_updateFont )
+ ChangeFontGlobally();
}
-void wxTextCtrl::SetForegroundColour( const wxColour &WXUNUSED(colour) )
+bool wxTextCtrl::SetForegroundColour(const wxColour& colour)
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ if ( !wxControl::SetForegroundColour(colour) )
+ return FALSE;
+
+ // update default fg colour too
+ m_defaultStyle.SetTextColour(colour);
- // doesn't work
+ return TRUE;
}
-void wxTextCtrl::SetBackgroundColour( const wxColour &colour )
+bool wxTextCtrl::SetBackgroundColour( const wxColour &colour )
{
- wxCHECK_RET( m_text != NULL, "invalid text ctrl" );
+ wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
+
+ if ( !wxControl::SetBackgroundColour( colour ) )
+ return FALSE;
- wxControl::SetBackgroundColour( colour );
+ if (!m_widget->window)
+ return FALSE;
wxColour sysbg = wxSystemSettings::GetSystemColour( wxSYS_COLOUR_BTNFACE );
if (sysbg.Red() == colour.Red() &&
sysbg.Green() == colour.Green() &&
sysbg.Blue() == colour.Blue())
{
- return;
+ return FALSE; // FIXME or TRUE?
}
- if (!m_backgroundColour.Ok()) return;
+ if (!m_backgroundColour.Ok())
+ return FALSE;
if (m_windowStyle & wxTE_MULTILINE)
{
GdkWindow *window = GTK_TEXT(m_text)->text_area;
+ if (!window)
+ return FALSE;
m_backgroundColour.CalcPixel( gdk_window_get_colormap( window ) );
gdk_window_set_background( window, m_backgroundColour.GetColor() );
gdk_window_clear( window );
}
+
+ // change active background color too
+ m_defaultStyle.SetBackgroundColour( colour );
+
+ return TRUE;
+}
+
+bool wxTextCtrl::SetStyle( long start, long end, const wxTextAttr &style )
+{
+ /* VERY dirty way to do that - removes the required text and re-adds it
+ with styling (FIXME) */
+ if ( m_windowStyle & wxTE_MULTILINE )
+ {
+ if ( style.IsDefault() )
+ {
+ // nothing to do
+ return TRUE;
+ }
+
+ gint l = gtk_text_get_length( GTK_TEXT(m_text) );
+
+ wxCHECK_MSG( start >= 0 && end <= l, FALSE,
+ _T("invalid range in wxTextCtrl::SetStyle") );
+
+ gint old_pos = gtk_editable_get_position( GTK_EDITABLE(m_text) );
+ char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), start, end );
+ wxString tmp(text,*wxConvCurrent);
+ g_free( text );
+
+ gtk_editable_delete_text( GTK_EDITABLE(m_text), start, end );
+ gtk_editable_set_position( GTK_EDITABLE(m_text), start );
+
+#if wxUSE_UNICODE
+ wxWX2MBbuf buf = tmp.mbc_str();
+ const char *txt = buf;
+ size_t txtlen = strlen(buf);
+#else
+ const char *txt = tmp;
+ size_t txtlen = tmp.length();
+#endif
+
+ GdkFont *font = style.HasFont()
+ ? style.GetFont().GetInternalFont()
+ : NULL;
+
+ GdkColor *colFg = style.HasTextColour()
+ ? style.GetTextColour().GetColor()
+ : NULL;
+
+ GdkColor *colBg = style.HasBackgroundColour()
+ ? style.GetBackgroundColour().GetColor()
+ : NULL;
+
+ gtk_text_insert( GTK_TEXT(m_text), font, colFg, colBg, txt, txtlen );
+
+ /* does not seem to help under GTK+ 1.2 !!!
+ gtk_editable_set_position( GTK_EDITABLE(m_text), old_pos ); */
+ SetInsertionPoint( old_pos );
+ return TRUE;
+ }
+ else // singe line
+ {
+ // cannot do this for GTK+'s Entry widget
+ return FALSE;
+ }
}
void wxTextCtrl::ApplyWidgetStyle()
}
}
+void wxTextCtrl::OnCut(wxCommandEvent& WXUNUSED(event))
+{
+ Cut();
+}
+
+void wxTextCtrl::OnCopy(wxCommandEvent& WXUNUSED(event))
+{
+ Copy();
+}
+
+void wxTextCtrl::OnPaste(wxCommandEvent& WXUNUSED(event))
+{
+ Paste();
+}
+
+void wxTextCtrl::OnUndo(wxCommandEvent& WXUNUSED(event))
+{
+ Undo();
+}
+
+void wxTextCtrl::OnRedo(wxCommandEvent& WXUNUSED(event))
+{
+ Redo();
+}
+
+void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent& event)
+{
+ event.Enable( CanCut() );
+}
+
+void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent& event)
+{
+ event.Enable( CanCopy() );
+}
+
+void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent& event)
+{
+ event.Enable( CanPaste() );
+}
+
+void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent& event)
+{
+ event.Enable( CanUndo() );
+}
+
+void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event)
+{
+ event.Enable( CanRedo() );
+}
+
+void wxTextCtrl::OnInternalIdle()
+{
+ wxCursor cursor = m_cursor;
+ if (g_globalCursor.Ok()) cursor = g_globalCursor;
+
+ if (cursor.Ok())
+ {
+ GdkWindow *window = (GdkWindow*) NULL;
+ if (HasFlag(wxTE_MULTILINE))
+ window = GTK_TEXT(m_text)->text_area;
+ else
+ window = GTK_ENTRY(m_text)->text_area;
+
+ if (window)
+ gdk_window_set_cursor( window, cursor.GetCursor() );
+
+ if (!g_globalCursor.Ok())
+ cursor = *wxSTANDARD_CURSOR;
+
+ window = m_widget->window;
+ if ((window) && !(GTK_WIDGET_NO_WINDOW(m_widget)))
+ gdk_window_set_cursor( window, cursor.GetCursor() );
+ }
+
+ UpdateWindowUI();
+}
+
+wxSize wxTextCtrl::DoGetBestSize() const
+{
+ // FIXME should be different for multi-line controls...
+ wxSize ret( wxControl::DoGetBestSize() );
+ return wxSize(80, ret.y);
+}
+
+// ----------------------------------------------------------------------------
+// freeze/thaw
+// ----------------------------------------------------------------------------
+
+void wxTextCtrl::Freeze()
+{
+ if ( HasFlag(wxTE_MULTILINE) )
+ {
+ gtk_text_freeze(GTK_TEXT(m_text));
+ }
+}
+
+void wxTextCtrl::Thaw()
+{
+ if ( HasFlag(wxTE_MULTILINE) )
+ {
+ GTK_TEXT(m_text)->vadj->value = 0.0;
+
+ gtk_text_thaw(GTK_TEXT(m_text));
+ }
+}
+
+// ----------------------------------------------------------------------------
+// scrolling
+// ----------------------------------------------------------------------------
+
+GtkAdjustment *wxTextCtrl::GetVAdj() const
+{
+ return HasFlag(wxTE_MULTILINE) ? GTK_TEXT(m_text)->vadj : NULL;
+}
+
+bool wxTextCtrl::DoScroll(GtkAdjustment *adj, int diff)
+{
+ float value = adj->value + diff;
+
+ if ( value < 0 )
+ value = 0;
+
+ float upper = adj->upper - adj->page_size;
+ if ( value > upper )
+ value = upper;
+
+ // did we noticeably change the scroll position?
+ if ( fabs(adj->value - value) < 0.2 )
+ {
+ // well, this is what Robert does in wxScrollBar, so it must be good...
+ return FALSE;
+ }
+
+ adj->value = value;
+
+ gtk_signal_emit_by_name(GTK_OBJECT(adj), "value_changed");
+
+ return TRUE;
+}
+
+bool wxTextCtrl::ScrollLines(int lines)
+{
+ GtkAdjustment *adj = GetVAdj();
+ if ( !adj )
+ return FALSE;
+
+ // this is hardcoded to 10 in GTK+ 1.2 (great idea)
+ static const int KEY_SCROLL_PIXELS = 10;
+
+ return DoScroll(adj, lines*KEY_SCROLL_PIXELS);
+}
+
+bool wxTextCtrl::ScrollPages(int pages)
+{
+ GtkAdjustment *adj = GetVAdj();
+ if ( !adj )
+ return FALSE;
+
+ return DoScroll(adj, (int)ceil(pages*adj->page_increment));
+}
+