]> git.saurik.com Git - wxWidgets.git/blame - src/gtk/textctrl.cpp
restored wxPluginLibrary::ms_classes handling code that was removed by mistake
[wxWidgets.git] / src / gtk / textctrl.cpp
CommitLineData
c801d85f
KB
1/////////////////////////////////////////////////////////////////////////////
2// Name: textctrl.cpp
3// Purpose:
4// Author: Robert Roebling
f96aa4d9 5// Id: $Id$
a81258be 6// Copyright: (c) 1998 Robert Roebling, Vadim Zeitlin
13289f04 7// Licence: wxWindows licence
c801d85f
KB
8/////////////////////////////////////////////////////////////////////////////
9
14f355c2 10#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
c801d85f
KB
11#pragma implementation "textctrl.h"
12#endif
13
14f355c2
VS
14// For compilers that support precompilation, includes "wx.h".
15#include "wx/wxprec.h"
16
c801d85f
KB
17#include "wx/textctrl.h"
18#include "wx/utils.h"
ae0bdb01 19#include "wx/intl.h"
a1f79c1e 20#include "wx/log.h"
ae0bdb01 21#include "wx/settings.h"
fc71ef6e 22#include "wx/panel.h"
fab591c5 23#include "wx/strconv.h"
cc3da3f8 24#include "wx/fontutil.h" // for wxNativeFontInfo (GetNativeFontInfo())
c801d85f 25
a81258be
RR
26#include <sys/types.h>
27#include <sys/stat.h>
28#include <ctype.h>
817ec43a 29#include <math.h> // for fabs
a81258be 30
9e691f46
VZ
31#include "wx/gtk/private.h"
32#include <gdk/gdkkeysyms.h>
b292e2f5 33
acfd422a
RR
34//-----------------------------------------------------------------------------
35// idle system
36//-----------------------------------------------------------------------------
37
38extern void wxapp_install_idle_handler();
39extern bool g_isIdle;
40
b292e2f5
RR
41//-----------------------------------------------------------------------------
42// data
43//-----------------------------------------------------------------------------
44
65045edd
RR
45extern bool g_blockEventsOnDrag;
46extern wxCursor g_globalCursor;
d7fa7eaa 47extern wxWindowGTK *g_delayedFocus;
b292e2f5 48
eda40bfc
VZ
49// ----------------------------------------------------------------------------
50// helpers
51// ----------------------------------------------------------------------------
52
cc3da3f8
RR
53#ifdef __WXGTK20__
54static void wxGtkTextInsert(GtkWidget *text,
55 GtkTextBuffer *text_buffer,
56 const wxTextAttr& attr,
57 wxCharBuffer buffer)
58
59{
60 PangoFontDescription *font_description = attr.HasFont()
61 ? attr.GetFont().GetNativeFontInfo()->description
62 : NULL;
63
64 GdkColor *colFg = attr.HasTextColour() ? attr.GetTextColour().GetColor()
65 : NULL;
66
67 GdkColor *colBg = attr.HasBackgroundColour()
68 ? attr.GetBackgroundColour().GetColor()
69 : NULL;
70
cc3da3f8
RR
71 GtkTextTag *tag;
72 tag = gtk_text_buffer_create_tag( text_buffer, NULL, "font-desc", font_description,
73 "foreground-gdk", colFg,
74 "background-gdk", colBg, NULL );
a61bbf87
JS
75
76 GtkTextIter iter;
77 gtk_text_buffer_get_iter_at_mark( text_buffer, &iter,
78 gtk_text_buffer_get_insert (text_buffer) );
79
80 gtk_text_buffer_insert_with_tags( text_buffer, &iter, buffer, strlen(buffer), tag, NULL );
cc3da3f8
RR
81}
82#else
eda40bfc
VZ
83static void wxGtkTextInsert(GtkWidget *text,
84 const wxTextAttr& attr,
85 const char *txt,
86 size_t len)
87{
88 GdkFont *font = attr.HasFont() ? attr.GetFont().GetInternalFont()
89 : NULL;
90
91 GdkColor *colFg = attr.HasTextColour() ? attr.GetTextColour().GetColor()
92 : NULL;
93
94 GdkColor *colBg = attr.HasBackgroundColour()
95 ? attr.GetBackgroundColour().GetColor()
96 : NULL;
97
98 gtk_text_insert( GTK_TEXT(text), font, colFg, colBg, txt, len );
99}
a8bf1826 100#endif // GTK 1.x
eda40bfc 101
ce2f50e3
VZ
102// ----------------------------------------------------------------------------
103// "insert_text" for GtkEntry
104// ----------------------------------------------------------------------------
105
106static void
107gtk_insert_text_callback(GtkEditable *editable,
108 const gchar *new_text,
109 gint new_text_length,
110 gint *position,
111 wxTextCtrl *win)
112{
76fcf0f2
RR
113 if (g_isIdle)
114 wxapp_install_idle_handler();
115
ce2f50e3
VZ
116 // we should only be called if we have a max len limit at all
117 GtkEntry *entry = GTK_ENTRY (editable);
118
119 wxCHECK_RET( entry->text_max_length, _T("shouldn't be called") );
120
121 // check that we don't overflow the max length limit
122 //
123 // FIXME: this doesn't work when we paste a string which is going to be
124 // truncated
125 if ( entry->text_length == entry->text_max_length )
126 {
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");
129
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();
133
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 );
139 }
140}
141
c801d85f 142//-----------------------------------------------------------------------------
2f2aa628 143// "changed"
c801d85f
KB
144//-----------------------------------------------------------------------------
145
805dd538 146static void
ba3f6b44 147gtk_text_changed_callback( GtkWidget *widget, wxTextCtrl *win )
484e45bf 148{
ce2f50e3
VZ
149 if ( win->IgnoreTextUpdate() )
150 return;
151
a2053b27 152 if (!win->m_hasVMT) return;
805dd538 153
bb69661b 154 if (g_isIdle)
3c679789 155 wxapp_install_idle_handler();
a8bf1826 156
034be888 157 win->SetModified();
01041145 158 win->UpdateFontIfNeeded();
a8bf1826 159
f03fc89f 160 wxCommandEvent event( wxEVT_COMMAND_TEXT_UPDATED, win->GetId() );
2830bf19 161 event.SetEventObject( win );
ce2f50e3 162 event.SetString( win->GetValue() );
2830bf19 163 win->GetEventHandler()->ProcessEvent( event );
6de97a3b 164}
112892b9 165
2830bf19 166//-----------------------------------------------------------------------------
034be888 167// "changed" from vertical scrollbar
2830bf19
RR
168//-----------------------------------------------------------------------------
169
fab591c5 170#ifndef __WXGTK20__
805dd538 171static void
034be888 172gtk_scrollbar_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win )
2830bf19 173{
3c679789 174 if (!win->m_hasVMT) return;
bb69661b
VZ
175
176 if (g_isIdle)
3c679789 177 wxapp_install_idle_handler();
acfd422a 178
2830bf19
RR
179 win->CalculateScrollbar();
180}
fab591c5 181#endif
2830bf19 182
1c35b54e
VZ
183// ----------------------------------------------------------------------------
184// redraw callback for multiline text
185// ----------------------------------------------------------------------------
186
187#ifndef __WXGTK20__
188
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()
193
194extern bool wxIsInsideYield;
195
2e08b1a3
VZ
196extern "C" {
197 typedef void (*GtkDrawCallback)(GtkWidget *widget, GdkRectangle *rect);
198}
1c35b54e
VZ
199
200static GtkDrawCallback gs_gtk_text_draw = NULL;
201
202extern "C"
203void wxgtk_text_draw( GtkWidget *widget, GdkRectangle *rect)
204{
205 if ( !wxIsInsideYield )
206 {
207 wxCHECK_RET( gs_gtk_text_draw != wxgtk_text_draw,
208 _T("infinite recursion in wxgtk_text_draw aborted") );
209
210 gs_gtk_text_draw(widget, rect);
211 }
212}
213
214#endif // __WXGTK20__
215
2f2aa628
RR
216//-----------------------------------------------------------------------------
217// wxTextCtrl
218//-----------------------------------------------------------------------------
219
220IMPLEMENT_DYNAMIC_CLASS(wxTextCtrl,wxControl)
221
c801d85f 222BEGIN_EVENT_TABLE(wxTextCtrl, wxControl)
2830bf19 223 EVT_CHAR(wxTextCtrl::OnChar)
e702ff0f
JS
224
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)
230
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)
c801d85f
KB
236END_EVENT_TABLE()
237
01041145 238void wxTextCtrl::Init()
f5abe911 239{
ce2f50e3 240 m_ignoreNextUpdate =
f5abe911 241 m_modified = FALSE;
01041145 242 m_updateFont = FALSE;
3ca6a5f0
BP
243 m_text =
244 m_vScrollbar = (GtkWidget *)NULL;
f5abe911 245}
13289f04 246
13111b2a
VZ
247wxTextCtrl::wxTextCtrl( wxWindow *parent,
248 wxWindowID id,
249 const wxString &value,
250 const wxPoint &pos,
251 const wxSize &size,
252 long style,
253 const wxValidator& validator,
254 const wxString &name )
f5abe911 255{
01041145
VZ
256 Init();
257
f5abe911
RR
258 Create( parent, id, value, pos, size, style, validator, name );
259}
c801d85f 260
13111b2a
VZ
261bool wxTextCtrl::Create( wxWindow *parent,
262 wxWindowID id,
263 const wxString &value,
264 const wxPoint &pos,
265 const wxSize &size,
266 long style,
267 const wxValidator& validator,
268 const wxString &name )
c801d85f 269{
2830bf19 270 m_needParent = TRUE;
b292e2f5 271 m_acceptsFocus = TRUE;
484e45bf 272
4dcaf11a
RR
273 if (!PreCreation( parent, pos, size ) ||
274 !CreateBase( parent, id, pos, size, style, validator, name ))
275 {
223d09f6 276 wxFAIL_MSG( wxT("wxTextCtrl creation failed") );
13111b2a 277 return FALSE;
4dcaf11a 278 }
6de97a3b 279
805dd538 280
034be888 281 m_vScrollbarVisible = FALSE;
13289f04 282
2830bf19 283 bool multi_line = (style & wxTE_MULTILINE) != 0;
a8bf1826 284
fab591c5
RR
285#ifdef __WXGTK20__
286 GtkTextBuffer *buffer = NULL;
287#endif
288
ab46dc18 289 if (multi_line)
2830bf19 290 {
fab591c5
RR
291#ifdef __WXGTK20__
292 // Create view
293 m_text = gtk_text_view_new();
a8bf1826 294
fab591c5 295 buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
a8bf1826 296
fab591c5
RR
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 );
a8bf1826 301
fab591c5
RR
302 // Insert view into scrolled window
303 gtk_container_add( GTK_CONTAINER(m_widget), m_text );
a8bf1826 304
fab591c5
RR
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 );
308 else
309 gtk_text_view_set_wrap_mode( GTK_TEXT_VIEW( m_text ), GTK_WRAP_WORD );
805dd538 310
fab591c5
RR
311 if (!HasFlag(wxNO_BORDER))
312 gtk_scrolled_window_set_shadow_type( GTK_SCROLLED_WINDOW(m_widget), GTK_SHADOW_IN );
313#else
314 // create our control ...
2830bf19
RR
315 m_text = gtk_text_new( (GtkAdjustment *) NULL, (GtkAdjustment *) NULL );
316
fab591c5
RR
317 // ... and put into the upper left hand corner of the table
318 bool bHasHScrollbar = FALSE;
2830bf19 319 m_widget = gtk_table_new(bHasHScrollbar ? 2 : 1, 2, FALSE);
5664fc32 320 GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
2830bf19 321 gtk_table_attach( GTK_TABLE(m_widget), m_text, 0, 1, 0, 1,
41dee9d0 322 (GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK),
f5368809
RR
323 (GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK),
324 0, 0);
bb69661b 325
fab591c5 326 // always wrap words
5c387335 327 gtk_text_set_word_wrap( GTK_TEXT(m_text), TRUE );
bb69661b 328
fab591c5 329 // finally, put the vertical scrollbar in the upper right corner
ab46dc18
RR
330 m_vScrollbar = gtk_vscrollbar_new( GTK_TEXT(m_text)->vadj );
331 GTK_WIDGET_UNSET_FLAGS( m_vScrollbar, GTK_CAN_FOCUS );
ab46dc18
RR
332 gtk_table_attach(GTK_TABLE(m_widget), m_vScrollbar, 1, 2, 0, 1,
333 GTK_FILL,
334 (GtkAttachOptions)(GTK_EXPAND | GTK_FILL | GTK_SHRINK),
335 0, 0);
fab591c5 336#endif
2830bf19
RR
337 }
338 else
339 {
fab591c5 340 // a single-line text control: no need for scrollbars
2830bf19 341 m_widget =
1c35b54e 342 m_text = gtk_entry_new();
2830bf19 343 }
484e45bf 344
db434467 345 m_parent->DoAddChild( this );
eda40bfc 346
76fcf0f2 347 m_focusWidget = m_text;
db434467
RR
348
349 PostCreation();
e8e24dfa 350 InheritAttributes();
db434467
RR
351
352 wxSize size_best( DoGetBestSize() );
353 wxSize new_size( size );
0279e844 354 if (new_size.x == -1)
db434467 355 new_size.x = size_best.x;
0279e844 356 if (new_size.y == -1)
db434467 357 new_size.y = size_best.y;
0279e844
RR
358 if ((new_size.x != size.x) || (new_size.y != size.y))
359 SetSize( new_size.x, new_size.y );
484e45bf 360
2830bf19 361 if (multi_line)
2830bf19 362 gtk_widget_show(m_text);
13289f04 363
fab591c5 364#ifndef __WXGTK20__
ab46dc18
RR
365 if (multi_line)
366 {
367 gtk_signal_connect(GTK_OBJECT(GTK_TEXT(m_text)->vadj), "changed",
368 (GtkSignalFunc) gtk_scrollbar_changed_callback, (gpointer) this );
1c35b54e 369
1c35b54e
VZ
370 // only initialize gs_gtk_text_draw once, starting from the next the
371 // klass::draw will already be wxgtk_text_draw
372 if ( !gs_gtk_text_draw )
373 {
374 GtkDrawCallback&
375 draw = GTK_WIDGET_CLASS(GTK_OBJECT(m_text)->klass)->draw;
376
377 gs_gtk_text_draw = draw;
378
379 draw = wxgtk_text_draw;
380 }
ab46dc18 381 }
fab591c5 382#endif // GTK+ 1.x
3358d36e 383
291a8f20 384 if (!value.IsEmpty())
2830bf19 385 {
fab591c5
RR
386#ifdef __WXGTK20__
387 SetValue( value );
388#else
3358d36e 389
9e691f46 390#if !GTK_CHECK_VERSION(1, 2, 0)
3358d36e
VZ
391 // if we don't realize it, GTK 1.0.6 dies with a SIGSEGV in
392 // gtk_editable_insert_text()
393 gtk_widget_realize(m_text);
394#endif // GTK 1.0
395
fab591c5 396 gint tmp = 0;
05939a81 397#if wxUSE_UNICODE
3358d36e 398 wxWX2MBbuf val = value.mbc_str();
05939a81 399 gtk_editable_insert_text( GTK_EDITABLE(m_text), val, strlen(val), &tmp );
fab591c5 400#else
2830bf19 401 gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &tmp );
fab591c5 402#endif
3358d36e 403
291a8f20
RR
404 if (multi_line)
405 {
fab591c5 406 // Bring editable's cursor uptodate. Bug in GTK.
9e691f46 407 SET_EDITABLE_POS(m_text, gtk_text_get_point( GTK_TEXT(m_text) ));
3358d36e 408 }
a8bf1826 409
fab591c5 410#endif
2830bf19 411 }
484e45bf 412
2830bf19
RR
413 if (style & wxTE_PASSWORD)
414 {
415 if (!multi_line)
416 gtk_entry_set_visibility( GTK_ENTRY(m_text), FALSE );
417 }
8bbe427f 418
2830bf19
RR
419 if (style & wxTE_READONLY)
420 {
421 if (!multi_line)
422 gtk_entry_set_editable( GTK_ENTRY(m_text), FALSE );
fab591c5
RR
423#ifdef __WXGTK20__
424 else
425 gtk_text_view_set_editable( GTK_TEXT_VIEW( m_text), FALSE);
426 }
427#else
2830bf19
RR
428 }
429 else
430 {
431 if (multi_line)
432 gtk_text_set_editable( GTK_TEXT(m_text), 1 );
433 }
fab591c5 434#endif
3358d36e 435
fab591c5
RR
436 // We want to be notified about text changes.
437#ifdef __WXGTK20__
438 if (multi_line)
439 {
440 g_signal_connect( G_OBJECT(buffer), "changed",
441 GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
442 }
443 else
444#endif
445 {
ce16e5d7 446 gtk_signal_connect( GTK_OBJECT(m_text), "changed",
fab591c5
RR
447 GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
448 }
ce16e5d7 449
fab591c5
RR
450 // we don't set a valid background colour, because the window
451 // manager should use a default one
a88acabd 452 m_backgroundColour = wxColour();
17665a2b
VZ
453
454 wxColour colFg = parent->GetForegroundColour();
455 SetForegroundColour( colFg );
805dd538 456
65045edd 457 m_cursor = wxCursor( wxCURSOR_IBEAM );
13111b2a 458
6c5ac6e1 459 wxTextAttr attrDef( colFg, m_backgroundColour, parent->GetFont() );
17665a2b
VZ
460 SetDefaultStyle( attrDef );
461
2830bf19 462 Show( TRUE );
805dd538 463
2830bf19
RR
464 return TRUE;
465}
484e45bf 466
2830bf19
RR
467void wxTextCtrl::CalculateScrollbar()
468{
fab591c5 469#ifndef __WXGTK20__
2830bf19 470 if ((m_windowStyle & wxTE_MULTILINE) == 0) return;
f96aa4d9 471
2830bf19 472 GtkAdjustment *adj = GTK_TEXT(m_text)->vadj;
805dd538 473
2830bf19
RR
474 if (adj->upper - adj->page_size < 0.8)
475 {
476 if (m_vScrollbarVisible)
477 {
034be888 478 gtk_widget_hide( m_vScrollbar );
034be888 479 m_vScrollbarVisible = FALSE;
2830bf19
RR
480 }
481 }
482 else
483 {
484 if (!m_vScrollbarVisible)
485 {
034be888 486 gtk_widget_show( m_vScrollbar );
034be888 487 m_vScrollbarVisible = TRUE;
2830bf19
RR
488 }
489 }
fab591c5 490#endif
6de97a3b 491}
c801d85f 492
03f38c58 493wxString wxTextCtrl::GetValue() const
c801d85f 494{
223d09f6 495 wxCHECK_MSG( m_text != NULL, wxT(""), wxT("invalid text ctrl") );
8bbe427f 496
2830bf19
RR
497 wxString tmp;
498 if (m_windowStyle & wxTE_MULTILINE)
499 {
fab591c5
RR
500#ifdef __WXGTK20__
501 GtkTextBuffer *text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
a8bf1826 502
fab591c5
RR
503 GtkTextIter start;
504 gtk_text_buffer_get_start_iter( text_buffer, &start );
505 GtkTextIter end;
506 gtk_text_buffer_get_end_iter( text_buffer, &end );
507 gchar *text = gtk_text_buffer_get_text( text_buffer, &start, &end, TRUE );
5b87f8bf 508
fab591c5
RR
509#if wxUSE_UNICODE
510 wxWCharBuffer buffer( wxConvUTF8.cMB2WX( text ) );
511#else
512 wxCharBuffer buffer( wxConvLocal.cWC2WX( wxConvUTF8.cMB2WC( text ) ) );
513#endif
514 tmp = buffer;
a8bf1826 515
fab591c5
RR
516 g_free( text );
517#else
2830bf19
RR
518 gint len = gtk_text_get_length( GTK_TEXT(m_text) );
519 char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
fab591c5 520 tmp = text;
2830bf19 521 g_free( text );
fab591c5 522#endif
2830bf19
RR
523 }
524 else
525 {
fab591c5 526 tmp = wxGTK_CONV_BACK( gtk_entry_get_text( GTK_ENTRY(m_text) ) );
2830bf19 527 }
a8bf1826 528
2830bf19 529 return tmp;
6de97a3b 530}
c801d85f
KB
531
532void wxTextCtrl::SetValue( const wxString &value )
533{
223d09f6 534 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 535
2830bf19
RR
536 if (m_windowStyle & wxTE_MULTILINE)
537 {
fab591c5
RR
538#ifdef __WXGTK20__
539
540#if wxUSE_UNICODE
541 wxCharBuffer buffer( wxConvUTF8.cWX2MB( value) );
542#else
543 wxCharBuffer buffer( wxConvUTF8.cWC2MB( wxConvLocal.cWX2WC( value ) ) );
a8bf1826 544#endif
fab591c5
RR
545 GtkTextBuffer *text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
546 gtk_text_buffer_set_text( text_buffer, buffer, strlen(buffer) );
a8bf1826 547
fab591c5 548#else
2830bf19
RR
549 gint len = gtk_text_get_length( GTK_TEXT(m_text) );
550 gtk_editable_delete_text( GTK_EDITABLE(m_text), 0, len );
551 len = 0;
01041145 552 gtk_editable_insert_text( GTK_EDITABLE(m_text), value.mbc_str(), value.Length(), &len );
05939a81 553#endif
2830bf19
RR
554 }
555 else
556 {
fab591c5 557 gtk_entry_set_text( GTK_ENTRY(m_text), wxGTK_CONV( value ) );
2830bf19 558 }
f6bcfd97
BP
559
560 // GRG, Jun/2000: Changed this after a lot of discussion in
561 // the lists. wxWindows 2.2 will have a set of flags to
562 // customize this behaviour.
563 SetInsertionPoint(0);
a8bf1826 564
f6bcfd97 565 m_modified = FALSE;
6de97a3b 566}
c801d85f
KB
567
568void wxTextCtrl::WriteText( const wxString &text )
569{
223d09f6 570 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 571
17665a2b
VZ
572 if ( text.empty() )
573 return;
484e45bf 574
17665a2b 575 if ( m_windowStyle & wxTE_MULTILINE )
2830bf19 576 {
fab591c5
RR
577#ifdef __WXGTK20__
578
579#if wxUSE_UNICODE
580 wxCharBuffer buffer( wxConvUTF8.cWX2MB( text ) );
581#else
582 wxCharBuffer buffer( wxConvUTF8.cWC2MB( wxConvLocal.cWX2WC( text ) ) );
a8bf1826 583#endif
fab591c5 584 GtkTextBuffer *text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
5b87f8bf 585
e136b747 586 // TODO: Call whatever is needed to delete the selection.
cc3da3f8 587 wxGtkTextInsert( m_text, text_buffer, m_defaultStyle, buffer );
a8bf1826 588
71aba833
VZ
589 GtkAdjustment *adj = gtk_scrolled_window_get_vadjustment( GTK_SCROLLED_WINDOW(m_widget) );
590 // Scroll to cursor, but only if scrollbar thumb is at the very bottom
591 if ( adj->value == adj->upper - adj->page_size )
592 {
593 gtk_text_view_scroll_to_mark( GTK_TEXT_VIEW(m_text),
594 gtk_text_buffer_get_insert( text_buffer ), 0.0, FALSE, 0.0, 1.0 );
595 }
a8bf1826 596#else // GTK 1.x
ba3f6b44 597 // After cursor movements, gtk_text_get_point() is wrong by one.
9e691f46 598 gtk_text_set_point( GTK_TEXT(m_text), GET_EDITABLE_POS(m_text) );
eda40bfc 599
41b2e0e6
VZ
600 // always use m_defaultStyle, even if it is empty as otherwise
601 // resetting the style and appending some more text wouldn't work: if
602 // we don't specify the style explicitly, the old style would be used
2b5f62a0 603 gtk_editable_delete_selection( GTK_EDITABLE(m_text) );
fab591c5 604 wxGtkTextInsert(m_text, m_defaultStyle, text.c_str(), text.Len());
eda40bfc 605
07e9d4f0
VZ
606 // we called wxGtkTextInsert with correct font, no need to do anything
607 // in UpdateFontIfNeeded() any longer
608 if ( !text.empty() )
609 {
45df0809 610 m_updateFont = FALSE;
07e9d4f0
VZ
611 }
612
ba3f6b44 613 // Bring editable's cursor back uptodate.
9e691f46 614 SET_EDITABLE_POS(m_text, gtk_text_get_point( GTK_TEXT(m_text) ));
a8bf1826 615#endif // GTK 1.x/2.0
2830bf19 616 }
17665a2b 617 else // single line
2830bf19 618 {
2b5f62a0
VZ
619 // First remove the selection if there is one
620 gtk_editable_delete_selection( GTK_EDITABLE(m_text) );
621
ba3f6b44 622 // This moves the cursor pos to behind the inserted text.
9e691f46 623 gint len = GET_EDITABLE_POS(m_text);
a8bf1826 624
fab591c5
RR
625#ifdef __WXGTK20__
626
627#if wxUSE_UNICODE
628 wxCharBuffer buffer( wxConvUTF8.cWX2MB( text ) );
629#else
630 wxCharBuffer buffer( wxConvUTF8.cWC2MB( wxConvLocal.cWX2WC( text ) ) );
a8bf1826 631#endif
fab591c5 632 gtk_editable_insert_text( GTK_EDITABLE(m_text), buffer, strlen(buffer), &len );
a8bf1826 633
fab591c5
RR
634#else
635 gtk_editable_insert_text( GTK_EDITABLE(m_text), text.c_str(), text.Len(), &len );
636#endif
3358d36e 637
ba3f6b44 638 // Bring entry's cursor uptodate.
9e691f46 639 gtk_entry_set_position( GTK_ENTRY(m_text), len );
2830bf19 640 }
eda40bfc 641
ba3f6b44 642 m_modified = TRUE;
6de97a3b 643}
c801d85f 644
a6e21573
HH
645void wxTextCtrl::AppendText( const wxString &text )
646{
ba3f6b44
RR
647 SetInsertionPointEnd();
648 WriteText( text );
649}
2df7be7f 650
ba3f6b44
RR
651wxString wxTextCtrl::GetLineText( long lineNo ) const
652{
a6e21573
HH
653 if (m_windowStyle & wxTE_MULTILINE)
654 {
fab591c5 655#ifndef __WXGTK20__
ba3f6b44
RR
656 gint len = gtk_text_get_length( GTK_TEXT(m_text) );
657 char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
bb69661b 658
ba3f6b44
RR
659 if (text)
660 {
661 wxString buf(wxT(""));
662 long i;
663 int currentLine = 0;
664 for (i = 0; currentLine != lineNo && text[i]; i++ )
665 if (text[i] == '\n')
666 currentLine++;
667 // Now get the text
668 int j;
669 for (j = 0; text[i] && text[i] != '\n'; i++, j++ )
670 buf += text[i];
17665a2b 671
ba3f6b44
RR
672 g_free( text );
673 return buf;
bb69661b 674 }
ba3f6b44 675 else
bb69661b 676 {
ba3f6b44 677 return wxEmptyString;
bb69661b 678 }
905f2110
JS
679#else
680 GtkTextBuffer *text_buffer;
681 text_buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(m_text));
682 GtkTextIter line;
683 gtk_text_buffer_get_iter_at_line(text_buffer,&line,lineNo);
684 GtkTextIter end;
685 gtk_text_buffer_get_end_iter(text_buffer,&end );
686 gchar *text = gtk_text_buffer_get_text(text_buffer,&line,&end,TRUE);
58192970 687 wxString result(wxGTK_CONV_BACK(text));
905f2110
JS
688 g_free(text);
689 return result.BeforeFirst(wxT('\n'));
690#endif
a6e21573 691 }
ba3f6b44 692 else
a81258be 693 {
ba3f6b44
RR
694 if (lineNo == 0) return GetValue();
695 return wxEmptyString;
a81258be 696 }
6de97a3b 697}
c801d85f 698
a81258be
RR
699void wxTextCtrl::OnDropFiles( wxDropFilesEvent &WXUNUSED(event) )
700{
ac0d36b5
HH
701 /* If you implement this, don't forget to update the documentation!
702 * (file docs/latex/wx/text.tex) */
223d09f6 703 wxFAIL_MSG( wxT("wxTextCtrl::OnDropFiles not implemented") );
a81258be 704}
112892b9 705
0efe5ba7 706bool wxTextCtrl::PositionToXY(long pos, long *x, long *y ) const
c801d85f 707{
96385642 708 if ( m_windowStyle & wxTE_MULTILINE )
805dd538 709 {
96385642
VZ
710 wxString text = GetValue();
711
6085b116 712 // cast to prevent warning. But pos really should've been unsigned.
2829d9e3 713 if( (unsigned long)pos > text.Len() )
96385642
VZ
714 return FALSE;
715
ac0d36b5
HH
716 *x=0; // First Col
717 *y=0; // First Line
2829d9e3 718
05939a81
OK
719 const wxChar* stop = text.c_str() + pos;
720 for ( const wxChar *p = text.c_str(); p < stop; p++ )
96385642 721 {
223d09f6 722 if (*p == wxT('\n'))
96385642
VZ
723 {
724 (*y)++;
ac0d36b5 725 *x=0;
96385642
VZ
726 }
727 else
728 (*x)++;
729 }
805dd538 730 }
96385642
VZ
731 else // single line control
732 {
2829d9e3 733 if ( pos <= GTK_ENTRY(m_text)->text_length )
96385642 734 {
ac0d36b5 735 *y = 0;
96385642
VZ
736 *x = pos;
737 }
738 else
739 {
740 // index out of bounds
741 return FALSE;
742 }
8bbe427f 743 }
96385642
VZ
744
745 return TRUE;
6de97a3b 746}
c801d85f 747
e3ca08dd 748long wxTextCtrl::XYToPosition(long x, long y ) const
c801d85f 749{
2830bf19 750 if (!(m_windowStyle & wxTE_MULTILINE)) return 0;
805dd538 751
2830bf19 752 long pos=0;
ac0d36b5 753 for( int i=0; i<y; i++ ) pos += GetLineLength(i) + 1; // one for '\n'
8bbe427f 754
3358d36e 755 pos += x;
2830bf19 756 return pos;
6de97a3b 757}
c801d85f 758
a81258be 759int wxTextCtrl::GetLineLength(long lineNo) const
c801d85f 760{
a81258be
RR
761 wxString str = GetLineText (lineNo);
762 return (int) str.Length();
6de97a3b 763}
c801d85f 764
a81258be 765int wxTextCtrl::GetNumberOfLines() const
c801d85f 766{
2830bf19 767 if (m_windowStyle & wxTE_MULTILINE)
a81258be 768 {
fab591c5
RR
769#ifdef __WXGTK20__
770 GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
a8bf1826 771
fab591c5
RR
772 return gtk_text_buffer_get_line_count( buffer );
773#else
2830bf19
RR
774 gint len = gtk_text_get_length( GTK_TEXT(m_text) );
775 char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
776
777 if (text)
778 {
779 int currentLine = 0;
780 for (int i = 0; i < len; i++ )
96385642 781 {
2830bf19 782 if (text[i] == '\n')
96385642
VZ
783 currentLine++;
784 }
2830bf19 785 g_free( text );
2829d9e3
VZ
786
787 // currentLine is 0 based, add 1 to get number of lines
788 return currentLine + 1;
2830bf19
RR
789 }
790 else
96385642 791 {
2830bf19 792 return 0;
96385642 793 }
fab591c5 794#endif
a81258be
RR
795 }
796 else
2830bf19 797 {
96385642 798 return 1;
2830bf19 799 }
6de97a3b 800}
c801d85f 801
debe6624 802void wxTextCtrl::SetInsertionPoint( long pos )
c801d85f 803{
223d09f6 804 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
3358d36e
VZ
805
806 if (m_windowStyle & wxTE_MULTILINE)
291a8f20 807 {
fab591c5
RR
808#ifdef __WXGTK20__
809 GtkTextBuffer *text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
810 GtkTextIter iter;
811 gtk_text_buffer_get_iter_at_offset( text_buffer, &iter, pos );
812 gtk_text_buffer_place_cursor( text_buffer, &iter );
813#else
291a8f20
RR
814 gtk_signal_disconnect_by_func( GTK_OBJECT(m_text),
815 GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
3358d36e 816
291a8f20 817 /* we fake a set_point by inserting and deleting. as the user
fab591c5 818 isn't supposed to get to know about this non-sense, we
3358d36e
VZ
819 disconnect so that no events are sent to the user program. */
820
291a8f20
RR
821 gint tmp = (gint)pos;
822 gtk_editable_insert_text( GTK_EDITABLE(m_text), " ", 1, &tmp );
3358d36e
VZ
823 gtk_editable_delete_text( GTK_EDITABLE(m_text), tmp-1, tmp );
824
291a8f20
RR
825 gtk_signal_connect( GTK_OBJECT(m_text), "changed",
826 GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
3358d36e 827
fab591c5 828 // bring editable's cursor uptodate. Bug in GTK.
9e691f46 829 SET_EDITABLE_POS(m_text, gtk_text_get_point( GTK_TEXT(m_text) ));
fab591c5 830#endif
ac0d36b5 831 }
2830bf19 832 else
291a8f20 833 {
d59051dd 834 gtk_entry_set_position( GTK_ENTRY(m_text), (int)pos );
3358d36e 835
fab591c5 836 // Bring editable's cursor uptodate. Bug in GTK.
9e691f46 837 SET_EDITABLE_POS(m_text, (guint32)pos);
291a8f20 838 }
6de97a3b 839}
c801d85f 840
03f38c58 841void wxTextCtrl::SetInsertionPointEnd()
c801d85f 842{
223d09f6 843 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 844
d59051dd 845 if (m_windowStyle & wxTE_MULTILINE)
fab591c5
RR
846 {
847#ifdef __WXGTK20__
848 GtkTextBuffer *text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
849 GtkTextIter end;
850 gtk_text_buffer_get_end_iter( text_buffer, &end );
851 gtk_text_buffer_place_cursor( text_buffer, &end );
852#else
d59051dd 853 SetInsertionPoint(gtk_text_get_length(GTK_TEXT(m_text)));
fab591c5
RR
854#endif
855 }
d59051dd 856 else
fab591c5 857 {
d59051dd 858 gtk_entry_set_position( GTK_ENTRY(m_text), -1 );
fab591c5 859 }
6de97a3b 860}
c801d85f 861
debe6624 862void wxTextCtrl::SetEditable( bool editable )
c801d85f 863{
223d09f6 864 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 865
2830bf19 866 if (m_windowStyle & wxTE_MULTILINE)
fab591c5
RR
867 {
868#ifdef __WXGTK20__
869 gtk_text_view_set_editable( GTK_TEXT_VIEW(m_text), editable );
870#else
2830bf19 871 gtk_text_set_editable( GTK_TEXT(m_text), editable );
fab591c5
RR
872#endif
873 }
2830bf19 874 else
fab591c5 875 {
2830bf19 876 gtk_entry_set_editable( GTK_ENTRY(m_text), editable );
fab591c5 877 }
6de97a3b 878}
c801d85f 879
68df5777
RR
880bool wxTextCtrl::Enable( bool enable )
881{
882 if (!wxWindowBase::Enable(enable))
883 {
884 // nothing to do
885 return FALSE;
886 }
f6bcfd97 887
68df5777
RR
888 if (m_windowStyle & wxTE_MULTILINE)
889 {
fab591c5
RR
890#ifdef __WXGTK20__
891 SetEditable( enable );
892#else
68df5777 893 gtk_text_set_editable( GTK_TEXT(m_text), enable );
5abf8c9d 894 OnParentEnable(enable);
fab591c5 895#endif
68df5777
RR
896 }
897 else
898 {
899 gtk_widget_set_sensitive( m_text, enable );
900 }
901
902 return TRUE;
903}
904
fdca68a6
JS
905// wxGTK-specific: called recursively by Enable,
906// to give widgets an oppprtunity to correct their colours after they
907// have been changed by Enable
908void wxTextCtrl::OnParentEnable( bool enable )
909{
910 // If we have a custom background colour, we use this colour in both
911 // disabled and enabled mode, or we end up with a different colour under the
912 // text.
913 wxColour oldColour = GetBackgroundColour();
914 if (oldColour.Ok())
915 {
916 // Need to set twice or it'll optimize the useful stuff out
917 if (oldColour == * wxWHITE)
918 SetBackgroundColour(*wxBLACK);
919 else
920 SetBackgroundColour(*wxWHITE);
921 SetBackgroundColour(oldColour);
922 }
923}
924
3a9fa0d6
VZ
925void wxTextCtrl::MarkDirty()
926{
927 m_modified = TRUE;
928}
929
0efe5ba7
VZ
930void wxTextCtrl::DiscardEdits()
931{
932 m_modified = FALSE;
933}
934
ce2f50e3
VZ
935// ----------------------------------------------------------------------------
936// max text length support
937// ----------------------------------------------------------------------------
938
939void wxTextCtrl::IgnoreNextTextUpdate()
940{
941 m_ignoreNextUpdate = TRUE;
942}
943
944bool wxTextCtrl::IgnoreTextUpdate()
945{
946 if ( m_ignoreNextUpdate )
947 {
948 m_ignoreNextUpdate = FALSE;
949
950 return TRUE;
951 }
952
953 return FALSE;
954}
955
d7eee191
VZ
956void wxTextCtrl::SetMaxLength(unsigned long len)
957{
958 if ( !HasFlag(wxTE_MULTILINE) )
959 {
960 gtk_entry_set_max_length(GTK_ENTRY(m_text), len);
ce2f50e3
VZ
961
962 // there is a bug in GTK+ 1.2.x: "changed" signal is emitted even if
963 // we had tried to enter more text than allowed by max text length and
964 // the text wasn't really changed
965 //
966 // to detect this and generate TEXT_MAXLEN event instead of
967 // TEXT_CHANGED one in this case we also catch "insert_text" signal
968 //
969 // when max len is set to 0 we disconnect our handler as it means that
970 // we shouldn't check anything any more
971 if ( len )
972 {
973 gtk_signal_connect( GTK_OBJECT(m_text),
974 "insert_text",
975 GTK_SIGNAL_FUNC(gtk_insert_text_callback),
976 (gpointer)this);
977 }
978 else // no checking
979 {
980 gtk_signal_disconnect_by_func
981 (
982 GTK_OBJECT(m_text),
983 GTK_SIGNAL_FUNC(gtk_insert_text_callback),
984 (gpointer)this
985 );
986 }
d7eee191
VZ
987 }
988}
989
debe6624 990void wxTextCtrl::SetSelection( long from, long to )
c801d85f 991{
223d09f6 992 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 993
2b5f62a0
VZ
994 if (from == -1 && to == -1)
995 {
996 from = 0;
997 to = GetValue().Length();
998 }
999
fab591c5 1000#ifndef __WXGTK20__
a1f79c1e
VZ
1001 if ( (m_windowStyle & wxTE_MULTILINE) &&
1002 !GTK_TEXT(m_text)->line_start_cache )
1003 {
1004 // tell the programmer that it didn't work
1005 wxLogDebug(_T("Can't call SetSelection() before realizing the control"));
1006 return;
1007 }
fab591c5 1008#endif
a1f79c1e 1009
fab591c5
RR
1010 if (m_windowStyle & wxTE_MULTILINE)
1011 {
1012#ifdef __WXGTK20__
739e366a
JS
1013 GtkTextBuffer *buf = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
1014
1015 GtkTextIter fromi, toi;
1016 gtk_text_buffer_get_iter_at_offset( buf, &fromi, from );
1017 gtk_text_buffer_get_iter_at_offset( buf, &toi, to );
1018
1019 gtk_text_buffer_place_cursor( buf, &toi );
1020 gtk_text_buffer_move_mark_by_name( buf, "selection_bound", &fromi );
fab591c5
RR
1021#else
1022 gtk_editable_select_region( GTK_EDITABLE(m_text), (gint)from, (gint)to );
1023#endif
1024 }
1025 else
1026 {
1027 gtk_editable_select_region( GTK_EDITABLE(m_text), (gint)from, (gint)to );
1028 }
6de97a3b 1029}
c801d85f 1030
afbe906a 1031void wxTextCtrl::ShowPosition( long pos )
c801d85f 1032{
afbe906a
RR
1033 if (m_windowStyle & wxTE_MULTILINE)
1034 {
71aba833
VZ
1035#ifdef __WXGTK20__
1036 GtkTextBuffer *buf = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
1037 GtkTextIter iter;
1038 gtk_text_buffer_get_start_iter( buf, &iter );
1039 gtk_text_iter_set_offset( &iter, pos );
1040 GtkTextMark *mark = gtk_text_buffer_create_mark( buf, NULL, &iter, TRUE );
1041 gtk_text_view_scroll_to_mark( GTK_TEXT_VIEW(m_text), mark, 0.0, FALSE, 0.0, 0.0 );
1042#else // GTK 1.x
afbe906a
RR
1043 GtkAdjustment *vp = GTK_TEXT(m_text)->vadj;
1044 float totalLines = (float) GetNumberOfLines();
1045 long posX;
1046 long posY;
1047 PositionToXY(pos, &posX, &posY);
1048 float posLine = (float) posY;
1049 float p = (posLine/totalLines)*(vp->upper - vp->lower) + vp->lower;
1050 gtk_adjustment_set_value(GTK_TEXT(m_text)->vadj, p);
71aba833 1051#endif // GTK 1.x/2.x
afbe906a 1052 }
6de97a3b 1053}
c801d85f 1054
03f38c58 1055long wxTextCtrl::GetInsertionPoint() const
c801d85f 1056{
223d09f6 1057 wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
8bbe427f 1058
fab591c5
RR
1059#ifdef __WXGTK20__
1060 if (m_windowStyle & wxTE_MULTILINE)
1061 {
1062 GtkTextBuffer *text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
a8bf1826 1063
fab591c5
RR
1064 // There is no direct accessor for the cursor, but
1065 // internally, the cursor is the "mark" called
1066 // "insert" in the text view's btree structure.
a8bf1826 1067
fab591c5
RR
1068 GtkTextMark *mark = gtk_text_buffer_get_insert( text_buffer );
1069 GtkTextIter cursor;
1070 gtk_text_buffer_get_iter_at_mark( text_buffer, &cursor, mark );
a8bf1826 1071
fab591c5
RR
1072 return gtk_text_iter_get_offset( &cursor );
1073 }
1074 else
1075#endif
1076 {
9e691f46 1077 return (long) GET_EDITABLE_POS(m_text);
fab591c5 1078 }
6de97a3b 1079}
c801d85f 1080
03f38c58 1081long wxTextCtrl::GetLastPosition() const
c801d85f 1082{
223d09f6 1083 wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
8bbe427f 1084
2830bf19 1085 int pos = 0;
a8bf1826 1086
2830bf19 1087 if (m_windowStyle & wxTE_MULTILINE)
fab591c5
RR
1088 {
1089#ifdef __WXGTK20__
1090 GtkTextBuffer *text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
1091 GtkTextIter end;
1092 gtk_text_buffer_get_end_iter( text_buffer, &end );
a8bf1826 1093
fab591c5
RR
1094 pos = gtk_text_iter_get_offset( &end );
1095#else
2830bf19 1096 pos = gtk_text_get_length( GTK_TEXT(m_text) );
fab591c5
RR
1097#endif
1098 }
2830bf19 1099 else
fab591c5 1100 {
2830bf19 1101 pos = GTK_ENTRY(m_text)->text_length;
fab591c5 1102 }
805dd538 1103
ac0d36b5 1104 return (long)pos;
6de97a3b 1105}
c801d85f 1106
debe6624 1107void wxTextCtrl::Remove( long from, long to )
c801d85f 1108{
223d09f6 1109 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 1110
581ee8a9 1111#ifdef __WXGTK20__
fdd55287 1112 if (m_windowStyle & wxTE_MULTILINE)
581ee8a9
VZ
1113 {
1114 GtkTextBuffer *
1115 text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
1116
1117 GtkTextIter fromi, toi;
1118 gtk_text_buffer_get_iter_at_offset( text_buffer, &fromi, from );
1119 gtk_text_buffer_get_iter_at_offset( text_buffer, &toi, to );
1120
1121 gtk_text_buffer_delete( text_buffer, &fromi, &toi );
1122 }
1123 else // single line
fab591c5 1124#endif
581ee8a9 1125 gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to );
6de97a3b 1126}
c801d85f 1127
debe6624 1128void wxTextCtrl::Replace( long from, long to, const wxString &value )
c801d85f 1129{
223d09f6 1130 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 1131
581ee8a9 1132 Remove( from, to );
bb69661b 1133
2df7be7f
RR
1134 if (!value.IsEmpty())
1135 {
581ee8a9
VZ
1136#ifdef __WXGTK20__
1137 SetInsertionPoint( from );
1138 WriteText( value );
1139#else // GTK 1.x
2df7be7f 1140 gint pos = (gint)from;
05939a81 1141#if wxUSE_UNICODE
2df7be7f
RR
1142 wxWX2MBbuf buf = value.mbc_str();
1143 gtk_editable_insert_text( GTK_EDITABLE(m_text), buf, strlen(buf), &pos );
05939a81 1144#else
2df7be7f 1145 gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &pos );
581ee8a9
VZ
1146#endif // wxUSE_UNICODE
1147#endif // GTK 1.x/2.x
2df7be7f 1148 }
6de97a3b 1149}
c801d85f 1150
03f38c58 1151void wxTextCtrl::Cut()
c801d85f 1152{
223d09f6 1153 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 1154
fab591c5 1155#ifndef __WXGTK20__
9e691f46 1156 gtk_editable_cut_clipboard( GTK_EDITABLE(m_text) DUMMY_CLIPBOARD_ARG );
fab591c5 1157#endif
6de97a3b 1158}
c801d85f 1159
03f38c58 1160void wxTextCtrl::Copy()
c801d85f 1161{
223d09f6 1162 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 1163
fab591c5 1164#ifndef __WXGTK20__
9e691f46 1165 gtk_editable_copy_clipboard( GTK_EDITABLE(m_text) DUMMY_CLIPBOARD_ARG );
fab591c5 1166#endif
6de97a3b 1167}
c801d85f 1168
03f38c58 1169void wxTextCtrl::Paste()
c801d85f 1170{
223d09f6 1171 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
8bbe427f 1172
fab591c5 1173#ifndef __WXGTK20__
9e691f46 1174 gtk_editable_paste_clipboard( GTK_EDITABLE(m_text) DUMMY_CLIPBOARD_ARG );
fab591c5 1175#endif
6de97a3b 1176}
c801d85f 1177
ca8b28f2
JS
1178// Undo/redo
1179void wxTextCtrl::Undo()
1180{
1181 // TODO
223d09f6 1182 wxFAIL_MSG( wxT("wxTextCtrl::Undo not implemented") );
ca8b28f2
JS
1183}
1184
1185void wxTextCtrl::Redo()
1186{
1187 // TODO
223d09f6 1188 wxFAIL_MSG( wxT("wxTextCtrl::Redo not implemented") );
ca8b28f2
JS
1189}
1190
1191bool wxTextCtrl::CanUndo() const
1192{
1193 // TODO
4855a477 1194 //wxFAIL_MSG( wxT("wxTextCtrl::CanUndo not implemented") );
ca8b28f2
JS
1195 return FALSE;
1196}
1197
1198bool wxTextCtrl::CanRedo() const
1199{
1200 // TODO
4855a477 1201 //wxFAIL_MSG( wxT("wxTextCtrl::CanRedo not implemented") );
ca8b28f2
JS
1202 return FALSE;
1203}
1204
1205// If the return values from and to are the same, there is no
1206// selection.
2d4cc5b6 1207void wxTextCtrl::GetSelection(long* fromOut, long* toOut) const
ca8b28f2 1208{
223d09f6 1209 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
bb69661b 1210
5b87f8bf
RD
1211 gint from = -1;
1212 gint to = -1;
1213 bool haveSelection = FALSE;
1214
fb47b99f 1215#ifdef __WXGTK20__
5b87f8bf
RD
1216 if (m_windowStyle & wxTE_MULTILINE)
1217 {
1218 GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (m_text));
1219 GtkTextIter ifrom, ito;
1220 if ( gtk_text_buffer_get_selection_bounds(buffer, &ifrom, &ito) )
1221 {
1222 haveSelection = TRUE;
1223 from = gtk_text_iter_get_offset(&ifrom);
1224 to = gtk_text_iter_get_offset(&ito);
1225 }
1226 }
1227 else // not multi-line
1228 {
1229 if ( gtk_editable_get_selection_bounds( GTK_EDITABLE(m_text),
1230 &from, &to) )
1231 {
1232 haveSelection = TRUE;
1233 }
1234 }
1235#else // not GTK2
1236 if ( (GTK_EDITABLE(m_text)->has_selection) )
1237 {
1238 haveSelection = TRUE;
1239 from = (long) GTK_EDITABLE(m_text)->selection_start_pos;
1240 to = (long) GTK_EDITABLE(m_text)->selection_end_pos;
1241 }
9e691f46 1242#endif
2d4cc5b6 1243
5b87f8bf
RD
1244 if (! haveSelection )
1245 from = to = GetInsertionPoint();
1246
1247 if ( from > to )
1248 {
1249 // exchange them to be compatible with wxMSW
1250 gint tmp = from;
1251 from = to;
1252 to = tmp;
1253 }
bb69661b 1254
2d4cc5b6
VZ
1255 if ( fromOut )
1256 *fromOut = from;
1257 if ( toOut )
1258 *toOut = to;
ca8b28f2
JS
1259}
1260
5b87f8bf 1261
ca8b28f2
JS
1262bool wxTextCtrl::IsEditable() const
1263{
223d09f6 1264 wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
05060eeb 1265
9e691f46 1266#ifdef __WXGTK20__
fdd55287
VZ
1267 if (m_windowStyle & wxTE_MULTILINE)
1268 {
1269 return gtk_text_view_get_editable(GTK_TEXT_VIEW(m_text));
1270 }
1271 else
1272 {
1273 return gtk_editable_get_editable(GTK_EDITABLE(m_text));
1274 }
9e691f46 1275#else
05060eeb 1276 return GTK_EDITABLE(m_text)->editable;
9e691f46 1277#endif
ca8b28f2
JS
1278}
1279
0efe5ba7
VZ
1280bool wxTextCtrl::IsModified() const
1281{
1282 return m_modified;
1283}
1284
03f38c58 1285void wxTextCtrl::Clear()
c801d85f 1286{
223d09f6 1287 SetValue( wxT("") );
6de97a3b 1288}
c801d85f 1289
903f689b 1290void wxTextCtrl::OnChar( wxKeyEvent &key_event )
c801d85f 1291{
223d09f6 1292 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
805dd538 1293
12a3f227 1294 if ((key_event.GetKeyCode() == WXK_RETURN) && (m_windowStyle & wxPROCESS_ENTER))
2830bf19
RR
1295 {
1296 wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId);
1297 event.SetEventObject(this);
f6bcfd97 1298 event.SetString(GetValue());
2830bf19
RR
1299 if (GetEventHandler()->ProcessEvent(event)) return;
1300 }
903f689b 1301
12a3f227 1302 if ((key_event.GetKeyCode() == WXK_RETURN) && !(m_windowStyle & wxTE_MULTILINE))
da048e3d 1303 {
2b328fc9
RR
1304 // This will invoke the dialog default action, such
1305 // as the clicking the default button.
a8bf1826 1306
da048e3d 1307 wxWindow *top_frame = m_parent;
8487f887 1308 while (top_frame->GetParent() && !(top_frame->IsTopLevel()))
da048e3d 1309 top_frame = top_frame->GetParent();
a8bf1826 1310
2b328fc9 1311 if (top_frame && GTK_IS_WINDOW(top_frame->m_widget))
da048e3d 1312 {
2b328fc9
RR
1313 GtkWindow *window = GTK_WINDOW(top_frame->m_widget);
1314
1315 if (window->default_widget)
1316 {
1317 gtk_widget_activate (window->default_widget);
1318 return;
1319 }
13111b2a 1320 }
da048e3d
RR
1321 }
1322
2830bf19 1323 key_event.Skip();
6de97a3b 1324}
c801d85f 1325
03f38c58 1326GtkWidget* wxTextCtrl::GetConnectWidget()
e3e65dac 1327{
ae0bdb01 1328 return GTK_WIDGET(m_text);
6de97a3b 1329}
e3e65dac 1330
903f689b
RR
1331bool wxTextCtrl::IsOwnGtkWindow( GdkWindow *window )
1332{
ae0bdb01 1333 if (m_windowStyle & wxTE_MULTILINE)
fab591c5
RR
1334 {
1335#ifdef __WXGTK20__
1336 return window == gtk_text_view_get_window( GTK_TEXT_VIEW( m_text ), GTK_TEXT_WINDOW_TEXT ); // pure guesswork
1337#else
ae0bdb01 1338 return (window == GTK_TEXT(m_text)->text_area);
fab591c5
RR
1339#endif
1340 }
ae0bdb01 1341 else
fab591c5 1342 {
ae0bdb01 1343 return (window == GTK_ENTRY(m_text)->text_area);
fab591c5 1344 }
903f689b 1345}
e3e65dac 1346
bb69661b
VZ
1347// the font will change for subsequent text insertiongs
1348bool wxTextCtrl::SetFont( const wxFont &font )
868a2826 1349{
223d09f6 1350 wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
8bbe427f 1351
a66954a6 1352 if ( !wxTextCtrlBase::SetFont(font) )
bb69661b
VZ
1353 {
1354 // font didn't change, nothing to do
1355 return FALSE;
1356 }
1357
1358 if ( m_windowStyle & wxTE_MULTILINE )
1359 {
01041145 1360 m_updateFont = TRUE;
bb69661b 1361
1ff4714d
VZ
1362 m_defaultStyle.SetFont(font);
1363
01041145 1364 ChangeFontGlobally();
bb69661b
VZ
1365 }
1366
1367 return TRUE;
58614078
RR
1368}
1369
01041145
VZ
1370void wxTextCtrl::ChangeFontGlobally()
1371{
1372 // this method is very inefficient and hence should be called as rarely as
1373 // possible!
1374 wxASSERT_MSG( (m_windowStyle & wxTE_MULTILINE) && m_updateFont,
1375 _T("shouldn't be called for single line controls") );
1376
1377 wxString value = GetValue();
1378 if ( !value.IsEmpty() )
1379 {
572aeb77
VZ
1380 m_updateFont = FALSE;
1381
01041145
VZ
1382 Clear();
1383 AppendText(value);
01041145
VZ
1384 }
1385}
1386
1387void wxTextCtrl::UpdateFontIfNeeded()
1388{
1389 if ( m_updateFont )
1390 ChangeFontGlobally();
1391}
1392
17665a2b
VZ
1393bool wxTextCtrl::SetForegroundColour(const wxColour& colour)
1394{
1395 if ( !wxControl::SetForegroundColour(colour) )
1396 return FALSE;
1397
1398 // update default fg colour too
1399 m_defaultStyle.SetTextColour(colour);
1400
1401 return TRUE;
1402}
1403
f03fc89f 1404bool wxTextCtrl::SetBackgroundColour( const wxColour &colour )
68dda785 1405{
223d09f6 1406 wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
a81258be 1407
1f477433
VZ
1408 if ( !wxControl::SetBackgroundColour( colour ) )
1409 return FALSE;
3358d36e 1410
f03fc89f
VZ
1411 if (!m_widget->window)
1412 return FALSE;
8bbe427f 1413
a756f210 1414 wxColour sysbg = wxSystemSettings::GetColour( wxSYS_COLOUR_BTNFACE );
805dd538
VZ
1415 if (sysbg.Red() == colour.Red() &&
1416 sysbg.Green() == colour.Green() &&
ae0bdb01
RR
1417 sysbg.Blue() == colour.Blue())
1418 {
f03fc89f 1419 return FALSE; // FIXME or TRUE?
805dd538
VZ
1420 }
1421
f03fc89f
VZ
1422 if (!m_backgroundColour.Ok())
1423 return FALSE;
8bbe427f 1424
ae0bdb01
RR
1425 if (m_windowStyle & wxTE_MULTILINE)
1426 {
1fc32b12 1427#ifndef __WXGTK20__
ae0bdb01 1428 GdkWindow *window = GTK_TEXT(m_text)->text_area;
f03fc89f
VZ
1429 if (!window)
1430 return FALSE;
ae0bdb01
RR
1431 m_backgroundColour.CalcPixel( gdk_window_get_colormap( window ) );
1432 gdk_window_set_background( window, m_backgroundColour.GetColor() );
1433 gdk_window_clear( window );
fab591c5 1434#endif
ae0bdb01 1435 }
f03fc89f 1436
17665a2b
VZ
1437 // change active background color too
1438 m_defaultStyle.SetBackgroundColour( colour );
1439
f03fc89f 1440 return TRUE;
58614078
RR
1441}
1442
eda40bfc 1443bool wxTextCtrl::SetStyle( long start, long end, const wxTextAttr& style )
17665a2b 1444{
17665a2b
VZ
1445 if ( m_windowStyle & wxTE_MULTILINE )
1446 {
1447 if ( style.IsDefault() )
1448 {
1449 // nothing to do
1450 return TRUE;
1451 }
cc3da3f8
RR
1452#ifdef __WXGTK20__
1453 GtkTextBuffer *text_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) );
1454 gint l = gtk_text_buffer_get_char_count( text_buffer );
17665a2b 1455
cc3da3f8
RR
1456 wxCHECK_MSG( start >= 0 && end <= l, FALSE,
1457 _T("invalid range in wxTextCtrl::SetStyle") );
1458
1459 GtkTextIter starti, endi;
1460 gtk_text_buffer_get_iter_at_offset( text_buffer, &starti, start );
1461 gtk_text_buffer_get_iter_at_offset( text_buffer, &endi, end );
1462
1463 // use the attributes from style which are set in it and fall back
1464 // first to the default style and then to the text control default
1465 // colours for the others
1466 wxTextAttr attr = wxTextAttr::Combine(style, m_defaultStyle, this);
1467
1468 PangoFontDescription *font_description = attr.HasFont()
1469 ? attr.GetFont().GetNativeFontInfo()->description
1470 : NULL;
1471
1472 GdkColor *colFg = attr.HasTextColour() ? attr.GetTextColour().GetColor()
1473 : NULL;
1474
1475 GdkColor *colBg = attr.HasBackgroundColour()
1476 ? attr.GetBackgroundColour().GetColor()
1477 : NULL;
1478
1479 GtkTextTag *tag;
1480 tag = gtk_text_buffer_create_tag( text_buffer, NULL, "font-desc", font_description,
1481 "foreground-gdk", colFg,
1482 "background-gdk", colBg, NULL );
1483 gtk_text_buffer_apply_tag( text_buffer, tag, &starti, &endi );
1484
1485 return TRUE;
1486#else
1487 // VERY dirty way to do that - removes the required text and re-adds it
1488 // with styling (FIXME)
5b87f8bf 1489
17665a2b
VZ
1490 gint l = gtk_text_get_length( GTK_TEXT(m_text) );
1491
1492 wxCHECK_MSG( start >= 0 && end <= l, FALSE,
1493 _T("invalid range in wxTextCtrl::SetStyle") );
1494
1495 gint old_pos = gtk_editable_get_position( GTK_EDITABLE(m_text) );
1496 char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), start, end );
1497 wxString tmp(text,*wxConvCurrent);
1498 g_free( text );
1499
1500 gtk_editable_delete_text( GTK_EDITABLE(m_text), start, end );
1501 gtk_editable_set_position( GTK_EDITABLE(m_text), start );
1502
1503#if wxUSE_UNICODE
1504 wxWX2MBbuf buf = tmp.mbc_str();
1505 const char *txt = buf;
1506 size_t txtlen = strlen(buf);
1507#else
1508 const char *txt = tmp;
1509 size_t txtlen = tmp.length();
1510#endif
1511
eda40bfc
VZ
1512 // use the attributes from style which are set in it and fall back
1513 // first to the default style and then to the text control default
1514 // colours for the others
1515 wxGtkTextInsert(m_text,
1516 wxTextAttr::Combine(style, m_defaultStyle, this),
1517 txt,
1518 txtlen);
17665a2b
VZ
1519
1520 /* does not seem to help under GTK+ 1.2 !!!
1521 gtk_editable_set_position( GTK_EDITABLE(m_text), old_pos ); */
1522 SetInsertionPoint( old_pos );
fab591c5 1523#endif
17665a2b
VZ
1524 return TRUE;
1525 }
1526 else // singe line
1527 {
1528 // cannot do this for GTK+'s Entry widget
1529 return FALSE;
1530 }
1531}
1532
58614078
RR
1533void wxTextCtrl::ApplyWidgetStyle()
1534{
ae0bdb01
RR
1535 if (m_windowStyle & wxTE_MULTILINE)
1536 {
2830bf19 1537 // how ?
805dd538 1538 }
ae0bdb01
RR
1539 else
1540 {
1541 SetWidgetStyle();
1542 gtk_widget_set_style( m_text, m_widgetStyle );
1543 }
68dda785 1544}
f96aa4d9 1545
e702ff0f
JS
1546void wxTextCtrl::OnCut(wxCommandEvent& WXUNUSED(event))
1547{
1548 Cut();
1549}
1550
1551void wxTextCtrl::OnCopy(wxCommandEvent& WXUNUSED(event))
1552{
1553 Copy();
1554}
1555
1556void wxTextCtrl::OnPaste(wxCommandEvent& WXUNUSED(event))
1557{
1558 Paste();
1559}
1560
1561void wxTextCtrl::OnUndo(wxCommandEvent& WXUNUSED(event))
1562{
1563 Undo();
1564}
1565
1566void wxTextCtrl::OnRedo(wxCommandEvent& WXUNUSED(event))
1567{
1568 Redo();
1569}
1570
1571void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent& event)
1572{
1573 event.Enable( CanCut() );
1574}
1575
1576void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent& event)
1577{
1578 event.Enable( CanCopy() );
1579}
1580
1581void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent& event)
1582{
1583 event.Enable( CanPaste() );
1584}
1585
1586void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent& event)
1587{
1588 event.Enable( CanUndo() );
1589}
1590
1591void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event)
1592{
1593 event.Enable( CanRedo() );
1594}
65045edd
RR
1595
1596void wxTextCtrl::OnInternalIdle()
1597{
1598 wxCursor cursor = m_cursor;
1599 if (g_globalCursor.Ok()) cursor = g_globalCursor;
1600
307f16e8 1601 if (cursor.Ok())
65045edd 1602 {
fab591c5 1603#ifndef __WXGTK20__
65045edd 1604 GdkWindow *window = (GdkWindow*) NULL;
13111b2a 1605 if (HasFlag(wxTE_MULTILINE))
65045edd
RR
1606 window = GTK_TEXT(m_text)->text_area;
1607 else
1608 window = GTK_ENTRY(m_text)->text_area;
13111b2a 1609
65045edd
RR
1610 if (window)
1611 gdk_window_set_cursor( window, cursor.GetCursor() );
1612
1613 if (!g_globalCursor.Ok())
1614 cursor = *wxSTANDARD_CURSOR;
1615
1616 window = m_widget->window;
247e5b16 1617 if ((window) && !(GTK_WIDGET_NO_WINDOW(m_widget)))
65045edd 1618 gdk_window_set_cursor( window, cursor.GetCursor() );
fab591c5 1619#endif
65045edd 1620 }
26bf1ce0 1621
d7fa7eaa
RR
1622 if (g_delayedFocus == this)
1623 {
1624 if (GTK_WIDGET_REALIZED(m_widget))
1625 {
1626 gtk_widget_grab_focus( m_widget );
1627 g_delayedFocus = NULL;
1628 }
1629 }
1630
e39af974
JS
1631 if (wxUpdateUIEvent::CanUpdate(this))
1632 UpdateWindowUI(wxUPDATE_UI_FROMIDLE);
65045edd 1633}
f68586e5
VZ
1634
1635wxSize wxTextCtrl::DoGetBestSize() const
1636{
1637 // FIXME should be different for multi-line controls...
0279e844
RR
1638 wxSize ret( wxControl::DoGetBestSize() );
1639 return wxSize(80, ret.y);
f68586e5 1640}
0cc7251e 1641
9cd6d737
VZ
1642// ----------------------------------------------------------------------------
1643// freeze/thaw
1644// ----------------------------------------------------------------------------
1645
0cc7251e
VZ
1646void wxTextCtrl::Freeze()
1647{
fab591c5 1648#ifndef __WXGTK20__
0cc7251e
VZ
1649 if ( HasFlag(wxTE_MULTILINE) )
1650 {
1651 gtk_text_freeze(GTK_TEXT(m_text));
1652 }
fab591c5 1653#endif
0cc7251e
VZ
1654}
1655
1656void wxTextCtrl::Thaw()
1657{
fab591c5 1658#ifndef __WXGTK20__
0cc7251e
VZ
1659 if ( HasFlag(wxTE_MULTILINE) )
1660 {
817ec43a
VZ
1661 GTK_TEXT(m_text)->vadj->value = 0.0;
1662
0cc7251e
VZ
1663 gtk_text_thaw(GTK_TEXT(m_text));
1664 }
fab591c5 1665#endif
0cc7251e 1666}
9cd6d737
VZ
1667
1668// ----------------------------------------------------------------------------
1669// scrolling
1670// ----------------------------------------------------------------------------
1671
1672GtkAdjustment *wxTextCtrl::GetVAdj() const
1673{
fab591c5
RR
1674#ifdef __WXGTK20__
1675 return NULL;
1676#else
9cd6d737 1677 return HasFlag(wxTE_MULTILINE) ? GTK_TEXT(m_text)->vadj : NULL;
fab591c5 1678#endif
9cd6d737
VZ
1679}
1680
1681bool wxTextCtrl::DoScroll(GtkAdjustment *adj, int diff)
1682{
fab591c5 1683#ifndef __WXGTK20__
9cd6d737
VZ
1684 float value = adj->value + diff;
1685
1686 if ( value < 0 )
1687 value = 0;
1688
1689 float upper = adj->upper - adj->page_size;
1690 if ( value > upper )
1691 value = upper;
1692
1693 // did we noticeably change the scroll position?
1694 if ( fabs(adj->value - value) < 0.2 )
1695 {
1696 // well, this is what Robert does in wxScrollBar, so it must be good...
1697 return FALSE;
1698 }
1699
1700 adj->value = value;
1701
1702 gtk_signal_emit_by_name(GTK_OBJECT(adj), "value_changed");
1703
fab591c5 1704#endif
9cd6d737
VZ
1705 return TRUE;
1706}
1707
1708bool wxTextCtrl::ScrollLines(int lines)
1709{
fab591c5
RR
1710#ifdef __WXGTK20__
1711 return FALSE;
1712#else
9cd6d737
VZ
1713 GtkAdjustment *adj = GetVAdj();
1714 if ( !adj )
1715 return FALSE;
1716
1717 // this is hardcoded to 10 in GTK+ 1.2 (great idea)
1718 static const int KEY_SCROLL_PIXELS = 10;
1719
1720 return DoScroll(adj, lines*KEY_SCROLL_PIXELS);
fab591c5 1721#endif
9cd6d737
VZ
1722}
1723
1724bool wxTextCtrl::ScrollPages(int pages)
1725{
fab591c5
RR
1726#ifdef __WXGTK20__
1727 return FALSE;
1728#else
9cd6d737
VZ
1729 GtkAdjustment *adj = GetVAdj();
1730 if ( !adj )
1731 return FALSE;
1732
817ec43a 1733 return DoScroll(adj, (int)ceil(pages*adj->page_increment));
fab591c5 1734#endif
9cd6d737
VZ
1735}
1736