src/gtk/textctrl.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        textctrl.cpp
   3 // Purpose:
   4 // Author:      Robert Roebling
   5 // Id:          $Id$
   6 // Copyright:   (c) 1998 Robert Roebling, Vadim Zeitlin
   7 // Licence:     wxWindows licence
   8 /////////////////////////////////////////////////////////////////////////////
   9
  10 #ifdef __GNUG__
  11 #pragma implementation "textctrl.h"
  12 #endif
  13
  14 #include "wx/textctrl.h"
  15 #include "wx/utils.h"
  16 #include "wx/intl.h"
  17 #include "wx/log.h"
  18 #include "wx/settings.h"
  19 #include "wx/panel.h"
  20
  21 #include <sys/types.h>
  22 #include <sys/stat.h>
  23 #include <ctype.h>
  24
  25 #include "gdk/gdk.h"
  26 #include "gtk/gtk.h"
  27 #include "gdk/gdkkeysyms.h"
  28
  29 //-----------------------------------------------------------------------------
  30 // idle system
  31 //-----------------------------------------------------------------------------
  32
  33 extern void wxapp_install_idle_handler();
  34 extern bool g_isIdle;
  35
  36 //-----------------------------------------------------------------------------
  37 // data
  38 //-----------------------------------------------------------------------------
  39
  40 extern bool       g_blockEventsOnDrag;
  41 extern wxCursor   g_globalCursor;
  42
  43 //-----------------------------------------------------------------------------
  44 //  "changed"
  45 //-----------------------------------------------------------------------------
  46
  47 static void
  48 gtk_text_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win )
  49 {
  50     if (!win->m_hasVMT) return;
  51
  52     if (g_isIdle)
  53         wxapp_install_idle_handler();
  54
  55     win->SetModified();
  56     win->UpdateFontIfNeeded();
  57
  58     wxCommandEvent event( wxEVT_COMMAND_TEXT_UPDATED, win->GetId() );
  59     event.SetString( win->GetValue() );
  60     event.SetEventObject( win );
  61     win->GetEventHandler()->ProcessEvent( event );
  62 }
  63
  64 //-----------------------------------------------------------------------------
  65 // "changed" from vertical scrollbar
  66 //-----------------------------------------------------------------------------
  67
  68 static void
  69 gtk_scrollbar_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win )
  70 {
  71     if (!win->m_hasVMT) return;
  72
  73     if (g_isIdle)
  74         wxapp_install_idle_handler();
  75
  76     win->CalculateScrollbar();
  77 }
  78
  79 //-----------------------------------------------------------------------------
  80 // "focus_in_event"
  81 //-----------------------------------------------------------------------------
  82
  83 wxWindow *FindFocusedChild(wxWindow *win);
  84 extern wxWindow  *g_focusWindow;
  85 extern bool       g_blockEventsOnDrag;
  86 // extern bool g_isIdle;
  87
  88 static gint gtk_text_focus_in_callback( GtkWidget *widget, GdkEvent *WXUNUSED(event), wxWindow *win )
  89 {
  90     // Necessary?
  91 #if 0
  92     if (g_isIdle)
  93         wxapp_install_idle_handler();
  94 #endif
  95     if (!win->m_hasVMT) return FALSE;
  96     if (g_blockEventsOnDrag) return FALSE;
  97
  98     g_focusWindow = win;
  99
 100     wxPanel *panel = wxDynamicCast(win->GetParent(), wxPanel);
 101     if (panel)
 102     {
 103         panel->SetLastFocus(win);
 104     }
 105
 106 #ifdef HAVE_XIM
 107     if (win->m_ic)
 108         gdk_im_begin(win->m_ic, win->m_wxwindow->window);
 109 #endif
 110
 111 #if 0
 112 #ifdef wxUSE_CARET
 113     // caret needs to be informed about focus change
 114     wxCaret *caret = win->GetCaret();
 115     if ( caret )
 116     {
 117         caret->OnSetFocus();
 118     }
 119 #endif // wxUSE_CARET
 120 #endif
 121
 122     wxFocusEvent event( wxEVT_SET_FOCUS, win->GetId() );
 123     event.SetEventObject( win );
 124
 125     if (win->GetEventHandler()->ProcessEvent( event ))
 126     {
 127         gtk_signal_emit_stop_by_name( GTK_OBJECT(widget), "focus_in_event" );
 128         return TRUE;
 129     }
 130
 131     return FALSE;
 132 }
 133
 134 //-----------------------------------------------------------------------------
 135 // "focus_out_event"
 136 //-----------------------------------------------------------------------------
 137
 138 static gint gtk_text_focus_out_callback( GtkWidget *widget, GdkEvent *WXUNUSED(event), wxWindow *win )
 139 {
 140 #if 0
 141     if (g_isIdle)
 142         wxapp_install_idle_handler();
 143 #endif
 144
 145     if (!win->m_hasVMT) return FALSE;
 146     if (g_blockEventsOnDrag) return FALSE;
 147
 148 #if 0
 149     // if the focus goes out of our app alltogether, OnIdle() will send
 150     // wxActivateEvent, otherwise gtk_window_focus_in_callback() will reset
 151     // g_sendActivateEvent to -1
 152     g_sendActivateEvent = 0;
 153 #endif
 154
 155     wxWindow *winFocus = FindFocusedChild(win);
 156     if ( winFocus )
 157         win = winFocus;
 158
 159     g_focusWindow = (wxWindow *)NULL;
 160
 161 #ifdef HAVE_XIM
 162     if (win->m_ic)
 163         gdk_im_end();
 164 #endif
 165
 166 #if 0
 167 #ifdef wxUSE_CARET
 168     // caret needs to be informed about focus change
 169     wxCaret *caret = win->GetCaret();
 170     if ( caret )
 171     {
 172         caret->OnKillFocus();
 173     }
 174 #endif // wxUSE_CARET
 175 #endif
 176
 177     wxFocusEvent event( wxEVT_KILL_FOCUS, win->GetId() );
 178     event.SetEventObject( win );
 179
 180     if (win->GetEventHandler()->ProcessEvent( event ))
 181     {
 182         gtk_signal_emit_stop_by_name( GTK_OBJECT(widget), "focus_out_event" );
 183         return TRUE;
 184     }
 185
 186     return FALSE;
 187 }
 188
 189 //-----------------------------------------------------------------------------
 190 //  wxTextCtrl
 191 //-----------------------------------------------------------------------------
 192
 193 IMPLEMENT_DYNAMIC_CLASS(wxTextCtrl,wxControl)
 194
 195 BEGIN_EVENT_TABLE(wxTextCtrl, wxControl)
 196     EVT_CHAR(wxTextCtrl::OnChar)
 197
 198     EVT_MENU(wxID_CUT, wxTextCtrl::OnCut)
 199     EVT_MENU(wxID_COPY, wxTextCtrl::OnCopy)
 200     EVT_MENU(wxID_PASTE, wxTextCtrl::OnPaste)
 201     EVT_MENU(wxID_UNDO, wxTextCtrl::OnUndo)
 202     EVT_MENU(wxID_REDO, wxTextCtrl::OnRedo)
 203
 204     EVT_UPDATE_UI(wxID_CUT, wxTextCtrl::OnUpdateCut)
 205     EVT_UPDATE_UI(wxID_COPY, wxTextCtrl::OnUpdateCopy)
 206     EVT_UPDATE_UI(wxID_PASTE, wxTextCtrl::OnUpdatePaste)
 207     EVT_UPDATE_UI(wxID_UNDO, wxTextCtrl::OnUpdateUndo)
 208     EVT_UPDATE_UI(wxID_REDO, wxTextCtrl::OnUpdateRedo)
 209 END_EVENT_TABLE()
 210
 211 void wxTextCtrl::Init()
 212 {
 213     m_modified = FALSE;
 214     m_updateFont = FALSE;
 215     m_text =
 216     m_vScrollbar = (GtkWidget *)NULL;
 217 }
 218
 219 wxTextCtrl::wxTextCtrl( wxWindow *parent,
 220                         wxWindowID id,
 221                         const wxString &value,
 222                         const wxPoint &pos,
 223                         const wxSize &size,
 224                         long style,
 225                         const wxValidator& validator,
 226                         const wxString &name )
 227 {
 228     Init();
 229
 230     Create( parent, id, value, pos, size, style, validator, name );
 231 }
 232
 233 bool wxTextCtrl::Create( wxWindow *parent,
 234                          wxWindowID id,
 235                          const wxString &value,
 236                          const wxPoint &pos,
 237                          const wxSize &size,
 238                          long style,
 239                          const wxValidator& validator,
 240                          const wxString &name )
 241 {
 242     m_needParent = TRUE;
 243     m_acceptsFocus = TRUE;
 244
 245     if (!PreCreation( parent, pos, size ) ||
 246         !CreateBase( parent, id, pos, size, style, validator, name ))
 247     {
 248         wxFAIL_MSG( wxT("wxTextCtrl creation failed") );
 249         return FALSE;
 250     }
 251
 252
 253     m_vScrollbarVisible = FALSE;
 254
 255     bool multi_line = (style & wxTE_MULTILINE) != 0;
 256     if (multi_line)
 257     {
 258 #if (GTK_MINOR_VERSION > 2)
 259         /* a multi-line edit control: create a vertical scrollbar by default and
 260            horizontal if requested */
 261         bool bHasHScrollbar = (style & wxHSCROLL) != 0;
 262 #else
 263         bool bHasHScrollbar = FALSE;
 264 #endif
 265
 266         /* create our control ... */
 267         m_text = gtk_text_new( (GtkAdjustment *) NULL, (GtkAdjustment *) NULL );
 268
 269         /* ... and put into the upper left hand corner of the table */
 270         m_widget = gtk_table_new(bHasHScrollbar ? 2 : 1, 2, FALSE);
 271         GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
 272         gtk_table_attach( GTK_TABLE(m_widget), m_text, 0, 1, 0, 1,
 273                       (GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK),
 274                       (GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK),
 275                        0, 0);
 276
 277         /* always wrap words */
 278         gtk_text_set_word_wrap( GTK_TEXT(m_text), TRUE );
 279
 280 #if (GTK_MINOR_VERSION > 2)
 281         /* put the horizontal scrollbar in the lower left hand corner */
 282         if (bHasHScrollbar)
 283         {
 284             GtkWidget *hscrollbar = gtk_hscrollbar_new(GTK_TEXT(m_text)->hadj);
 285             GTK_WIDGET_UNSET_FLAGS( hscrollbar, GTK_CAN_FOCUS );
 286             gtk_table_attach(GTK_TABLE(m_widget), hscrollbar, 0, 1, 1, 2,
 287                        (GtkAttachOptions)(GTK_EXPAND | GTK_FILL | GTK_SHRINK),
 288                        GTK_FILL,
 289                        0, 0);
 290             gtk_widget_show(hscrollbar);
 291
 292             /* don't wrap lines, otherwise we wouldn't need the scrollbar */
 293             gtk_text_set_line_wrap( GTK_TEXT(m_text), FALSE );
 294         }
 295 #endif
 296
 297         /* finally, put the vertical scrollbar in the upper right corner */
 298         m_vScrollbar = gtk_vscrollbar_new( GTK_TEXT(m_text)->vadj );
 299         GTK_WIDGET_UNSET_FLAGS( m_vScrollbar, GTK_CAN_FOCUS );
 300         gtk_table_attach(GTK_TABLE(m_widget), m_vScrollbar, 1, 2, 0, 1,
 301                      GTK_FILL,
 302                      (GtkAttachOptions)(GTK_EXPAND | GTK_FILL | GTK_SHRINK),
 303                      0, 0);
 304     }
 305     else
 306     {
 307         /* a single-line text control: no need for scrollbars */
 308         m_widget =
 309           m_text = gtk_entry_new();
 310     }
 311
 312     m_parent->DoAddChild( this );
 313
 314     PostCreation();
 315
 316     SetFont( parent->GetFont() );
 317
 318     wxSize size_best( DoGetBestSize() );
 319     wxSize new_size( size );
 320     if (new_size.x == -1)
 321         new_size.x = size_best.x;
 322     if (new_size.y == -1)
 323         new_size.y = size_best.y;
 324     if ((new_size.x != size.x) || (new_size.y != size.y))
 325         SetSize( new_size.x, new_size.y );
 326
 327     if (multi_line)
 328         gtk_widget_show(m_text);
 329
 330     if (multi_line)
 331     {
 332         gtk_signal_connect(GTK_OBJECT(GTK_TEXT(m_text)->vadj), "changed",
 333           (GtkSignalFunc) gtk_scrollbar_changed_callback, (gpointer) this );
 334
 335         gtk_signal_connect( GTK_OBJECT(GTK_TEXT(m_text)), "focus_in_event",
 336               GTK_SIGNAL_FUNC(gtk_text_focus_in_callback), (gpointer)this );
 337
 338         gtk_signal_connect( GTK_OBJECT(GTK_TEXT(m_text)), "focus_out_event",
 339                             GTK_SIGNAL_FUNC(gtk_text_focus_out_callback), (gpointer)this );
 340     }
 341     else
 342     {
 343         gtk_signal_connect( GTK_OBJECT(m_text), "focus_in_event",
 344               GTK_SIGNAL_FUNC(gtk_text_focus_in_callback), (gpointer)this );
 345
 346         gtk_signal_connect( GTK_OBJECT(m_text), "focus_out_event",
 347                             GTK_SIGNAL_FUNC(gtk_text_focus_out_callback), (gpointer)this );
 348     }
 349
 350     if (!value.IsEmpty())
 351     {
 352         gint tmp = 0;
 353
 354 #if GTK_MINOR_VERSION == 0
 355         // if we don't realize it, GTK 1.0.6 dies with a SIGSEGV in
 356         // gtk_editable_insert_text()
 357         gtk_widget_realize(m_text);
 358 #endif // GTK 1.0
 359
 360 #if wxUSE_UNICODE
 361         wxWX2MBbuf val = value.mbc_str();
 362         gtk_editable_insert_text( GTK_EDITABLE(m_text), val, strlen(val), &tmp );
 363 #else // !Unicode
 364         gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &tmp );
 365 #endif // Unicode/!Unicode
 366
 367         if (multi_line)
 368         {
 369             /* bring editable's cursor uptodate. bug in GTK. */
 370
 371             GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
 372         }
 373     }
 374
 375     if (style & wxTE_PASSWORD)
 376     {
 377         if (!multi_line)
 378             gtk_entry_set_visibility( GTK_ENTRY(m_text), FALSE );
 379     }
 380
 381     if (style & wxTE_READONLY)
 382     {
 383         if (!multi_line)
 384             gtk_entry_set_editable( GTK_ENTRY(m_text), FALSE );
 385     }
 386     else
 387     {
 388         if (multi_line)
 389             gtk_text_set_editable( GTK_TEXT(m_text), 1 );
 390     }
 391
 392     /* we want to be notified about text changes */
 393     gtk_signal_connect( GTK_OBJECT(m_text), "changed",
 394       GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
 395
 396     /* we don't set a valid background colour, because the window
 397        manager should use a default one */
 398     m_backgroundColour = wxColour();
 399
 400     wxColour colFg = parent->GetForegroundColour();
 401     SetForegroundColour( colFg );
 402
 403     m_cursor = wxCursor( wxCURSOR_IBEAM );
 404
 405     // FIXME: is the bg colour correct here?
 406     wxTextAttr attrDef( colFg,
 407                         wxSystemSettings::GetSystemColour(wxSYS_COLOUR_WINDOW),
 408                         parent->GetFont() );
 409     SetDefaultStyle( attrDef );
 410
 411     Show( TRUE );
 412
 413     return TRUE;
 414 }
 415
 416 void wxTextCtrl::CalculateScrollbar()
 417 {
 418     if ((m_windowStyle & wxTE_MULTILINE) == 0) return;
 419
 420     GtkAdjustment *adj = GTK_TEXT(m_text)->vadj;
 421
 422     if (adj->upper - adj->page_size < 0.8)
 423     {
 424         if (m_vScrollbarVisible)
 425         {
 426             gtk_widget_hide( m_vScrollbar );
 427             m_vScrollbarVisible = FALSE;
 428         }
 429     }
 430     else
 431     {
 432         if (!m_vScrollbarVisible)
 433         {
 434             gtk_widget_show( m_vScrollbar );
 435             m_vScrollbarVisible = TRUE;
 436         }
 437     }
 438 }
 439
 440 wxString wxTextCtrl::GetValue() const
 441 {
 442     wxCHECK_MSG( m_text != NULL, wxT(""), wxT("invalid text ctrl") );
 443
 444     wxString tmp;
 445     if (m_windowStyle & wxTE_MULTILINE)
 446     {
 447         gint len = gtk_text_get_length( GTK_TEXT(m_text) );
 448         char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
 449         tmp = wxString(text,*wxConvCurrent);
 450         g_free( text );
 451     }
 452     else
 453     {
 454         tmp = wxString(gtk_entry_get_text( GTK_ENTRY(m_text) ),*wxConvCurrent);
 455     }
 456     return tmp;
 457 }
 458
 459 void wxTextCtrl::SetValue( const wxString &value )
 460 {
 461     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 462
 463     if (m_windowStyle & wxTE_MULTILINE)
 464     {
 465         gint len = gtk_text_get_length( GTK_TEXT(m_text) );
 466         gtk_editable_delete_text( GTK_EDITABLE(m_text), 0, len );
 467         len = 0;
 468 #if wxUSE_UNICODE
 469         wxWX2MBbuf tmpbuf = value.mbc_str();
 470         gtk_editable_insert_text( GTK_EDITABLE(m_text), tmpbuf, strlen(tmpbuf), &len );
 471 #else
 472         gtk_editable_insert_text( GTK_EDITABLE(m_text), value.mbc_str(), value.Length(), &len );
 473 #endif
 474     }
 475     else
 476     {
 477         gtk_entry_set_text( GTK_ENTRY(m_text), value.mbc_str() );
 478     }
 479
 480     // GRG, Jun/2000: Changed this after a lot of discussion in
 481     //   the lists. wxWindows 2.2 will have a set of flags to
 482     //   customize this behaviour.
 483     SetInsertionPoint(0);
 484
 485     m_modified = FALSE;
 486 }
 487
 488 void wxTextCtrl::WriteText( const wxString &text )
 489 {
 490     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 491
 492     if ( text.empty() )
 493         return;
 494
 495 #if wxUSE_UNICODE
 496     wxWX2MBbuf buf = text.mbc_str();
 497     const char *txt = buf;
 498     size_t txtlen = strlen(buf);
 499 #else
 500     const char *txt = text;
 501     size_t txtlen = text.length();
 502 #endif
 503
 504     if ( m_windowStyle & wxTE_MULTILINE )
 505     {
 506         /* this moves the cursor pos to behind the inserted text */
 507         gint len = GTK_EDITABLE(m_text)->current_pos;
 508
 509         // if we have any special style, use it
 510         if ( !m_defaultStyle.IsDefault() )
 511         {
 512             GdkFont *font = m_defaultStyle.HasFont()
 513                                 ? m_defaultStyle.GetFont().GetInternalFont()
 514                                 : NULL;
 515
 516             GdkColor *colFg = m_defaultStyle.HasTextColour()
 517                                 ? m_defaultStyle.GetTextColour().GetColor()
 518                                 : NULL;
 519
 520             GdkColor *colBg = m_defaultStyle.HasBackgroundColour()
 521                                 ? m_defaultStyle.GetBackgroundColour().GetColor()
 522                                 : NULL;
 523
 524             gtk_text_insert( GTK_TEXT(m_text), font, colFg, colBg, txt, txtlen );
 525         }
 526         else // no style
 527         {
 528             gtk_editable_insert_text( GTK_EDITABLE(m_text), txt, txtlen, &len );
 529         }
 530
 531         /* bring editable's cursor uptodate. bug in GTK. */
 532         GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
 533     }
 534     else // single line
 535     {
 536         /* this moves the cursor pos to behind the inserted text */
 537         gint len = GTK_EDITABLE(m_text)->current_pos;
 538         gtk_editable_insert_text( GTK_EDITABLE(m_text), txt, txtlen, &len );
 539
 540         /* bring editable's cursor uptodate. bug in GTK. */
 541         GTK_EDITABLE(m_text)->current_pos += text.Len();
 542
 543         /* bring entry's cursor uptodate. bug in GTK. */
 544         gtk_entry_set_position( GTK_ENTRY(m_text), GTK_EDITABLE(m_text)->current_pos );
 545     }
 546 }
 547
 548 void wxTextCtrl::AppendText( const wxString &text )
 549 {
 550     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 551
 552     if ( text.empty() )
 553         return;
 554
 555 #if wxUSE_UNICODE
 556     wxWX2MBbuf buf = text.mbc_str();
 557     const char *txt = buf;
 558     size_t txtlen = strlen(buf);
 559 #else
 560     const char *txt = text;
 561     size_t txtlen = text.length();
 562 #endif
 563
 564     if (m_windowStyle & wxTE_MULTILINE)
 565     {
 566         if ( !m_defaultStyle.IsDefault() )
 567         {
 568             GdkFont *font = m_defaultStyle.HasFont()
 569                                 ? m_defaultStyle.GetFont().GetInternalFont()
 570                                 : NULL;
 571
 572             GdkColor *colFg = m_defaultStyle.HasTextColour()
 573                                 ? m_defaultStyle.GetTextColour().GetColor()
 574                                 : NULL;
 575
 576             GdkColor *colBg = m_defaultStyle.HasBackgroundColour()
 577                                 ? m_defaultStyle.GetBackgroundColour().GetColor()
 578                                 : NULL;
 579
 580             gtk_text_insert( GTK_TEXT(m_text), font, colFg, colBg, txt, txtlen );
 581         }
 582         else // no style
 583         {
 584             /* we'll insert at the last position */
 585             gint len = gtk_text_get_length( GTK_TEXT(m_text) );
 586             gtk_editable_insert_text( GTK_EDITABLE(m_text), txt, txtlen, &len );
 587         }
 588
 589         /* bring editable's cursor uptodate. bug in GTK. */
 590         GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
 591     }
 592     else // single line
 593     {
 594         gtk_entry_append_text( GTK_ENTRY(m_text), txt );
 595     }
 596 }
 597
 598 wxString wxTextCtrl::GetLineText( long lineNo ) const
 599 {
 600   if (m_windowStyle & wxTE_MULTILINE)
 601   {
 602     gint len = gtk_text_get_length( GTK_TEXT(m_text) );
 603     char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
 604
 605     if (text)
 606     {
 607         wxString buf(wxT(""));
 608         long i;
 609         int currentLine = 0;
 610         for (i = 0; currentLine != lineNo && text[i]; i++ )
 611           if (text[i] == '\n')
 612             currentLine++;
 613         // Now get the text
 614         int j;
 615         for (j = 0; text[i] && text[i] != '\n'; i++, j++ )
 616             buf += text[i];
 617
 618         g_free( text );
 619         return buf;
 620     }
 621     else
 622       return wxEmptyString;
 623   }
 624   else
 625   {
 626     if (lineNo == 0) return GetValue();
 627     return wxEmptyString;
 628   }
 629 }
 630
 631 void wxTextCtrl::OnDropFiles( wxDropFilesEvent &WXUNUSED(event) )
 632 {
 633   /* If you implement this, don't forget to update the documentation!
 634    * (file docs/latex/wx/text.tex) */
 635     wxFAIL_MSG( wxT("wxTextCtrl::OnDropFiles not implemented") );
 636 }
 637
 638 bool wxTextCtrl::PositionToXY(long pos, long *x, long *y ) const
 639 {
 640     if ( m_windowStyle & wxTE_MULTILINE )
 641     {
 642         wxString text = GetValue();
 643
 644         // cast to prevent warning. But pos really should've been unsigned.
 645         if( (unsigned long)pos > text.Len()  )
 646             return FALSE;
 647
 648         *x=0;   // First Col
 649         *y=0;   // First Line
 650
 651         const wxChar* stop = text.c_str() + pos;
 652         for ( const wxChar *p = text.c_str(); p < stop; p++ )
 653         {
 654             if (*p == wxT('\n'))
 655             {
 656                 (*y)++;
 657                 *x=0;
 658             }
 659             else
 660                 (*x)++;
 661         }
 662     }
 663     else // single line control
 664     {
 665         if ( pos <= GTK_ENTRY(m_text)->text_length )
 666         {
 667             *y = 0;
 668             *x = pos;
 669         }
 670         else
 671         {
 672             // index out of bounds
 673             return FALSE;
 674         }
 675     }
 676
 677     return TRUE;
 678 }
 679
 680 long wxTextCtrl::XYToPosition(long x, long y ) const
 681 {
 682     if (!(m_windowStyle & wxTE_MULTILINE)) return 0;
 683
 684     long pos=0;
 685     for( int i=0; i<y; i++ ) pos += GetLineLength(i) + 1; // one for '\n'
 686
 687     pos += x;
 688     return pos;
 689 }
 690
 691 int wxTextCtrl::GetLineLength(long lineNo) const
 692 {
 693     wxString str = GetLineText (lineNo);
 694     return (int) str.Length();
 695 }
 696
 697 int wxTextCtrl::GetNumberOfLines() const
 698 {
 699     if (m_windowStyle & wxTE_MULTILINE)
 700     {
 701         gint len = gtk_text_get_length( GTK_TEXT(m_text) );
 702         char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len );
 703
 704         if (text)
 705         {
 706             int currentLine = 0;
 707             for (int i = 0; i < len; i++ )
 708             {
 709                 if (text[i] == '\n')
 710                     currentLine++;
 711             }
 712             g_free( text );
 713
 714             // currentLine is 0 based, add 1 to get number of lines
 715             return currentLine + 1;
 716         }
 717         else
 718         {
 719             return 0;
 720         }
 721     }
 722     else
 723     {
 724         return 1;
 725     }
 726 }
 727
 728 void wxTextCtrl::SetInsertionPoint( long pos )
 729 {
 730     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 731
 732     if (m_windowStyle & wxTE_MULTILINE)
 733     {
 734         /* seems to be broken in GTK 1.0.X:
 735            gtk_text_set_point( GTK_TEXT(m_text), (int)pos ); */
 736
 737         gtk_signal_disconnect_by_func( GTK_OBJECT(m_text),
 738           GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
 739
 740         /* we fake a set_point by inserting and deleting. as the user
 741            isn't supposed to get to know about thos non-sense, we
 742            disconnect so that no events are sent to the user program. */
 743
 744         gint tmp = (gint)pos;
 745         gtk_editable_insert_text( GTK_EDITABLE(m_text), " ", 1, &tmp );
 746         gtk_editable_delete_text( GTK_EDITABLE(m_text), tmp-1, tmp );
 747
 748         gtk_signal_connect( GTK_OBJECT(m_text), "changed",
 749           GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this);
 750
 751         /* bring editable's cursor uptodate. another bug in GTK. */
 752
 753         GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) );
 754     }
 755     else
 756     {
 757         gtk_entry_set_position( GTK_ENTRY(m_text), (int)pos );
 758
 759         /* bring editable's cursor uptodate. bug in GTK. */
 760
 761         GTK_EDITABLE(m_text)->current_pos = (guint32)pos;
 762     }
 763 }
 764
 765 void wxTextCtrl::SetInsertionPointEnd()
 766 {
 767     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 768
 769     if (m_windowStyle & wxTE_MULTILINE)
 770         SetInsertionPoint(gtk_text_get_length(GTK_TEXT(m_text)));
 771     else
 772         gtk_entry_set_position( GTK_ENTRY(m_text), -1 );
 773 }
 774
 775 void wxTextCtrl::SetEditable( bool editable )
 776 {
 777     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 778
 779     if (m_windowStyle & wxTE_MULTILINE)
 780         gtk_text_set_editable( GTK_TEXT(m_text), editable );
 781     else
 782         gtk_entry_set_editable( GTK_ENTRY(m_text), editable );
 783 }
 784
 785 bool wxTextCtrl::Enable( bool enable )
 786 {
 787     if (!wxWindowBase::Enable(enable))
 788     {
 789         // nothing to do
 790         return FALSE;
 791     }
 792
 793     if (m_windowStyle & wxTE_MULTILINE)
 794     {
 795         gtk_text_set_editable( GTK_TEXT(m_text), enable );
 796         OnParentEnable(enable);
 797     }
 798     else
 799     {
 800         gtk_widget_set_sensitive( m_text, enable );
 801     }
 802
 803     return TRUE;
 804 }
 805
 806 // wxGTK-specific: called recursively by Enable,
 807 // to give widgets an oppprtunity to correct their colours after they
 808 // have been changed by Enable
 809 void wxTextCtrl::OnParentEnable( bool enable )
 810 {
 811     // If we have a custom background colour, we use this colour in both
 812     // disabled and enabled mode, or we end up with a different colour under the
 813     // text.
 814     wxColour oldColour = GetBackgroundColour();
 815     if (oldColour.Ok())
 816     {
 817         // Need to set twice or it'll optimize the useful stuff out
 818         if (oldColour == * wxWHITE)
 819             SetBackgroundColour(*wxBLACK);
 820         else
 821             SetBackgroundColour(*wxWHITE);
 822         SetBackgroundColour(oldColour);
 823     }
 824 }
 825
 826 void wxTextCtrl::DiscardEdits()
 827 {
 828     m_modified = FALSE;
 829 }
 830
 831 void wxTextCtrl::SetSelection( long from, long to )
 832 {
 833     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 834
 835     if ( (m_windowStyle & wxTE_MULTILINE) &&
 836          !GTK_TEXT(m_text)->line_start_cache )
 837     {
 838         // tell the programmer that it didn't work
 839         wxLogDebug(_T("Can't call SetSelection() before realizing the control"));
 840         return;
 841     }
 842
 843     gtk_editable_select_region( GTK_EDITABLE(m_text), (gint)from, (gint)to );
 844 }
 845
 846 void wxTextCtrl::ShowPosition( long WXUNUSED(pos) )
 847 {
 848 //    SetInsertionPoint( pos );
 849 }
 850
 851 long wxTextCtrl::GetInsertionPoint() const
 852 {
 853     wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
 854
 855     return (long) GTK_EDITABLE(m_text)->current_pos;
 856 }
 857
 858 long wxTextCtrl::GetLastPosition() const
 859 {
 860     wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
 861
 862     int pos = 0;
 863     if (m_windowStyle & wxTE_MULTILINE)
 864         pos = gtk_text_get_length( GTK_TEXT(m_text) );
 865     else
 866         pos = GTK_ENTRY(m_text)->text_length;
 867
 868     return (long)pos;
 869 }
 870
 871 void wxTextCtrl::Remove( long from, long to )
 872 {
 873     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 874
 875     gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to );
 876 }
 877
 878 void wxTextCtrl::Replace( long from, long to, const wxString &value )
 879 {
 880     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 881
 882     gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to );
 883
 884     if (!value.IsEmpty())
 885     {
 886         gint pos = (gint)from;
 887 #if wxUSE_UNICODE
 888         wxWX2MBbuf buf = value.mbc_str();
 889         gtk_editable_insert_text( GTK_EDITABLE(m_text), buf, strlen(buf), &pos );
 890 #else
 891         gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &pos );
 892 #endif
 893     }
 894 }
 895
 896 void wxTextCtrl::Cut()
 897 {
 898     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 899
 900 #if (GTK_MINOR_VERSION > 0)
 901     gtk_editable_cut_clipboard( GTK_EDITABLE(m_text) );
 902 #else
 903     gtk_editable_cut_clipboard( GTK_EDITABLE(m_text), 0 );
 904 #endif
 905 }
 906
 907 void wxTextCtrl::Copy()
 908 {
 909     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 910
 911 #if (GTK_MINOR_VERSION > 0)
 912     gtk_editable_copy_clipboard( GTK_EDITABLE(m_text) );
 913 #else
 914     gtk_editable_copy_clipboard( GTK_EDITABLE(m_text), 0 );
 915 #endif
 916 }
 917
 918 void wxTextCtrl::Paste()
 919 {
 920     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 921
 922 #if (GTK_MINOR_VERSION > 0)
 923     gtk_editable_paste_clipboard( GTK_EDITABLE(m_text) );
 924 #else
 925     gtk_editable_paste_clipboard( GTK_EDITABLE(m_text), 0 );
 926 #endif
 927 }
 928
 929 // Undo/redo
 930 void wxTextCtrl::Undo()
 931 {
 932     // TODO
 933     wxFAIL_MSG( wxT("wxTextCtrl::Undo not implemented") );
 934 }
 935
 936 void wxTextCtrl::Redo()
 937 {
 938     // TODO
 939     wxFAIL_MSG( wxT("wxTextCtrl::Redo not implemented") );
 940 }
 941
 942 bool wxTextCtrl::CanUndo() const
 943 {
 944     // TODO
 945     wxFAIL_MSG( wxT("wxTextCtrl::CanUndo not implemented") );
 946     return FALSE;
 947 }
 948
 949 bool wxTextCtrl::CanRedo() const
 950 {
 951     // TODO
 952     wxFAIL_MSG( wxT("wxTextCtrl::CanRedo not implemented") );
 953     return FALSE;
 954 }
 955
 956 // If the return values from and to are the same, there is no
 957 // selection.
 958 void wxTextCtrl::GetSelection(long* fromOut, long* toOut) const
 959 {
 960     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
 961
 962     long from, to;
 963     if ( !(GTK_EDITABLE(m_text)->has_selection) )
 964     {
 965         from =
 966         to = GetInsertionPoint();
 967     }
 968     else // got selection
 969     {
 970         from = (long) GTK_EDITABLE(m_text)->selection_start_pos;
 971         to = (long) GTK_EDITABLE(m_text)->selection_end_pos;
 972
 973         if ( from > to )
 974         {
 975             // exchange them to be compatible with wxMSW
 976             long tmp = from;
 977             from = to;
 978             to = tmp;
 979         }
 980     }
 981
 982     if ( fromOut )
 983         *fromOut = from;
 984     if ( toOut )
 985         *toOut = to;
 986 }
 987
 988 bool wxTextCtrl::IsEditable() const
 989 {
 990     wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
 991
 992     return GTK_EDITABLE(m_text)->editable;
 993 }
 994
 995 bool wxTextCtrl::IsModified() const
 996 {
 997     return m_modified;
 998 }
 999
1000 void wxTextCtrl::Clear()
1001 {
1002     SetValue( wxT("") );
1003 }
1004
1005 void wxTextCtrl::OnChar( wxKeyEvent &key_event )
1006 {
1007     wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1008
1009     if ((key_event.KeyCode() == WXK_RETURN) && (m_windowStyle & wxPROCESS_ENTER))
1010     {
1011         wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId);
1012         event.SetEventObject(this);
1013         event.SetString(GetValue());
1014         if (GetEventHandler()->ProcessEvent(event)) return;
1015     }
1016
1017     if ((key_event.KeyCode() == WXK_RETURN) && !(m_windowStyle & wxTE_MULTILINE))
1018     {
1019         wxWindow *top_frame = m_parent;
1020         while (top_frame->GetParent() && !(top_frame->IsTopLevel()))
1021             top_frame = top_frame->GetParent();
1022         GtkWindow *window = GTK_WINDOW(top_frame->m_widget);
1023
1024         if (window->default_widget)
1025         {
1026             gtk_widget_activate (window->default_widget);
1027             return;
1028         }
1029     }
1030
1031     key_event.Skip();
1032 }
1033
1034 GtkWidget* wxTextCtrl::GetConnectWidget()
1035 {
1036     return GTK_WIDGET(m_text);
1037 }
1038
1039 bool wxTextCtrl::IsOwnGtkWindow( GdkWindow *window )
1040 {
1041     if (m_windowStyle & wxTE_MULTILINE)
1042         return (window == GTK_TEXT(m_text)->text_area);
1043     else
1044         return (window == GTK_ENTRY(m_text)->text_area);
1045 }
1046
1047 // the font will change for subsequent text insertiongs
1048 bool wxTextCtrl::SetFont( const wxFont &font )
1049 {
1050     wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
1051
1052     if ( !wxWindowBase::SetFont(font) )
1053     {
1054         // font didn't change, nothing to do
1055         return FALSE;
1056     }
1057
1058     if ( m_windowStyle & wxTE_MULTILINE )
1059     {
1060         m_updateFont = TRUE;
1061
1062         ChangeFontGlobally();
1063     }
1064
1065     return TRUE;
1066 }
1067
1068 void wxTextCtrl::ChangeFontGlobally()
1069 {
1070     // this method is very inefficient and hence should be called as rarely as
1071     // possible!
1072     wxASSERT_MSG( (m_windowStyle & wxTE_MULTILINE) && m_updateFont,
1073                   _T("shouldn't be called for single line controls") );
1074
1075     wxString value = GetValue();
1076     if ( !value.IsEmpty() )
1077     {
1078         Clear();
1079         AppendText(value);
1080
1081         m_updateFont = FALSE;
1082     }
1083 }
1084
1085 void wxTextCtrl::UpdateFontIfNeeded()
1086 {
1087     if ( m_updateFont )
1088         ChangeFontGlobally();
1089 }
1090
1091 bool wxTextCtrl::SetForegroundColour(const wxColour& colour)
1092 {
1093     if ( !wxControl::SetForegroundColour(colour) )
1094         return FALSE;
1095
1096     // update default fg colour too
1097     m_defaultStyle.SetTextColour(colour);
1098
1099     return TRUE;
1100 }
1101
1102 bool wxTextCtrl::SetBackgroundColour( const wxColour &colour )
1103 {
1104     wxCHECK_MSG( m_text != NULL, FALSE, wxT("invalid text ctrl") );
1105
1106     wxControl::SetBackgroundColour( colour );
1107
1108     if (!m_widget->window)
1109         return FALSE;
1110
1111     wxColour sysbg = wxSystemSettings::GetSystemColour( wxSYS_COLOUR_BTNFACE );
1112     if (sysbg.Red() == colour.Red() &&
1113         sysbg.Green() == colour.Green() &&
1114         sysbg.Blue() == colour.Blue())
1115     {
1116         return FALSE; // FIXME or TRUE?
1117     }
1118
1119     if (!m_backgroundColour.Ok())
1120         return FALSE;
1121
1122     if (m_windowStyle & wxTE_MULTILINE)
1123     {
1124         GdkWindow *window = GTK_TEXT(m_text)->text_area;
1125         if (!window)
1126             return FALSE;
1127         m_backgroundColour.CalcPixel( gdk_window_get_colormap( window ) );
1128         gdk_window_set_background( window, m_backgroundColour.GetColor() );
1129         gdk_window_clear( window );
1130     }
1131
1132     // change active background color too
1133     m_defaultStyle.SetBackgroundColour( colour );
1134
1135     return TRUE;
1136 }
1137
1138 bool wxTextCtrl::SetStyle( long start, long end, const wxTextAttr &style )
1139 {
1140     /* VERY dirty way to do that - removes the required text and re-adds it
1141        with styling (FIXME) */
1142     if ( m_windowStyle & wxTE_MULTILINE )
1143     {
1144         if ( style.IsDefault() )
1145         {
1146             // nothing to do
1147             return TRUE;
1148         }
1149
1150         gint l = gtk_text_get_length( GTK_TEXT(m_text) );
1151
1152         wxCHECK_MSG( start >= 0 && end <= l, FALSE,
1153                      _T("invalid range in wxTextCtrl::SetStyle") );
1154
1155         gint old_pos = gtk_editable_get_position( GTK_EDITABLE(m_text) );
1156         char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), start, end );
1157         wxString tmp(text,*wxConvCurrent);
1158         g_free( text );
1159
1160         gtk_editable_delete_text( GTK_EDITABLE(m_text), start, end );
1161         gtk_editable_set_position( GTK_EDITABLE(m_text), start );
1162
1163 #if wxUSE_UNICODE
1164         wxWX2MBbuf buf = tmp.mbc_str();
1165         const char *txt = buf;
1166         size_t txtlen = strlen(buf);
1167 #else
1168         const char *txt = tmp;
1169         size_t txtlen = tmp.length();
1170 #endif
1171
1172         GdkFont *font = style.HasFont()
1173                             ? style.GetFont().GetInternalFont()
1174                             : NULL;
1175
1176         GdkColor *colFg = style.HasTextColour()
1177                             ? style.GetTextColour().GetColor()
1178                             : NULL;
1179
1180         GdkColor *colBg = style.HasBackgroundColour()
1181                             ? style.GetBackgroundColour().GetColor()
1182                             : NULL;
1183
1184         gtk_text_insert( GTK_TEXT(m_text), font, colFg, colBg, txt, txtlen );
1185
1186         /* does not seem to help under GTK+ 1.2 !!!
1187         gtk_editable_set_position( GTK_EDITABLE(m_text), old_pos ); */
1188         SetInsertionPoint( old_pos );
1189         return TRUE;
1190     }
1191     else // singe line
1192     {
1193         // cannot do this for GTK+'s Entry widget
1194         return FALSE;
1195     }
1196 }
1197
1198 void wxTextCtrl::ApplyWidgetStyle()
1199 {
1200     if (m_windowStyle & wxTE_MULTILINE)
1201     {
1202         // how ?
1203     }
1204     else
1205     {
1206         SetWidgetStyle();
1207         gtk_widget_set_style( m_text, m_widgetStyle );
1208     }
1209 }
1210
1211 void wxTextCtrl::OnCut(wxCommandEvent& WXUNUSED(event))
1212 {
1213     Cut();
1214 }
1215
1216 void wxTextCtrl::OnCopy(wxCommandEvent& WXUNUSED(event))
1217 {
1218     Copy();
1219 }
1220
1221 void wxTextCtrl::OnPaste(wxCommandEvent& WXUNUSED(event))
1222 {
1223     Paste();
1224 }
1225
1226 void wxTextCtrl::OnUndo(wxCommandEvent& WXUNUSED(event))
1227 {
1228     Undo();
1229 }
1230
1231 void wxTextCtrl::OnRedo(wxCommandEvent& WXUNUSED(event))
1232 {
1233     Redo();
1234 }
1235
1236 void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent& event)
1237 {
1238     event.Enable( CanCut() );
1239 }
1240
1241 void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent& event)
1242 {
1243     event.Enable( CanCopy() );
1244 }
1245
1246 void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent& event)
1247 {
1248     event.Enable( CanPaste() );
1249 }
1250
1251 void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent& event)
1252 {
1253     event.Enable( CanUndo() );
1254 }
1255
1256 void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event)
1257 {
1258     event.Enable( CanRedo() );
1259 }
1260
1261 void wxTextCtrl::OnInternalIdle()
1262 {
1263     wxCursor cursor = m_cursor;
1264     if (g_globalCursor.Ok()) cursor = g_globalCursor;
1265
1266     if (cursor.Ok())
1267     {
1268         GdkWindow *window = (GdkWindow*) NULL;
1269         if (HasFlag(wxTE_MULTILINE))
1270             window = GTK_TEXT(m_text)->text_area;
1271         else
1272             window = GTK_ENTRY(m_text)->text_area;
1273
1274         if (window)
1275             gdk_window_set_cursor( window, cursor.GetCursor() );
1276
1277         if (!g_globalCursor.Ok())
1278             cursor = *wxSTANDARD_CURSOR;
1279
1280         window = m_widget->window;
1281         if ((window) && !(GTK_WIDGET_NO_WINDOW(m_widget)))
1282             gdk_window_set_cursor( window, cursor.GetCursor() );
1283     }
1284
1285     UpdateWindowUI();
1286 }
1287
1288 wxSize wxTextCtrl::DoGetBestSize() const
1289 {
1290     // FIXME should be different for multi-line controls...
1291     wxSize ret( wxControl::DoGetBestSize() );
1292     return wxSize(80, ret.y);
1293 }