X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/7547d64ec0fce0faac0488765316f235b4b760a5..74c719ed9683d49e206b19e8e693d649a1a3b7d1:/samples/richedit/wxlwindow.cpp diff --git a/samples/richedit/wxlwindow.cpp b/samples/richedit/wxlwindow.cpp index 98239d5184..a109f532f1 100644 --- a/samples/richedit/wxlwindow.cpp +++ b/samples/richedit/wxlwindow.cpp @@ -1,14 +1,14 @@ /*-*- c++ -*-******************************************************** * wxLwindow.h : a scrolled Window for displaying/entering rich text* * * - * (C) 1998, 1999 by Karsten Ballüder (Ballueder@usa.net) * + * (C) 1998-2000 by Karsten Ballüder (ballueder@gmx.net) * * * * $Id$ *******************************************************************/ -// =========================================================================== +// ============================================================================ // declarations -// =========================================================================== +// ============================================================================ // ---------------------------------------------------------------------------- // headers @@ -21,48 +21,59 @@ #include "wx/wxprec.h" #ifdef __BORLANDC__ -# pragma hdrstop +# pragma hdrstop #endif #include "Mpch.h" #ifdef M_BASEDIR # ifndef USE_PCH -# include "Mcommon.h" -# include "gui/wxMenuDefs.h" -# include "gui/wxMApp.h" +# include "Mcommon.h" +# include "gui/wxMenuDefs.h" +# include "gui/wxMApp.h" # endif // USE_PCH # include "gui/wxlwindow.h" # include "gui/wxlparser.h" + +# include "MDialogs.h" +# include "strutil.h" #else # ifdef __WXMSW__ -# include +# include "wx/msw/private.h" # endif # include "wxlwindow.h" # include "wxlparser.h" #endif -#include -#include -#include +#include "wx/clipbrd.h" +#include "wx/textctrl.h" +#include "wx/dataobj.h" #ifdef WXLAYOUT_USE_CARET -# include +# include "wx/caret.h" #endif // WXLAYOUT_USE_CARET #include + // ---------------------------------------------------------------------------- // macros // ---------------------------------------------------------------------------- -#ifdef WXLAYOUT_DEBUG -# define WXLO_DEBUG(x) wxLogDebug x +#ifdef DEBUG +# define WXLO_DEBUG(x) wxLogDebug x #else -# define WXLO_DEBUG(x) +# define WXLO_DEBUG(x) #endif +// for profiling in debug mode: +WXLO_TIMER_DEFINE(UpdateTimer); +WXLO_TIMER_DEFINE(BlitTimer); +WXLO_TIMER_DEFINE(LayoutTimer); +WXLO_TIMER_DEFINE(TmpTimer); +WXLO_TIMER_DEFINE(DrawTimer); + // ---------------------------------------------------------------------------- // constants // ---------------------------------------------------------------------------- @@ -75,23 +86,33 @@ #define WXLO_ROFFSET 20 #define WXLO_BOFFSET 20 +/// scroll margins when selecting with the mouse +#define WXLO_SCROLLMARGIN_X 10 +#define WXLO_SCROLLMARGIN_Y 10 + /// the size of one scrollbar page in pixels static const int X_SCROLL_PAGE = 10; static const int Y_SCROLL_PAGE = 20; + + // ---------------------------------------------------------------------------- // event tables // ---------------------------------------------------------------------------- BEGIN_EVENT_TABLE(wxLayoutWindow,wxScrolledWindow) + EVT_SIZE (wxLayoutWindow::OnSize) + EVT_PAINT (wxLayoutWindow::OnPaint) EVT_CHAR (wxLayoutWindow::OnChar) EVT_KEY_UP (wxLayoutWindow::OnKeyUp) - EVT_LEFT_DOWN(wxLayoutWindow::OnLeftMouseClick) + EVT_LEFT_DOWN(wxLayoutWindow::OnLeftMouseDown) + EVT_LEFT_UP(wxLayoutWindow::OnLeftMouseUp) EVT_RIGHT_DOWN(wxLayoutWindow::OnRightMouseClick) EVT_LEFT_DCLICK(wxLayoutWindow::OnMouseDblClick) + EVT_MIDDLE_DOWN(wxLayoutWindow::OnMiddleMouseDown) EVT_MOTION (wxLayoutWindow::OnMouseMove) EVT_UPDATE_UI(WXLOWIN_MENU_UNDERLINE, wxLayoutWindow::OnUpdateMenuUnderline) @@ -101,23 +122,23 @@ BEGIN_EVENT_TABLE(wxLayoutWindow,wxScrolledWindow) EVT_SET_FOCUS(wxLayoutWindow::OnSetFocus) EVT_KILL_FOCUS(wxLayoutWindow::OnKillFocus) + +// EVT_IDLE(wxLayoutWindow::ResizeScrollbars) END_EVENT_TABLE() -// =========================================================================== -// implementation -// =========================================================================== +// ---------------------------------------------------------------------------- +// function prototypes +// ---------------------------------------------------------------------------- -/* LEAVE IT HERE UNTIL WXGTK WORKS AGAIN!!! */ -#ifdef __WXGTK__ -/// allows me to compare to wxPoints -static bool operator != (wxPoint const &p1, wxPoint const &p2) -{ - return p1.x != p2.x || p1.y != p2.y; -} -#endif // __WXGTK__ +/// returns true if keyCode is one of arrows/home/end/page{up|down} keys +static bool IsDirectionKey(long keyCode); + +// ============================================================================ +// implementation +// ============================================================================ #ifndef wxWANTS_CHARS - #define wxWANTS_CHARS 0 +# define wxWANTS_CHARS 0 #endif // ---------------------------------------------------------------------------- @@ -125,905 +146,1385 @@ static bool operator != (wxPoint const &p1, wxPoint const &p2) // ---------------------------------------------------------------------------- wxLayoutWindow::wxLayoutWindow(wxWindow *parent) - : wxScrolledWindow(parent, -1, + : wxScrolledWindow(parent, wxID_ANY, wxDefaultPosition, wxDefaultSize, wxHSCROLL | wxVSCROLL | wxBORDER | - wxWANTS_CHARS) + wxWANTS_CHARS), + m_llist(NULL) { - SetStatusBar(NULL); // don't use statusbar - m_Editable = false; - m_doSendEvents = false; - m_ViewStartX = 0; m_ViewStartY = 0; - m_DoPopupMenu = true; - m_PopupMenu = MakeFormatMenu(); - m_memDC = new wxMemoryDC; - m_bitmap = new wxBitmap(4,4); - m_bitmapSize = wxPoint(4,4); - m_llist = new wxLayoutList(); - - m_BGbitmap = NULL; - m_ScrollToCursor = false; - SetWrapMargin(0); - wxPoint max = m_llist->GetSize(); - SetScrollbars(X_SCROLL_PAGE, Y_SCROLL_PAGE, - max.x / X_SCROLL_PAGE + 1, max.y / Y_SCROLL_PAGE + 1); - EnableScrolling(true, true); - m_maxx = max.x + X_SCROLL_PAGE; - m_maxy = max.y + Y_SCROLL_PAGE; - m_Selecting = false; +#if wxUSE_STATUSBAR + SetStatusBar(NULL); // don't use statusbar +#endif // wxUSE_STATUSBAR + m_Editable = false; + m_doSendEvents = false; + m_ViewStartX = 0; m_ViewStartY = 0; + m_DoPopupMenu = true; + m_PopupMenu = MakeFormatMenu(); + m_memDC = new wxMemoryDC; + m_bitmap = new wxBitmap(4,4); + m_bitmapSize = wxPoint(4,4); + m_llist = new wxLayoutList(); + m_BGbitmap = NULL; + m_ScrollToCursor = false; +#ifndef __WXMSW__ + m_FocusFollowMode = false; +#endif + SetWordWrap(false); + SetWrapMargin(0); + + // no scrollbars initially + m_hasHScrollbar = + m_hasVScrollbar = false; + + m_Selecting = false; #ifdef WXLAYOUT_USE_CARET - // FIXME cursor size shouldn't be hardcoded - wxCaret *caret = new wxCaret(this, 2, 20); - SetCaret(caret); - m_llist->SetCaret(caret); - caret->Show(); + // FIXME cursor size shouldn't be hardcoded + wxCaret *caret = new wxCaret(this, 2, 20); + SetCaret(caret); + m_llist->SetCaret(caret); #endif // WXLAYOUT_USE_CARET - m_HandCursor = FALSE; - m_CursorVisibility = -1; - SetCursor(wxCURSOR_IBEAM); - SetDirty(); + m_HaveFocus = false; + m_HandCursor = false; + m_CursorVisibility = -1; + SetCursor(wxCURSOR_IBEAM); + SetDirty(); + + // at least under Windows, this should be the default behaviour + m_AutoDeleteSelection = true; } wxLayoutWindow::~wxLayoutWindow() { - delete m_memDC; // deletes bitmap automatically (?) - delete m_bitmap; - delete m_llist; - delete m_PopupMenu; - SetBackgroundBitmap(NULL); + delete m_memDC; // deletes bitmap automatically (?) + delete m_bitmap; + delete m_llist; + delete m_PopupMenu; + SetBackgroundBitmap(NULL); } void wxLayoutWindow::Clear(int family, - int size, - int style, - int weight, - int underline, - wxColour *fg, - wxColour *bg) + int size, + int style, + int weight, + int underline, + wxColour *fg, + wxColour *bg) { - GetLayoutList()->Clear(family,size,style,weight,underline,fg,bg); - SetBackgroundColour(GetLayoutList()->GetDefaultStyleInfo().GetBGColour()); - ResizeScrollbars(true); - SetDirty(); - SetModified(false); - wxScrolledWindow::Clear(); - DoPaint((wxRect *)NULL); + GetLayoutList()->Clear(family,size,style,weight,underline,fg,bg); + SetBackgroundColour(GetLayoutList()->GetDefaultStyleInfo().GetBGColour()); + //wxScrolledWindow::Clear(); + ResizeScrollbars(true); + SetDirty(); + SetModified(false); + if ( m_Editable ) + m_CursorVisibility = 1; + +#ifdef WXLAYOUT_USE_CARET + if ( m_CursorVisibility == 1 ) + GetCaret()->Show(); +#endif // WXLAYOUT_USE_CARET + + RequestUpdate((wxRect *)NULL); +} + +void wxLayoutWindow::Refresh(bool eraseBackground, const wxRect *rect) +{ + wxScrolledWindow::Refresh(eraseBackground, rect); } void wxLayoutWindow::OnMouse(int eventId, wxMouseEvent& event) { - wxClientDC dc( this ); - PrepareDC( dc ); - if ( eventId != WXLOWIN_MENU_MOUSEMOVE ) - { - // moving the mouse in a window shouldn't give it the focus! - SetFocus(); - } - - wxPoint findPos; - findPos.x = dc.DeviceToLogicalX(event.GetX()); - findPos.y = dc.DeviceToLogicalY(event.GetY()); - - findPos.x -= WXLO_XOFFSET; - findPos.y -= WXLO_YOFFSET; - - if(findPos.x < 0) findPos.x = 0; - if(findPos.y < 0) findPos.y = 0; - - m_ClickPosition = wxPoint(event.GetX(), event.GetY()); - - wxPoint cursorPos; - bool found; - wxLayoutObject *obj = m_llist->FindObjectScreen(dc, findPos, - &cursorPos, &found); - wxLayoutObject::UserData *u = obj ? obj->GetUserData() : NULL; - - //has the mouse only been moved? - if(eventId == WXLOWIN_MENU_MOUSEMOVE) - { - // found is only true if we are really over an object, not just - // behind it - if(found && u && ! m_Selecting) - { - if(!m_HandCursor) - SetCursor(wxCURSOR_HAND); - m_HandCursor = TRUE; - if(m_StatusBar && m_StatusFieldLabel != -1) - { - const wxString &label = u->GetLabel(); - if(label.Length()) - m_StatusBar->SetStatusText(label, - m_StatusFieldLabel); - } - } - else - { - if(m_HandCursor) - SetCursor(wxCURSOR_IBEAM); - m_HandCursor = FALSE; - if(m_StatusBar && m_StatusFieldLabel != -1) - m_StatusBar->SetStatusText("", m_StatusFieldLabel); - } - if(event.LeftIsDown()) - { - if(! m_Selecting) - { - m_llist->StartSelection(wxPoint(-1, -1), m_ClickPosition); - m_Selecting = true; - DoPaint(); // TODO: we don't have to redraw everything! - } - else - { + wxClientDC dc( this ); + PrepareDC( dc ); + if ( (eventId != WXLOWIN_MENU_MOUSEMOVE +#ifndef __WXMSW__ + || m_FocusFollowMode +#endif + ) + && (wxWindow::FindFocus() != this) ) + { + SetFocus(); + } + + wxPoint findPos; + findPos.x = dc.DeviceToLogicalX(event.GetX()); + findPos.y = dc.DeviceToLogicalY(event.GetY()); + + findPos.x -= WXLO_XOFFSET; + findPos.y -= WXLO_YOFFSET; + + if(findPos.x < 0) + findPos.x = 0; + + if(findPos.y < 0) + findPos.y = 0; + + m_ClickPosition = wxPoint(event.GetX(), event.GetY()); + + // Scroll the window if the mouse is at the end of it: + if(m_Selecting && eventId == WXLOWIN_MENU_MOUSEMOVE) + { + //WXLO_DEBUG(("selecting at : %d/%d", (int) event.GetX(), (int)event.GetY())); + int left, top; + GetViewStart(&left, &top); + wxSize size = GetClientSize(); + int xdelta, ydelta; + + if(event.GetX() < WXLO_SCROLLMARGIN_X) + xdelta = -(WXLO_SCROLLMARGIN_X-event.GetX()); + else if(event.GetX() > size.x-WXLO_SCROLLMARGIN_X) + xdelta = event.GetX()-size.x+WXLO_SCROLLMARGIN_X; + else + xdelta = 0; + + if(event.GetY() < WXLO_SCROLLMARGIN_Y) + ydelta = -(WXLO_SCROLLMARGIN_Y-event.GetY()); + else if(event.GetY() > size.y-WXLO_SCROLLMARGIN_Y) + ydelta = event.GetY()-size.y+WXLO_SCROLLMARGIN_Y; + else + ydelta = 0; + + //WXLO_DEBUG(("xdelta: %d", (int) xdelta)); + if(xdelta != 0 || ydelta != 0) + { + top += ydelta; if(top < 0) top = 0; + left += xdelta; if(left < 0) left = 0; + Scroll(left, top); + } + } + + wxPoint cursorPos; + bool found; + wxLayoutObject *obj = m_llist->FindObjectScreen(dc, findPos, + &cursorPos, &found); + wxLayoutObject::UserData *u = obj ? obj->GetUserData() : NULL; + + // has the mouse only been moved? + switch ( eventId ) + { + case WXLOWIN_MENU_MOUSEMOVE: + { + // this variables is used to only erase the message in the status + // bar if we had put it there previously - otherwise empting status + // bar might be undesirable +#if wxUSE_STATUSBAR + static bool s_hasPutMessageInStatusBar = false; +#endif // wxUSE_STATUSBAR + + // found is only true if we are really over an object, not just + // behind it + if(found && u && ! m_Selecting) + { + if(!m_HandCursor) + SetCursor(wxCURSOR_HAND); + m_HandCursor = true; +#if wxUSE_STATUSBAR + if(m_StatusBar && m_StatusFieldLabel != -1) + { + const wxString &label = u->GetLabel(); + if(label.Length()) + { + m_StatusBar->SetStatusText(label,m_StatusFieldLabel); + s_hasPutMessageInStatusBar = true; + } + } +#endif // wxUSE_STATUSBAR + } + else + { + if(m_HandCursor) + SetCursor(wxCURSOR_IBEAM); + m_HandCursor = false; +#if wxUSE_STATUSBAR + if( m_StatusBar && m_StatusFieldLabel != -1 && + s_hasPutMessageInStatusBar ) + { + m_StatusBar->SetStatusText(wxEmptyString, m_StatusFieldLabel); + } +#endif // wxUSE_STATUSBAR + } + } + + // selecting? + if ( event.LeftIsDown() ) + { + // m_Selecting might not be set if the button got pressed + // outside this window, so check for it: + if( m_Selecting ) + { m_llist->ContinueSelection(cursorPos, m_ClickPosition); - DoPaint(); // TODO: we don't have to redraw everything! - } - } - if(m_Selecting && ! event.LeftIsDown()) - { - m_llist->EndSelection(cursorPos, m_ClickPosition); - m_Selecting = false; - DoPaint(); // TODO: we don't have to redraw everything! - } - - if ( u ) - { - u->DecRef(); - u = NULL; - } - } - else if(eventId == WXLOWIN_MENU_LCLICK) - { - // always move cursor to mouse click: - m_llist->MoveCursorTo(cursorPos); - - // clicking a mouse removes the selection - if ( m_llist->HasSelection() ) - { - m_llist->DiscardSelection(); - DoPaint(); // TODO: we don't have to redraw everything! - } - - // Calculate where the top of the visible area is: - int x0, y0; - ViewStart(&x0,&y0); - int dx, dy; - GetScrollPixelsPerUnit(&dx, &dy); - x0 *= dx; y0 *= dy; - - wxPoint offset(-x0+WXLO_XOFFSET, -y0+WXLO_YOFFSET); - - if(m_CursorVisibility == -1) - m_CursorVisibility = 1; - - if(m_CursorVisibility != 0) - { - // draw a thick cursor for editable windows with focus - m_llist->DrawCursor(dc, m_HaveFocus && IsEditable(), offset); - } - - // VZ: this should be unnecessary because mouse can only click on a - // visible part of the canvas -#if 0 - ScrollToCursor(); -#endif // 0 + RequestUpdate(); // TODO: we don't have to redraw everything! + } + } + + if ( u ) + { + u->DecRef(); + u = NULL; + } + break; + + case WXLOWIN_MENU_LDOWN: + { + // always move cursor to mouse click: + m_llist->MoveCursorTo(cursorPos); + + // clicking a mouse removes the selection + if ( m_llist->HasSelection() ) + { + m_llist->DiscardSelection(); + m_Selecting = false; + RequestUpdate(); // TODO: we don't have to redraw everything! + } + + // Calculate where the top of the visible area is: + int x0, y0; + GetViewStart(&x0,&y0); + int dx, dy; + GetScrollPixelsPerUnit(&dx, &dy); + x0 *= dx; y0 *= dy; + + wxPoint offset(-x0+WXLO_XOFFSET, -y0+WXLO_YOFFSET); + + if(m_CursorVisibility == -1) + m_CursorVisibility = 1; + +#ifdef WXLAYOUT_USE_CARET + if ( m_CursorVisibility == 1 ) + GetCaret()->Show(); +#endif // WXLAYOUT_USE_CARET + + if(m_CursorVisibility) + { + // draw a thick cursor for editable windows with focus + m_llist->DrawCursor(dc, m_HaveFocus && IsEditable(), offset); + } #ifdef __WXGTK__ - DoPaint(); // DoPaint suppresses flicker under GTK + RequestUpdate(); // RequestUpdate suppresses flicker under GTK #endif // wxGTK - } - - // notify about mouse events? - if( m_doSendEvents ) - { - // only do the menu if activated, editable and not on a clickable object - if(eventId == WXLOWIN_MENU_RCLICK - && IsEditable() - && (! obj || u == NULL)) - { - PopupMenu(m_PopupMenu, m_ClickPosition.x, m_ClickPosition.y); - if(u) u->DecRef(); - return; - } - - // find the object at this position - if(obj) - { - wxCommandEvent commandEvent(wxEVT_COMMAND_MENU_SELECTED, eventId); - commandEvent.SetEventObject( this ); - commandEvent.SetClientData((char *)obj); - GetEventHandler()->ProcessEvent(commandEvent); - } - } - - if( u ) - u->DecRef(); + + // start selection + m_llist->StartSelection(wxPoint(-1, -1), m_ClickPosition); + m_Selecting = true; + } + break; + + case WXLOWIN_MENU_LUP: + if ( m_Selecting ) + { + // end selection at the cursor position corresponding to the + // current mouse position, but don´t move cursor there. + m_llist->EndSelection(cursorPos,m_ClickPosition); + m_Selecting = false; + + RequestUpdate(); // TODO: we don't have to redraw everything! + } + break; + + case WXLOWIN_MENU_MDOWN: + Paste(true); + break; + + case WXLOWIN_MENU_DBLCLICK: + // select a word under cursor + m_llist->MoveCursorTo(cursorPos); + m_llist->MoveCursorWord(-1); + m_llist->StartSelection(); + m_llist->MoveCursorWord(1, false); + m_llist->EndSelection(); + m_Selecting = false; + RequestUpdate(); // TODO: we don't have to redraw everything! + break; + } + + // notify about mouse events? + if( m_doSendEvents ) + { + // only do the menu if activated, editable and not on a clickable object + if(eventId == WXLOWIN_MENU_RCLICK + && IsEditable() + && (! obj || u == NULL)) + { + PopupMenu(m_PopupMenu, m_ClickPosition.x, m_ClickPosition.y); + if(u) u->DecRef(); + return; + } + + // find the object at this position + if(obj) + { + wxCommandEvent commandEvent(wxEVT_COMMAND_MENU_SELECTED, eventId); + commandEvent.SetEventObject( this ); + commandEvent.SetClientData((char *)obj); + GetEventHandler()->ProcessEvent(commandEvent); + } + } + + if( u ) u->DecRef(); } -/* - * Some simple keyboard handling. - */ +// ---------------------------------------------------------------------------- +// keyboard handling. +// ---------------------------------------------------------------------------- + void wxLayoutWindow::OnChar(wxKeyEvent& event) { - int keyCode = event.KeyCode(); + int keyCode = event.GetKeyCode(); + bool ctrlDown = event.ControlDown(); #ifdef WXLAYOUT_DEBUG - if(keyCode == WXK_F1) - { - m_llist->Debug(); - return; - } + if(keyCode == WXK_F1) + { + m_llist->Debug(); + return; + } #endif - if(! m_Selecting && event.ShiftDown()) - { - switch(keyCode) - { - case WXK_UP: - case WXK_DOWN: - case WXK_RIGHT: - case WXK_LEFT: - case WXK_PRIOR: - case WXK_NEXT: - case WXK_HOME: - case WXK_END: - m_Selecting = true; - m_llist->StartSelection(); - break; - default: - ; - } - } - - // If needed, make cursor visible: - if(m_CursorVisibility == -1) - m_CursorVisibility = 1; - - /* These two nested switches work like this: - The first one processes all non-editing keycodes, to move the - cursor, etc. It's default will process all keycodes causing - modifications to the buffer, but only if editing is allowed. - */ - bool ctrlDown = event.ControlDown(); - switch(keyCode) - { - case WXK_RIGHT: - if ( ctrlDown ) - m_llist->MoveCursorWord(1); - else - m_llist->MoveCursorHorizontally(1); - break; - case WXK_LEFT: - if ( ctrlDown ) - m_llist->MoveCursorWord(-1); - else - m_llist->MoveCursorHorizontally(-1); - break; - case WXK_UP: - m_llist->MoveCursorVertically(-1); - break; - case WXK_DOWN: - m_llist->MoveCursorVertically(1); - break; - case WXK_PRIOR: - m_llist->MoveCursorVertically(-Y_SCROLL_PAGE); - break; - case WXK_NEXT: - m_llist->MoveCursorVertically(Y_SCROLL_PAGE); - break; - case WXK_HOME: - if ( ctrlDown ) - m_llist->MoveCursorTo(wxPoint(0, 0)); - else - m_llist->MoveCursorToBeginOfLine(); - break; - case WXK_END: - if ( ctrlDown ) - m_llist->MoveCursorTo(m_llist->GetSize()); - else - m_llist->MoveCursorToEndOfLine(); - break; - - default: - if(keyCode == 'c' && ctrlDown) - { - // this should work even in read-only mode - Copy(); - } - else if( IsEditable() ) - { - /* First, handle control keys */ - if(event.ControlDown() && ! event.AltDown()) - { + // Force m_Selecting to be false if shift is no longer + // pressed. OnKeyUp() cannot catch all Shift-Up events. + if(m_Selecting && !event.ShiftDown()) + { + m_Selecting = false; + m_llist->EndSelection(); + m_llist->DiscardSelection(); //FIXME: correct? + } + + // If we deleted the selection here, we must not execute the + // deletion in Delete/Backspace handling. + bool deletedSelection = false; + // pressing any non-arrow key optionally replaces the selection: + if(m_AutoDeleteSelection + && IsEditable() + && !m_Selecting + && m_llist->HasSelection() + && ! IsDirectionKey(keyCode) + && ! (event.AltDown() || ctrlDown) ) + { + m_llist->DeleteSelection(); + deletedSelection = true; + SetDirty(); + } + + // + starts selection + if ( IsDirectionKey(keyCode) ) + { + // just continue the old selection + if ( m_Selecting && event.ShiftDown() ) + { + m_llist->ContinueSelection(); + } + else + { + m_llist->DiscardSelection(); + m_Selecting = false; + if( event.ShiftDown() ) + { + m_Selecting = true; + m_llist->StartSelection(); + } + } + } + + // If needed, make cursor visible: + if(m_CursorVisibility == -1) + m_CursorVisibility = 1; + + /* These two nested switches work like this: + The first one processes all non-editing keycodes, to move the + cursor, etc. It's default will process all keycodes causing + modifications to the buffer, but only if editing is allowed. + */ + switch(keyCode) + { + + case WXK_RIGHT: + if ( ctrlDown ) + m_llist->MoveCursorWord(1); + else + m_llist->MoveCursorHorizontally(1); + break; + + case WXK_LEFT: + if ( ctrlDown ) + m_llist->MoveCursorWord(-1); + else + m_llist->MoveCursorHorizontally(-1); + + break; + + case WXK_UP: + m_llist->MoveCursorVertically(-1); + break; + + case WXK_DOWN: + m_llist->MoveCursorVertically(1); + break; + + case WXK_PRIOR: + m_llist->MoveCursorVertically(-Y_SCROLL_PAGE); + break; + + case WXK_NEXT: + m_llist->MoveCursorVertically(Y_SCROLL_PAGE); + break; + + case WXK_HOME: + if ( ctrlDown ) + m_llist->MoveCursorTo(wxPoint(0, 0)); + else + m_llist->MoveCursorToBeginOfLine(); + break; + + case WXK_END: + if ( ctrlDown ) + m_llist->MoveCursorToEnd(); + else + m_llist->MoveCursorToEndOfLine(); + break; + + default: + + if(ctrlDown && ! IsEditable()) + { switch(keyCode) { - case WXK_INSERT: - Copy(); - break; - case WXK_DELETE : - case 'd': - m_llist->Delete(1); - break; - case 'y': - m_llist->DeleteLines(1); - break; - case 'h': // like backspace - if(m_llist->MoveCursorHorizontally(-1)) m_llist->Delete(1); - break; - case 'u': - m_llist->DeleteToBeginOfLine(); - break; - case 'k': - m_llist->DeleteToEndOfLine(); - break; - case 'v': - Paste(); - break; - case 'x': - Cut(); - break; + + case 'c': + // this should work even in read-only mode + Copy(true, true); + break; + + case 's': // search + Find(wxEmptyString); + break; + + case 't': // search again + FindAgain(); + break; + + default: + // we don't handle it, maybe an accelerator? + event.Skip(); + ; + } + } + else if( IsEditable() ) + { + /* First, handle control keys */ + if(ctrlDown && ! event.AltDown()) + { + if(keyCode >= 'A' && keyCode <= 'Z') + keyCode = tolower(keyCode); + + switch(keyCode) + { + + case WXK_INSERT: + Copy(); + break; + + case WXK_DELETE : + if(! deletedSelection) + { + m_llist->DeleteWord(); + SetDirty(); + } + break; + + case 'd': + if(! deletedSelection) // already done + { + m_llist->Delete(1); + SetDirty(); + } + break; + + case 'y': + m_llist->DeleteLines(1); + SetDirty(); + break; + + case 'h': // like backspace + if(m_llist->MoveCursorHorizontally(-1)) + { + m_llist->Delete(1); + SetDirty(); + } + break; + + case 's': // search + Find(wxEmptyString); + break; + + case 't': // search again + FindAgain(); + break; + + case 'u': + m_llist->DeleteToBeginOfLine(); + SetDirty(); + break; + + case 'k': + m_llist->DeleteToEndOfLine(); + SetDirty(); + break; + + case 'c': + Copy(true, true); + break; + + case 'v': + Paste(true); + break; + + case 'x': + Cut(); + break; + + case 'w': + if(m_WrapMargin > 0) + m_llist->WrapLine(m_WrapMargin); + break; + + case 'q': + if(m_WrapMargin > 0) + m_llist->WrapAll(m_WrapMargin); + break; + #ifdef WXLAYOUT_DEBUG - case WXK_F1: - m_llist->SetFont(-1,-1,-1,-1,true); // underlined - break; + case WXK_F1: + m_llist->SetFont(-1,-1,-1,-1,true); // underlined + break; + + case 'l': + Refresh(true); + break; #endif - default: - ; + + default: + // we don't handle it, maybe an accelerator? + event.Skip(); + } } - } - // ALT only: - else if( event.AltDown() && ! event.ControlDown() ) - { - switch(keyCode) + // ALT only: + else if( event.AltDown() && ! event.ControlDown() ) { - case WXK_DELETE: - case 'd': - m_llist->DeleteWord(); - break; - default: - ; + switch(keyCode) + { + case WXK_DELETE: + case 'd': + m_llist->DeleteWord(); + SetDirty(); + break; + + default: + // we don't handle it, maybe an accelerator? + event.Skip(); + } } - } - // no control keys: - else if ( ! event.AltDown() && ! event.ControlDown()) - { - switch(keyCode) + // no control keys: + else if ( ! event.AltDown() && ! event.ControlDown()) { - case WXK_INSERT: - if(event.ShiftDown()) - Paste(); - break; - case WXK_DELETE : - if(event.ShiftDown()) - Cut(); - else - m_llist->Delete(1); - break; - case WXK_BACK: // backspace - if(m_llist->MoveCursorHorizontally(-1)) m_llist->Delete(1); - break; - case WXK_RETURN: - if(m_WrapMargin > 0) - m_llist->WrapLine(m_WrapMargin); - m_llist->LineBreak(); - break; - default: - if((!(event.ControlDown() || event.AltDown() || event.MetaDown())) - && (keyCode < 256 && keyCode >= 32) - ) - { - if(m_WrapMargin > 0 && isspace(keyCode)) - m_llist->WrapLine(m_WrapMargin); - m_llist->Insert((char)keyCode); - } - break; + switch(keyCode) + { + case WXK_INSERT: + if(event.ShiftDown()) + Paste(); + break; + + case WXK_DELETE : + if(event.ShiftDown()) + { + Cut(); + } + else if(! deletedSelection) + { + m_llist->Delete(1); + SetDirty(); + } + break; + + case WXK_BACK: // backspace + if(! deletedSelection) + { + if(m_llist->MoveCursorHorizontally(-1)) + { + m_llist->Delete(1); + SetDirty(); + } + } + break; + + case WXK_RETURN: + if (m_DoWordWrap && + m_WrapMargin > 0 + && m_llist->GetCursorPos().x > m_WrapMargin ) + { + m_llist->WrapLine(m_WrapMargin); + } + + m_llist->LineBreak(); + SetDirty(); + break; + + case WXK_TAB: + if ( !event.ShiftDown() ) + { + // TODO should be configurable + static const int tabSize = 8; + + CoordType x = m_llist->GetCursorPos().x; + size_t numSpaces = tabSize - x % tabSize; + m_llist->Insert(wxString(' ', numSpaces)); + SetDirty(); + } + break; + + default: + if ( ( !(event.ControlDown() || event.AltDown()) ) + && (keyCode < 256 && keyCode >= 32) ) + { + if ( m_DoWordWrap + && m_WrapMargin > 0 + && m_llist->GetCursorPos().x > m_WrapMargin + && isspace(keyCode) ) + { + m_llist->WrapLine(m_WrapMargin); + } + + m_llist->Insert((wxChar)keyCode); + SetDirty(); + } + else + { + // we don't handle it, maybe an accelerator? + event.Skip(); + } + break; + } + } - } - SetDirty(); - SetModified(); - }// if(IsEditable()) - }// first switch() - if(m_Selecting) - { - if(event.ShiftDown()) - m_llist->ContinueSelection(); - else - { - m_llist->EndSelection(); - m_Selecting = false; - } - } - - // we must call ResizeScrollbars() before ScrollToCursor(), otherwise the - // ne cursor position might be outside the current scrolllbar range - ResizeScrollbars(); - ScrollToCursor(); - - // refresh the screen - DoPaint(m_llist->GetUpdateRect()); + }// if(IsEditable()) + else + { + // we don't handle it, maybe an accelerator? + event.Skip(); + } + }// first switch() + + if ( m_Selecting ) + { + // continue selection to the current (new) cursor position + m_llist->ContinueSelection(); + } + + ScrollToCursor(); + // refresh the screen + RequestUpdate(m_llist->GetUpdateRect()); } void wxLayoutWindow::OnKeyUp(wxKeyEvent& event) { - if(event.KeyCode() == WXK_SHIFT && m_llist->IsSelecting()) - { - m_llist->EndSelection(); - m_Selecting = false; - } - event.Skip(); + if ( event.GetKeyCode() == WXK_SHIFT && m_Selecting ) + { + m_llist->EndSelection(); + m_Selecting = false; + } + + event.Skip(); } void -wxLayoutWindow::ScrollToCursor(void) +wxLayoutWindow::ScrollToCursor() { - wxClientDC dc( this ); - PrepareDC( dc ); - - int x0,y0,x1,y1, dx, dy; - - // Calculate where the top of the visible area is: - ViewStart(&x0,&y0); - GetScrollPixelsPerUnit(&dx, &dy); - x0 *= dx; y0 *= dy; - - WXLO_DEBUG(("ScrollToCursor: ViewStart is %d/%d", x0, y0)); - - // Get the size of the visible window: - GetClientSize(&x1,&y1); - - // notice that the client size may be (0, 0)... - wxASSERT(x1 >= 0 && y1 >= 0); - - // VZ: I think this is false - if you do it here, ResizeScrollbars() won't - // call SetScrollbars() later -#if 0 - // As we have the values anyway, use them to avoid unnecessary scrollbar - // updates. - if(x1 > m_maxx) m_maxx = x1; - if(y1 > m_maxy) m_maxy = y1; -#endif // 0 - - // Make sure that the scrollbars are at a position so that the cursor is - // visible if we are editing - WXLO_DEBUG(("m_ScrollToCursor = %d", (int) m_ScrollToCursor)); - wxPoint cc = m_llist->GetCursorScreenPos(dc); - - // the cursor should be completely visible in both directions - wxPoint cs(m_llist->GetCursorSize()); - int nx = -1, - ny = -1; - if ( cc.x < x0 || cc.x >= x0 + x1 - cs.x ) - { - nx = cc.x - x1/2; - if ( nx < 0 ) - nx = 0; - } - - if ( cc.y < y0 || cc.y >= y0 + y1 - cs.y ) - { - ny = cc.y - y1/2; - if ( ny < 0) - ny = 0; - } - - if ( nx != -1 || ny != -1 ) - { - // set new view start - Scroll(nx == -1 ? -1 : (nx+dx-1)/dx, ny == -1 ? -1 : (ny+dy-1)/dy); - - // avoid recursion - m_ScrollToCursor = false; - } + //is always needed to make sure we know where the cursor is + //if(IsDirty()) + //RequestUpdate(m_llist->GetUpdateRect()); + + + ResizeScrollbars(); + + int x0,y0,x1,y1, dx, dy; + + // Calculate where the top of the visible area is: + GetViewStart(&x0,&y0); + GetScrollPixelsPerUnit(&dx, &dy); + x0 *= dx; y0 *= dy; + + WXLO_DEBUG(("ScrollToCursor: GetViewStart is %d/%d", x0, y0)); + + // Get the size of the visible window: + GetClientSize(&x1, &y1); + + // Make sure that the scrollbars are at a position so that the cursor is + // visible if we are editing + WXLO_DEBUG(("m_ScrollToCursor = %d", (int) m_ScrollToCursor)); + wxPoint cc = m_llist->GetCursorScreenPos(); + + // the cursor should be completely visible in both directions + wxPoint cs(m_llist->GetCursorSize()); + int nx = -1, + ny = -1; + + if ( cc.x < x0 || cc.x >= x0 + x1 - cs.x ) + { + nx = cc.x - x1/2; + if ( nx < 0 ) + nx = 0; + } + + if ( cc.y < y0 || cc.y >= y0 + y1 - cs.y ) + { + ny = cc.y - y1/2; + if ( ny < 0) + ny = 0; + } + + if( nx != -1 || ny != -1 ) + { + // set new view start + Scroll(nx == -1 ? -1 : (nx+dx-1)/dx, ny == -1 ? -1 : (ny+dy-1)/dy); + // avoid recursion + m_ScrollToCursor = false; + RequestUpdate(); + } } void wxLayoutWindow::OnPaint( wxPaintEvent &WXUNUSED(event)) { - wxRect region = GetUpdateRegion().GetBox(); - InternalPaint(®ion); + wxRect region = GetUpdateRegion().GetBox(); + InternalPaint(®ion); } void -wxLayoutWindow::DoPaint(const wxRect *updateRect) +wxLayoutWindow::RequestUpdate(const wxRect * +#ifdef __WXGTK__ + updateRect +#else + WXUNUSED(updateRect) +#endif +) { #ifdef __WXGTK__ - InternalPaint(updateRect); -#else // Causes bad flicker under wxGTK!!! - Refresh(FALSE); //, updateRect); - - if ( !::UpdateWindow(GetHwnd()) ) - wxLogLastError("UpdateWindow"); + // Calling Refresh() causes bad flicker under wxGTK!!! + InternalPaint(updateRect); +#else + // shouldn't specify the update rectangle if it doesn't include all the + // changed locations - otherwise, they won't be repainted at all because + // the system clips the display to the update rect + Refresh(false); //, updateRect); #endif } void wxLayoutWindow::InternalPaint(const wxRect *updateRect) { - wxPaintDC dc( this ); - PrepareDC( dc ); + + wxPaintDC dc( this ); + PrepareDC( dc ); #ifdef WXLAYOUT_USE_CARET - // hide the caret before drawing anything - GetCaret()->Hide(); + // hide the caret before drawing anything + GetCaret()->Hide(); #endif // WXLAYOUT_USE_CARET - int x0,y0,x1,y1, dx, dy; - - // Calculate where the top of the visible area is: - ViewStart(&x0,&y0); - GetScrollPixelsPerUnit(&dx, &dy); - x0 *= dx; y0 *= dy; - - // Get the size of the visible window: - GetClientSize(&x1,&y1); - wxASSERT(x1 >= 0); - wxASSERT(y1 >= 0); - - if(updateRect) - { - WXLO_DEBUG(("Update rect: %ld,%ld / %ld,%ld", - updateRect->x, updateRect->y, - updateRect->x+updateRect->width, - updateRect->y+updateRect->height)); - } - if(IsDirty()) - { - m_llist->Layout(dc); - ResizeScrollbars(); - } - /* Check whether the window has grown, if so, we need to reallocate - the bitmap to be larger. */ - if(x1 > m_bitmapSize.x || y1 > m_bitmapSize.y) - { - wxASSERT(m_bitmapSize.x > 0); - wxASSERT(m_bitmapSize.y > 0); - - m_memDC->SelectObject(wxNullBitmap); - delete m_bitmap; - m_bitmapSize = wxPoint(x1,y1); - m_bitmap = new wxBitmap(x1,y1); - m_memDC->SelectObject(*m_bitmap); - } - - m_memDC->SetDeviceOrigin(0,0); - m_memDC->SetBrush(wxBrush(m_llist->GetDefaultStyleInfo().GetBGColour(),wxSOLID)); - m_memDC->SetPen(wxPen(m_llist->GetDefaultStyleInfo().GetBGColour(), - 0,wxTRANSPARENT)); - m_memDC->SetLogicalFunction(wxCOPY); - m_memDC->Clear(); - - // fill the background with the background bitmap - if(m_BGbitmap) - { - CoordType - y, x, - w = m_BGbitmap->GetWidth(), - h = m_BGbitmap->GetHeight(); - for(y = 0; y < y1; y+=h) - for(x = 0; x < x1; x+=w) - m_memDC->DrawBitmap(*m_BGbitmap, x, y); - m_memDC->SetBackgroundMode(wxTRANSPARENT); - } - - // This is the important bit: we tell the list to draw itself + int x0,y0,x1,y1, dx, dy; + + // Calculate where the top of the visible area is: + GetViewStart(&x0,&y0); + GetScrollPixelsPerUnit(&dx, &dy); + x0 *= dx; y0 *= dy; + + // Get the size of the visible window: + GetClientSize(&x1,&y1); + wxASSERT(x1 >= 0); + wxASSERT(y1 >= 0); + + if(updateRect) + { + WXLO_DEBUG(("Update rect: %ld,%ld / %ld,%ld", + updateRect->x, updateRect->y, + updateRect->x+updateRect->width, + updateRect->y+updateRect->height)); + } + + ResizeScrollbars(true); + + WXLO_TIMER_START(TmpTimer); + /* Check whether the window has grown, if so, we need to reallocate + the bitmap to be larger. */ + if(x1 > m_bitmapSize.x || y1 > m_bitmapSize.y) + { + wxASSERT(m_bitmapSize.x > 0); + wxASSERT(m_bitmapSize.y > 0); + + m_memDC->SelectObject(wxNullBitmap); + delete m_bitmap; + m_bitmapSize = wxPoint(x1,y1); + m_bitmap = new wxBitmap(x1,y1); + m_memDC->SelectObject(*m_bitmap); + } + + m_memDC->SetDeviceOrigin(0,0); + m_memDC->SetBackground(wxBrush(m_llist->GetDefaultStyleInfo().GetBGColour(),wxSOLID)); + m_memDC->SetPen(wxPen(m_llist->GetDefaultStyleInfo().GetBGColour(), + 0,wxTRANSPARENT)); + m_memDC->SetLogicalFunction(wxCOPY); + m_memDC->Clear(); + WXLO_TIMER_STOP(TmpTimer); + + // fill the background with the background bitmap + if(m_BGbitmap) + { + CoordType + y, x, + w = m_BGbitmap->GetWidth(), + h = m_BGbitmap->GetHeight(); + for(y = 0; y < y1; y+=h) + { + for(x = 0; x < x1; x+=w) + { + m_memDC->DrawBitmap(*m_BGbitmap, x, y); + } + } + + m_memDC->SetBackgroundMode(wxTRANSPARENT); + } + + // This is the important bit: we tell the list to draw itself #if WXLO_DEBUG_URECT - if(updateRect) - { - WXLO_DEBUG(("Update rect: %ld,%ld / %ld,%ld", - updateRect->x, updateRect->y, - updateRect->x+updateRect->width, - updateRect->y+updateRect->height)); - } + if(updateRect) + { + WXLO_DEBUG(("Update rect: %ld,%ld / %ld,%ld", + updateRect->x, updateRect->y, + updateRect->x+updateRect->width, + updateRect->y+updateRect->height)); + } #endif - // Device origins on the memDC are suspect, we translate manually - // with the translate parameter of Draw(). - wxPoint offset(-x0+WXLO_XOFFSET,-y0+WXLO_YOFFSET); - m_llist->Draw(*m_memDC,offset, y0, y0+y1); - - // We start calculating a new update rect before drawing the - // cursor, so that the cursor coordinates get included in the next - // update rectangle (although they are drawn on the memDC, this is - // needed to erase it): - m_llist->InvalidateUpdateRect(); - if(m_CursorVisibility != 0) - { - // draw a thick cursor for editable windows with focus - m_llist->DrawCursor(*m_memDC, - m_HaveFocus && IsEditable(), - offset); - } - + // Device origins on the memDC are suspect, we translate manually + // with the translate parameter of Draw(). + wxPoint offset(-x0+WXLO_XOFFSET,-y0+WXLO_YOFFSET); + m_llist->Draw(*m_memDC,offset, y0, y0+y1); + + // We start calculating a new update rect before drawing the + // cursor, so that the cursor coordinates get included in the next + // update rectangle (although they are drawn on the memDC, this is + // needed to erase it): + m_llist->InvalidateUpdateRect(); + if(m_CursorVisibility == 1) + { + // draw a thick cursor for editable windows with focus + m_llist->DrawCursor(*m_memDC, + m_HaveFocus && IsEditable(), + offset); + } + + WXLO_TIMER_START(BlitTimer); // Now copy everything to the screen: #if 0 - // This somehow doesn't work, but even the following bit with the - // whole rect at once is still a bit broken I think. - wxRegionIterator ri ( GetUpdateRegion() ); - if(ri) - while(ri) - { - WXLO_DEBUG(("UpdateRegion: %ld,%ld, %ld,%ld", - ri.GetX(),ri.GetY(),ri.GetW(),ri.GetH())); - dc.Blit(x0+ri.GetX(),y0+ri.GetY(),ri.GetW(),ri.GetH(), - m_memDC,ri.GetX(),ri.GetY(),wxCOPY,FALSE); - ri++; - } - else + // This somehow doesn't work, but even the following bit with the + // whole rect at once is still a bit broken I think. + wxRegionIterator ri ( GetUpdateRegion() ); + if(ri) + while(ri) + { + WXLO_DEBUG(("UpdateRegion: %ld,%ld, %ld,%ld", + ri.GetX(),ri.GetY(),ri.GetW(),ri.GetH())); + + dc.Blit(x0+ri.GetX(),y0+ri.GetY(),ri.GetW(),ri.GetH(), + m_memDC,ri.GetX(),ri.GetY(),wxCOPY,false); + ri++; + } + else #endif - { - // FIXME: Trying to copy only the changed parts, but it does not seem - // to work: + { + // FIXME: Trying to copy only the changed parts, but it does not seem + // to work: // x0 = updateRect->x; y0 = updateRect->y; // if(updateRect->height < y1) // y1 = updateRect->height; // y1 += WXLO_YOFFSET; //FIXME might not be needed - dc.Blit(x0,y0,x1,y1,m_memDC,0,0,wxCOPY,FALSE); - } + dc.Blit(x0,y0,x1,y1,m_memDC,0,0,wxCOPY,false); + } + + WXLO_TIMER_STOP(BlitTimer); + #ifdef WXLAYOUT_USE_CARET - // show the caret back after everything is redrawn - m_caret->Show(); + // show the caret back after everything is redrawn + GetCaret()->Show(); #endif // WXLAYOUT_USE_CARET - ResetDirty(); - m_ScrollToCursor = false; + ResetDirty(); - if ( m_StatusBar && m_StatusFieldCursor != -1 ) - { - static wxPoint s_oldCursorPos(-1, -1); +#if wxUSE_STATUSBAR + if ( m_StatusBar && m_StatusFieldCursor != -1 ) + { + static wxPoint s_oldCursorPos(-1, -1); - wxPoint pos(m_llist->GetCursorPos()); + wxPoint pos(m_llist->GetCursorPos()); - // avoid unnecessary status bar refreshes - if ( pos != s_oldCursorPos ) - { - s_oldCursorPos = pos; + // avoid unnecessary status bar refreshes + if ( pos != s_oldCursorPos ) + { + s_oldCursorPos = pos; - wxString label; - label.Printf(_("Ln:%d Col:%d"), pos.y + 1, pos.x + 1); - m_StatusBar->SetStatusText(label, m_StatusFieldCursor); - } - } + wxString label; + label.Printf(_("Ln:%d Col:%d"), pos.y + 1, pos.x + 1); + m_StatusBar->SetStatusText(label, m_StatusFieldCursor); + } + } +#endif // wxUSE_STATUSBAR + + WXLO_TIMER_PRINT(LayoutTimer); + WXLO_TIMER_PRINT(BlitTimer); + WXLO_TIMER_PRINT(TmpTimer); } -// change the range and position of scrollbars +void +wxLayoutWindow::OnSize(wxSizeEvent &event) +{ + if ( m_llist ) + ResizeScrollbars(); + + event.Skip(); +} + +/* +Change the range and position of scrollbars. Has evolved into a +generic Update function which will at some time later cause a repaint +as needed. +*/ + void wxLayoutWindow::ResizeScrollbars(bool exact) { - wxPoint max = m_llist->GetSize(); - - WXLO_DEBUG(("ResizeScrollbars: max size = (%ld, %ld)", - (long int)max.x, (long int) max.y)); - - if( max.x > m_maxx - WXLO_ROFFSET || max.y > m_maxy - WXLO_BOFFSET || exact ) - { - if ( !exact ) - { - // add an extra bit to the sizes to avoid future updates - max.x += WXLO_ROFFSET; - max.y += WXLO_BOFFSET; - } - - ViewStart(&m_ViewStartX, &m_ViewStartY); - SetScrollbars(X_SCROLL_PAGE, Y_SCROLL_PAGE, - max.x / X_SCROLL_PAGE + 1, max.y / Y_SCROLL_PAGE + 1, - m_ViewStartX, m_ViewStartY, - true); - - m_maxx = max.x + X_SCROLL_PAGE; - m_maxy = max.y + Y_SCROLL_PAGE; - } + wxClientDC dc( this ); + PrepareDC( dc ); +// m_llist->ForceTotalLayout(); + + if(! IsDirty()) + { + // we are laying out just the minimum, but always up to the + // cursor line, so the cursor position is updated. + m_llist->Layout(dc, 0); + return; + } + + WXLO_TIMER_START(LayoutTimer); + m_llist->Layout(dc, -1); + WXLO_TIMER_STOP(LayoutTimer); + ResetDirty(); + + wxPoint max = m_llist->GetSize(); + wxSize size = GetClientSize(); + + WXLO_DEBUG(("ResizeScrollbars: max size = (%ld, %ld)", + (long int)max.x, (long int) max.y)); + + // in the absence of scrollbars we should compare with the client size + if ( !m_hasHScrollbar ) + m_maxx = size.x;// - WXLO_ROFFSET; + + if ( !m_hasVScrollbar ) + m_maxy = size.y;// - WXLO_BOFFSET; + + // check if the text hasn't become too big + // TODO why do we set both at once? they're independent... + if( max.x > m_maxx - WXLO_ROFFSET + || max.y > m_maxy - WXLO_BOFFSET + || (max.x < m_maxx - X_SCROLL_PAGE) + || (max.y < m_maxy - Y_SCROLL_PAGE) + || exact ) + { + // text became too large + if ( !exact ) + { + // add an extra bit to the sizes to avoid future updates + max.x += WXLO_ROFFSET; + max.y += WXLO_BOFFSET; + } + + bool done = false; + + if(max.x < X_SCROLL_PAGE && m_hasHScrollbar) + { + SetScrollbars(0,-1,0,-1,0,-1,true); + m_hasHScrollbar = false; + done = true; + } + + if(max.y < Y_SCROLL_PAGE && m_hasVScrollbar) + { + SetScrollbars(-1,0,-1,0,-1,0,true); + m_hasVScrollbar = false; + done = true; + } + + if (! done && +// (max.x > X_SCROLL_PAGE || max.y > Y_SCROLL_PAGE) + (max.x > size.x - X_SCROLL_PAGE|| max.y > size.y - Y_SCROLL_PAGE) ) + { + GetViewStart(&m_ViewStartX, &m_ViewStartY); + + SetScrollbars(X_SCROLL_PAGE, + Y_SCROLL_PAGE, + max.x / X_SCROLL_PAGE + 2, + max.y / Y_SCROLL_PAGE + 2, + m_ViewStartX, + m_ViewStartY, + true); + + m_hasHScrollbar = + m_hasVScrollbar = true; +// ScrollToCursor(); + } + + m_maxx = max.x + X_SCROLL_PAGE; + m_maxy = max.y + Y_SCROLL_PAGE; + } } +// ---------------------------------------------------------------------------- +// +// clipboard operations +// +// ---------------------------------------------------------------------------- + void -wxLayoutWindow::Paste(void) +wxLayoutWindow::Paste(bool usePrivate, bool primary) { - // Read some text - if (wxTheClipboard->Open()) - { -#if wxUSE_PRIVATE_CLIPBOARD_FORMAT - wxLayoutDataObject wxldo; - if (wxTheClipboard->IsSupported( wxldo.GetFormat() )) - { - wxTheClipboard->GetData(&wxldo); - { - } - //FIXME: missing functionality m_llist->Insert(wxldo.GetList()); - } - else -#endif - { - wxTextDataObject data; - if (wxTheClipboard->IsSupported( data.GetFormat() )) - { - wxTheClipboard->GetData(&data); + // this only has an effect under X11: + wxTheClipboard->UsePrimarySelection(primary); + // Read some text + if (wxTheClipboard->Open()) + { + if(usePrivate) + { + wxLayoutDataObject wxldo; + if (wxTheClipboard->IsSupported( wxldo.GetFormat() )) + { + if(wxTheClipboard->GetData(wxldo)) + { + wxTheClipboard->Close(); + wxString str = wxldo.GetLayoutData(); + m_llist->Read(str); + SetDirty(); + RequestUpdate(); + return; + } + } + } + + wxTextDataObject data; + if (wxTheClipboard->IsSupported( data.GetFormat() ) + && wxTheClipboard->GetData(data) ) + { + wxTheClipboard->Close(); wxString text = data.GetText(); wxLayoutImportText( m_llist, text); - } - } - wxTheClipboard->Close(); - } + SetDirty(); + RequestUpdate(); + return; + } + } + // if everything failed we can still try the primary: + wxTheClipboard->Close(); + if(! primary) // not tried before + { + wxTheClipboard->UsePrimarySelection(); + if (wxTheClipboard->Open()) + { + wxTextDataObject data; + if (wxTheClipboard->IsSupported( data.GetFormat() ) + && wxTheClipboard->GetData(data) ) + { + wxString text = data.GetText(); + wxLayoutImportText( m_llist, text); + SetDirty(); + RequestUpdate(); + } + wxTheClipboard->Close(); + } + } +} + +bool +wxLayoutWindow::Copy(bool invalidate, bool privateFormat, bool primary) +{ + // Calling GetSelection() will automatically do an EndSelection() + // on the list, but we need to take a note of it, too: + if(m_Selecting) + { + m_Selecting = false; + m_llist->EndSelection(); + } + + wxLayoutDataObject *wldo = new wxLayoutDataObject; + wxLayoutList *llist = m_llist->GetSelection(wldo, invalidate); + if(! llist) + return false; + // Export selection as text: + wxString text; + wxLayoutExportObject *exp; + wxLayoutExportStatus status(llist); + while((exp = wxLayoutExport( &status, WXLO_EXPORT_AS_TEXT)) != NULL) + { + if(exp->type == WXLO_EXPORT_TEXT) + text << *(exp->content.text); + + delete exp; + } + + delete llist; + + // The exporter always appends a newline, so we chop it off if it + // is there: + { + size_t len = text.Length(); + if(len > 2 && text[len-2] == '\r') // Windows + text = text.Mid(0,len-2); + else if(len > 1 && text[len-1] == '\n') + text = text.Mid(0,len-1); + } #if 0 - /* My attempt to get the primary selection, but it does not - work. :-( */ - if(text.Length() == 0) - { - wxTextCtrl tmp_tctrl(this,-1); - tmp_tctrl.Paste(); - text += tmp_tctrl.GetValue(); - } + if(! primary) // always copy as text-only to primary selection + { + wxTheClipboard->UsePrimarySelection(); + if (wxTheClipboard->Open()) + { + wxTextDataObject *data = new wxTextDataObject( text ); + wxTheClipboard->SetData( data ); + wxTheClipboard->Close(); + } + } #endif + + wxTheClipboard->UsePrimarySelection(primary); + if (wxTheClipboard->Open()) + { + wxTextDataObject *data = new wxTextDataObject( text ); + bool rc = wxTheClipboard->SetData( data ); + + if(privateFormat) + rc |= wxTheClipboard->SetData( wldo ); + + wxTheClipboard->Close(); + return rc; + } + else + { + delete wldo; + } + + return false; } bool -wxLayoutWindow::Copy(bool invalidate) +wxLayoutWindow::Cut(bool privateFormat, bool usePrimary) { - // Calling GetSelection() will automatically do an EndSelection() - // on the list, but we need to take a note of it, too: - if(m_Selecting) - { - m_Selecting = false; - m_llist->EndSelection(); - } - - wxLayoutDataObject wldo; - wxLayoutList *llist = m_llist->GetSelection(&wldo, invalidate); - if(! llist) - return FALSE; - // Export selection as text: - wxString text; - wxLayoutExportObject *export; - wxLayoutExportStatus status(llist); - while((export = wxLayoutExport( &status, WXLO_EXPORT_AS_TEXT)) != NULL) - { - if(export->type == WXLO_EXPORT_TEXT) - text << *(export->content.text); - delete export; - } - delete llist; - - // The exporter always appends a newline, so we chop it off if it - // is there: - { - size_t len = text.Length(); - if(len > 2 && text[len-2] == '\r') // Windows - text = text.Mid(0,len-2); - else if(len > 1 && text[len-1] == '\n') - text = text.Mid(0,len-1); - } - - - if (wxTheClipboard->Open()) - { - wxTextDataObject *data = new wxTextDataObject( text ); - bool rc = wxTheClipboard->SetData( data ); -#if wxUSE_PRIVATE_CLIPBOARD_FORMAT - rc |= wxTheClipboard->AddData( &wldo ); -#endif - wxTheClipboard->Close(); - return rc; - } - - return FALSE; + if(Copy(false, privateFormat, usePrimary)) // do not invalidate selection after copy + { + m_llist->DeleteSelection(); + SetDirty(); + return true; + } + else + { + return false; + } } +// ---------------------------------------------------------------------------- +// searching +// ---------------------------------------------------------------------------- + bool -wxLayoutWindow::Cut(void) +wxLayoutWindow::Find( +#ifdef M_BASEDIR + const wxString &needle, + wxPoint * fromWhere, + const wxString &configPath +#else + const wxString & WXUNUSED(needle), + wxPoint * WXUNUSED(fromWhere), + const wxString & WXUNUSED(configPath) +#endif +) { - if(Copy(false)) // do not invalidate selection after copy - { - m_llist->DeleteSelection(); - return TRUE; - } - else - return FALSE; +#ifdef M_BASEDIR + wxPoint found; + + if(needle.Length() == 0) + { + if( ! MInputBox(&m_FindString, + _("Find text"), + _(" Find:"), + this, + configPath, "") + || strutil_isempty(m_FindString)) + { + return true; + } + } + else + { + m_FindString = needle; + } + + if(fromWhere == NULL) + found = m_llist->FindText(m_FindString, m_llist->GetCursorPos()); + else + found = m_llist->FindText(m_FindString, *fromWhere); + + if(found.x != -1) + { + if(fromWhere) + { + *fromWhere = found; + fromWhere->x ++; + } + + m_llist->MoveCursorTo(found); + ScrollToCursor(); + RequestUpdate(); + + return true; + } +#endif + + return false; } + + bool -wxLayoutWindow::Find(const wxString &needle, - wxPoint * fromWhere) +wxLayoutWindow::FindAgain() { - wxPoint found; - - if(fromWhere == NULL) - found = m_llist->FindText(needle, m_llist->GetCursorPos()); - else - found = m_llist->FindText(needle, *fromWhere); - if(found.x != -1) - { - if(fromWhere) - { - *fromWhere = found; - fromWhere->x ++; - } - m_llist->MoveCursorTo(found); - ScrollToCursor(); - return true; - } - return false; + bool rc = Find(m_FindString); + return rc; } +// ---------------------------------------------------------------------------- +// popup menu stuff +// ---------------------------------------------------------------------------- + wxMenu * wxLayoutWindow::MakeFormatMenu() { - wxMenu *m = new wxMenu(_("Layout Menu")); - - m->Append(WXLOWIN_MENU_LARGER ,_("&Larger"),_("Switch to larger font."), false); - m->Append(WXLOWIN_MENU_SMALLER ,_("&Smaller"),_("Switch to smaller font."), false); - m->AppendSeparator(); - m->Append(WXLOWIN_MENU_UNDERLINE, _("&Underline"),_("Underline mode."), true); - m->Append(WXLOWIN_MENU_BOLD, _("&Bold"),_("Bold mode."), true); - m->Append(WXLOWIN_MENU_ITALICS, _("&Italics"),_("Italics mode."), true); - m->AppendSeparator(); - m->Append(WXLOWIN_MENU_ROMAN ,_("&Roman"),_("Switch to roman font."), false); - m->Append(WXLOWIN_MENU_TYPEWRITER,_("&Typewriter"),_("Switch to typewriter font."), false); - m->Append(WXLOWIN_MENU_SANSSERIF ,_("&Sans Serif"),_("Switch to sans serif font."), false); - - return m; + wxMenu *m = new wxMenu(_("Layout Menu")); + + m->Append(WXLOWIN_MENU_LARGER ,_("&Larger"),_("Switch to larger font.")); + m->Append(WXLOWIN_MENU_SMALLER ,_("&Smaller"),_("Switch to smaller font.")); + m->AppendSeparator(); + m->Append(WXLOWIN_MENU_UNDERLINE, _("&Underline"),_("Underline mode."), wxITEM_CHECK); + m->Append(WXLOWIN_MENU_BOLD, _("&Bold"),_("Bold mode."), wxITEM_CHECK); + m->Append(WXLOWIN_MENU_ITALICS, _("&Italics"),_("Italics mode."), wxITEM_CHECK); + m->AppendSeparator(); + m->Append(WXLOWIN_MENU_ROMAN ,_("&Roman"),_("Switch to roman font.")); + m->Append(WXLOWIN_MENU_TYPEWRITER,_("&Typewriter"),_("Switch to typewriter font.")); + m->Append(WXLOWIN_MENU_SANSSERIF ,_("&Sans Serif"),_("Switch to sans serif font.")); + + return m; } void wxLayoutWindow::OnUpdateMenuUnderline(wxUpdateUIEvent& event) { - event.Check(m_llist->IsFontUnderlined()); + event.Check(m_llist->IsFontUnderlined()); } void wxLayoutWindow::OnUpdateMenuBold(wxUpdateUIEvent& event) { - event.Check(m_llist->IsFontBold()); + event.Check(m_llist->IsFontBold()); } void wxLayoutWindow::OnUpdateMenuItalic(wxUpdateUIEvent& event) { - event.Check(m_llist->IsFontItalic()); + event.Check(m_llist->IsFontItalic()); } void wxLayoutWindow::OnMenu(wxCommandEvent& event) { - switch (event.GetId()) - { - case WXLOWIN_MENU_LARGER: - m_llist->SetFontLarger(); - break; - case WXLOWIN_MENU_SMALLER: - m_llist->SetFontSmaller(); - break; - - case WXLOWIN_MENU_UNDERLINE: - m_llist->ToggleFontUnderline(); - break; - case WXLOWIN_MENU_BOLD: - m_llist->ToggleFontWeight(); - break; - case WXLOWIN_MENU_ITALICS: - m_llist->ToggleFontItalics(); - break; - - case WXLOWIN_MENU_ROMAN: - m_llist->SetFontFamily(wxROMAN); break; - case WXLOWIN_MENU_TYPEWRITER: - m_llist->SetFontFamily(wxFIXED); break; - case WXLOWIN_MENU_SANSSERIF: - m_llist->SetFontFamily(wxSWISS); break; - } + switch (event.GetId()) + { + case WXLOWIN_MENU_LARGER: + m_llist->SetFontLarger(); RequestUpdate(); break; + + case WXLOWIN_MENU_SMALLER: + m_llist->SetFontSmaller(); RequestUpdate(); break; + + case WXLOWIN_MENU_UNDERLINE: + m_llist->ToggleFontUnderline(); RequestUpdate(); break; + + case WXLOWIN_MENU_BOLD: + m_llist->ToggleFontWeight(); RequestUpdate(); break; + + case WXLOWIN_MENU_ITALICS: + m_llist->ToggleFontItalics(); RequestUpdate(); break; + + case WXLOWIN_MENU_ROMAN: + m_llist->SetFontFamily(wxROMAN); RequestUpdate(); break; + + case WXLOWIN_MENU_TYPEWRITER: + m_llist->SetFontFamily(wxFIXED); RequestUpdate(); break; + + case WXLOWIN_MENU_SANSSERIF: + m_llist->SetFontFamily(wxSWISS); RequestUpdate(); break; + } } +// ---------------------------------------------------------------------------- +// focus +// ---------------------------------------------------------------------------- + void wxLayoutWindow::OnSetFocus(wxFocusEvent &ev) { - m_HaveFocus = true; - ev.Skip(); + m_HaveFocus = true; + ev.Skip(); + RequestUpdate(); // cursor must change } void wxLayoutWindow::OnKillFocus(wxFocusEvent &ev) { - m_HaveFocus = false; - ev.Skip(); + m_HaveFocus = false; + ev.Skip(); + RequestUpdate();// cursor must change +} + +// ---------------------------------------------------------------------------- +// private functions +// ---------------------------------------------------------------------------- + +static bool IsDirectionKey(long keyCode) +{ + switch(keyCode) + { + case WXK_UP: + case WXK_DOWN: + case WXK_RIGHT: + case WXK_LEFT: + case WXK_PRIOR: + case WXK_NEXT: + case WXK_HOME: + case WXK_END: + return true; + + default: + return false; + } } +