]> git.saurik.com Git - wxWidgets.git/blobdiff - user/wxLayout/wxlwindow.cpp
...and my Linux doesn't have wcstr.h. (Including of those files should be
[wxWidgets.git] / user / wxLayout / wxlwindow.cpp
index 83cbefdc5cca204edb09e9e079f2cd542c877add..fddc16148645fbf1c7a235a71ba6c51faa8d8590 100644 (file)
 #   pragma implementation "wxlwindow.h"
 #endif
 
-//#include "Mpch.h"
+#include "wx/wxprec.h"
+#ifdef __BORLANDC__
+#  pragma hdrstop
+#endif
+
 
+//#include "Mpch.h"
 #ifdef M_BASEDIR
 #   ifndef USE_PCH
 #     include "Mcommon.h"
 #     include "gui/wxMenuDefs.h"
 #     include "gui/wxMApp.h"
 #   endif // USE_PCH
+
 #   include "gui/wxlwindow.h"
+#   include "gui/wxlparser.h"
 #else
 #   ifdef   __WXMSW__
 #       include <windows.h>
 #       undef GetCharWidth
 #       undef StartDoc
 #   endif
+
 #   include "wxlwindow.h"
+#   include "wxlparser.h"
 #endif
 
+#include <wx/clipbrd.h>
+#include <wx/textctrl.h>
+#include <wx/dataobj.h>
+
+#include <ctype.h>
+
+/// offsets to put a nice frame around text
+#define WXLO_XOFFSET   4
+#define WXLO_YOFFSET   4
+
+/// offset to the right and bottom for when to redraw scrollbars
+#define   WXLO_ROFFSET   20
+#define   WXLO_BOFFSET   20
+
 BEGIN_EVENT_TABLE(wxLayoutWindow,wxScrolledWindow)
    EVT_PAINT    (wxLayoutWindow::OnPaint)
    EVT_CHAR     (wxLayoutWindow::OnChar)
    EVT_LEFT_DOWN(wxLayoutWindow::OnLeftMouseClick)
    EVT_RIGHT_DOWN(wxLayoutWindow::OnRightMouseClick)
    EVT_LEFT_DCLICK(wxLayoutWindow::OnMouseDblClick)
+   EVT_MOTION    (wxLayoutWindow::OnMouseMove)
    EVT_MENU_RANGE(WXLOWIN_MENU_FIRST, WXLOWIN_MENU_LAST, wxLayoutWindow::OnMenu)
    EVT_SET_FOCUS(wxLayoutWindow::OnSetFocus)
    EVT_KILL_FOCUS(wxLayoutWindow::OnKillFocus)
 END_EVENT_TABLE()
-   /*
-     
-   EVT_MENU(WXLOWIN_MENU_LARGER, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_SMALLER, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_UNDERLINE_ON, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_UNDERLINE_OFF, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_BOLD_ON, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_BOLD_OFF, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_ITALICS_ON, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_ITALICS_OFF, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_ROMAN, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_TYPEWRITER, wxLayoutWindow::OnMenu)
-   EVT_MENU(WXLOWIN_MENU_SANSSERIF, wxLayoutWindow::OnMenu)
-   */
 
 wxLayoutWindow::wxLayoutWindow(wxWindow *parent)
    : wxScrolledWindow(parent, -1, wxDefaultPosition, wxDefaultSize,
@@ -68,10 +78,15 @@ wxLayoutWindow::wxLayoutWindow(wxWindow *parent)
    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(10, 20 /*lineHeight*/, max.x/10+1, max.y/20+1);
    EnableScrolling(true,true);
    m_maxx = max.x; m_maxy = max.y;
+   m_Selecting = false;
+   SetCursor(wxCURSOR_IBEAM);
    SetDirty();
 }
 
@@ -80,7 +95,8 @@ wxLayoutWindow::~wxLayoutWindow()
    delete m_memDC; // deletes bitmap automatically (?)
    delete m_bitmap;
    delete m_llist;
-   delete m_PopupMenu; 
+   delete m_PopupMenu;
+   SetBackgroundBitmap(NULL);
 }
 
 #ifdef __WXMSW__
@@ -95,24 +111,29 @@ wxLayoutWindow::MSWGetDlgCode()
 void
 wxLayoutWindow::OnMouse(int eventId, wxMouseEvent& event)
 {
-   if(!m_doSendEvents) // nothing to do
-      return;
-
    wxPaintDC dc( this );
    PrepareDC( dc );     
    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());
 #ifdef WXLAYOUT_DEBUG
    wxLogDebug("wxLayoutWindow::OnMouse: (%d, %d) -> (%d, %d)",
               event.GetX(), event.GetY(), findPos.x, findPos.y);
 #endif
 
-   m_ClickPosition = findPos;
-   wxLayoutObject *obj = m_llist->FindObject(findPos);
+   wxPoint cursorPos;
+   wxLayoutObject *obj = m_llist->FindObjectScreen(dc, findPos, &cursorPos);
 
 #ifdef WXLAYOUT_DEBUG
    if(obj)
@@ -121,14 +142,41 @@ wxLayoutWindow::OnMouse(int eventId, wxMouseEvent& event)
    else
       wxLogDebug("wxLayoutWindow::OnMouse: Found no object.");
 #endif
-   
+
+   //has the mouse only been moved?
+   if(eventId == WXLOWIN_MENU_MOUSEMOVE)
+   {
+      if(obj && obj->GetUserData() != NULL)
+      {
+         if(!m_HandCursor)
+            SetCursor(wxCURSOR_HAND);
+         m_HandCursor = TRUE;
+      }
+      else
+      {
+         if(m_HandCursor)
+            SetCursor(wxCURSOR_IBEAM);
+         m_HandCursor = FALSE;
+      }
+      return;
+   }
+
+   // always move cursor to mouse click:
+   if(obj && eventId == WXLOWIN_MENU_LCLICK)
+   {
+      m_llist->MoveCursorTo(cursorPos);
+      m_ScrollToCursor = true; //FIXME: needed? DoPaint(m_llist->GetUpdateRect()); 
+   }
+   if(!m_doSendEvents) // nothing to do
+      return;
+
    // only do the menu if activated, editable and not on a clickable object
    if(eventId == WXLOWIN_MENU_RCLICK
       && IsEditable()
       && (! obj || (obj && obj->GetUserData() == NULL))
       )
    {
-      PopupMenu(m_PopupMenu, event.GetX(), event.GetY());
+      PopupMenu(m_PopupMenu, m_ClickPosition.x, m_ClickPosition.y);
       return;
    }
    // find the object at this position
@@ -154,11 +202,18 @@ wxLayoutWindow::OnChar(wxKeyEvent& event)
    }
    
    long keyCode = event.KeyCode();
-
+   if(event.ShiftDown())
+      m_Selecting = true;
+   else
+   {
+      if(m_Selecting)
+         m_llist->EndSelection();
+      m_Selecting = false;
+   }
    /* First, handle control keys */
    if(event.ControlDown() && ! event.AltDown())
    {
-      switch(event.KeyCode())
+      switch(keyCode)
       {
       case WXK_DELETE :
       case 'd':
@@ -176,6 +231,11 @@ wxLayoutWindow::OnChar(wxKeyEvent& event)
       case 'k':
          m_llist->DeleteToEndOfLine();
          break;
+#ifdef WXLAYOUT_DEBUG
+      case WXK_F1:
+         m_llist->SetFont(-1,-1,-1,-1,true);  // underlined
+         break;
+#endif
       default:
          ;
       }
@@ -183,7 +243,7 @@ wxLayoutWindow::OnChar(wxKeyEvent& event)
    // ALT only:
    else if( event.AltDown() && ! event.ControlDown() )
    {
-      switch(event.KeyCode())
+      switch(keyCode)
       {
       case WXK_DELETE:
       case 'd':
@@ -196,30 +256,38 @@ wxLayoutWindow::OnChar(wxKeyEvent& event)
    // no control keys:
    else if ( ! event.AltDown() && ! event.ControlDown())
    {
-      switch(event.KeyCode())
+      switch(keyCode)
       {
       case WXK_RIGHT:
+         if(m_Selecting) m_llist->StartSelection();
          m_llist->MoveCursorHorizontally(1);
          break;
       case WXK_LEFT:
+         if(m_Selecting) m_llist->StartSelection();
          m_llist->MoveCursorHorizontally(-1);
          break;
       case WXK_UP:
+         if(m_Selecting) m_llist->StartSelection();
          m_llist->MoveCursorVertically(-1);
          break;
       case WXK_DOWN:
+         if(m_Selecting) m_llist->StartSelection();
          m_llist->MoveCursorVertically(1);
          break;
       case WXK_PRIOR:
+         if(m_Selecting) m_llist->StartSelection();
          m_llist->MoveCursorVertically(-20);
          break;
       case WXK_NEXT:
+         if(m_Selecting) m_llist->StartSelection();
          m_llist->MoveCursorVertically(20);
          break;
       case WXK_HOME:
+         if(m_Selecting) m_llist->StartSelection();
          m_llist->MoveCursorToBeginOfLine();
          break;
       case WXK_END:
+         if(m_Selecting) m_llist->StartSelection();
          m_llist->MoveCursorToEndOfLine();
          break;
       case WXK_DELETE :
@@ -229,6 +297,8 @@ wxLayoutWindow::OnChar(wxKeyEvent& event)
          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:
@@ -238,24 +308,41 @@ wxLayoutWindow::OnChar(wxKeyEvent& event)
          {
             wxString tmp;
             tmp += keyCode;
+            if(m_WrapMargin > 0 && isspace(keyCode))
+                m_llist->WrapLine(m_WrapMargin);
             m_llist->Insert(tmp);
-////            m_llist->WrapLine();
          }
          break;
       }
    }
    SetDirty();
-   DoPaint(true); // paint and scroll to cursor
+   SetModified();
+   m_ScrollToCursor = true;
+   //DoPaint(true); // paint and scroll to cursor
+   wxRect r = *m_llist->GetUpdateRect();
+   r.x -= WXLO_XOFFSET; r.y -= WXLO_YOFFSET;
+   Refresh( FALSE, &r);
 }
 
 void
 wxLayoutWindow::OnPaint( wxPaintEvent &WXUNUSED(event))  // or: OnDraw(wxDC& dc)
 {
-   DoPaint();
+   wxRect region = GetUpdateRegion().GetBox();
+   InternalPaint(& region);
+}
+
+void
+wxLayoutWindow::DoPaint(const wxRect *updateRect)
+{
+#ifdef __WXGTK__
+   InternalPaint(updateRect);
+#else
+   Refresh(FALSE, updateRect); // Causes bad flicker under wxGTK!!!
+#endif
 }
 
 void
-wxLayoutWindow::DoPaint(bool scrollToCursor)
+wxLayoutWindow::InternalPaint(const wxRect *updateRect)
 {
    wxPaintDC dc( this );
    PrepareDC( dc );
@@ -270,22 +357,43 @@ wxLayoutWindow::DoPaint(bool scrollToCursor)
    // Get the size of the visible window:
    GetClientSize(&x1,&y1);
    wxASSERT(x1 > 0);
-
    wxASSERT(y1 > 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;
+
+
+   m_llist->InvalidateUpdateRect();
+   const wxRect *r = m_llist->GetUpdateRect();
+   wxLogDebug("Update rect before calling Layout: %ld,%ld / %ld,%ld",
+              r->x, r->y, r->x+r->width, r->y+r->height);
 
-   // Maybe we need to change the scrollbar sizes or positions,
+#if 0
+   //FIXME: we should never need to call Layout at all because the
+   //       list does it automatically.
+// Maybe we need to change the scrollbar sizes or positions,
    // so layout the list and check:
-   if(IsDirty() || scrollToCursor)
+   if(IsDirty())
       m_llist->Layout(dc);
+   wxLogDebug("Update rect after calling Layout: %ld,%ld / %ld,%ld",
+              r->x, r->y, r->x+r->width, r->y+r->height);
+   // this is needed even when only the cursor moved
+   m_llist->Layout(dc,y0+y1);
+   wxLogDebug("Update rect after calling Layout again: %ld,%ld / %ld,%ld",
+              r->x, r->y, r->x+r->width, r->y+r->height);
+#endif
+   
    if(IsDirty())
       ResizeScrollbars();
    
    /* Make sure that the scrollbars are at a position so that the
       cursor is visible if we are editing. */
       /** Scroll so that cursor is visible! */
-   if(IsEditable() && scrollToCursor)
+   wxLogDebug("m_ScrollToCursor = %d", (int) m_ScrollToCursor);
+   if(IsEditable() && m_ScrollToCursor)
    {
-      wxPoint cc = m_llist->GetCursorScreenPos();
+      wxPoint cc = m_llist->GetCursorScreenPos(*m_memDC);
       if(cc.x < x0 || cc.y < y0
          || cc.x >= x0+(9*x1)/10 || cc.y >= y0+(9*y1/10))  // (9*x)/10 ==  90%
       {
@@ -313,18 +421,56 @@ wxLayoutWindow::DoPaint(bool scrollToCursor)
    // Device origins on the memDC are suspect, we translate manually
    // with the translate parameter of Draw().
    m_memDC->SetDeviceOrigin(0,0);
-   m_memDC->Clear();
+   m_memDC->SetBackgroundMode(wxTRANSPARENT);
+   m_memDC->SetBrush(wxBrush(m_llist->GetDefaults()->GetBGColour(), wxSOLID));                                  
+   m_memDC->SetPen(wxPen(m_llist->GetDefaults()->GetBGColour(),0,wxTRANSPARENT));                               
+   m_memDC->SetLogicalFunction(wxCOPY);
+   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);
+   }
+   else
+      m_memDC->DrawRectangle(0,0,x1, y1);
 
-   // The +4 give the window a tiny border on the left and top, looks nice.
-   wxPoint offset(-x0+4,-y0+4);
+   // The offsets give the window a tiny border on the left and top, looks nice.
+   wxPoint offset(-x0+WXLO_XOFFSET,-y0+WXLO_YOFFSET);
    m_llist->Draw(*m_memDC,offset);
    if(IsEditable())
       m_llist->DrawCursor(*m_memDC,m_HaveFocus,offset);
+
    // Now copy everything to the screen:
-   dc.Blit(x0,y0,x1,y1,m_memDC,0,0,wxCOPY,FALSE);
+#if 0
+   //FIXME:
+   //   1. the update region as calculated by the list is wrong
+   //   2. we get wrong values here
+   //   3. how about the offset? 
+   wxRegionIterator ri ( GetUpdateRegion() );
+   if(ri)
+      while(ri)
+      {
+         wxLogDebug("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
+      // If there are no update rectangles, we got called to reflect 
+      // a change in the list. Currently there is no mechanism to
+      // easily find out which bits need updating, so we update
+      // all. The wxLayoutList could handle this, creating a list or
+      // at least one large rectangle of changes. FIXME
+      dc.Blit(x0,y0,x1,y1,m_memDC,0,0,wxCOPY,FALSE);
 
-   
    ResetDirty();
+   m_ScrollToCursor = false;
 }
 
 // change the range and position of scroll bars
@@ -332,15 +478,16 @@ void
 wxLayoutWindow::ResizeScrollbars(bool exact)
 {
    wxPoint max = m_llist->GetSize();
-
+   
    if(max.x > m_maxx || max.y > m_maxy
-      || max.x < (7*m_maxx)/10 || max.y << (7*m_maxy)/10
+      || max.x > m_maxx-WXLO_ROFFSET || max.y > m_maxy-WXLO_BOFFSET
       || exact)
    {
-      if(! exact)  // add an extra 20% to the sizes to avoid future updates
+      if(! exact) 
       {
-         max.x = (12*max.x)/10;  // 12/20 = 120%
-         max.y = (12*max.y)/10;
+         // add an extra bit to the sizes to avoid future updates
+         max.x = max.x+WXLO_ROFFSET;  
+         max.y = max.y+WXLO_BOFFSET;
       }
       ViewStart(&m_ViewStartX, &m_ViewStartY);
       SetScrollbars(10, 20, max.x/10+1,max.y/20+1,m_ViewStartX,m_ViewStartY,true);
@@ -348,6 +495,41 @@ wxLayoutWindow::ResizeScrollbars(bool exact)
    }
 }
 
+void
+wxLayoutWindow::Paste(void)
+{
+   wxString text;
+   // Read some text
+   if (wxTheClipboard->Open())
+   {
+      wxTextDataObject data;
+      if (wxTheClipboard->IsSupported( data.GetFormat() ))
+      {
+         wxTheClipboard->GetData(&data);
+         text += data.GetText();
+      }  
+      wxTheClipboard->Close();
+   }
+#ifdef __WXGTK__
+   /* wxGTK's sophisticated multi-format copy/paste is not supported
+      by 99% of the X11 clients available. If there was no selection,
+      do the dumb thing, too:
+   */
+#if 0
+   /* Unfortunately, this little hack doesn't work. So I'll go back to 
+      pure X11. */
+   if(text.Length() == 0)
+   {
+      wxTextCtrl tmp_tctrl(this,-1);
+      tmp_tctrl.Paste();
+      text += tmp_tctrl.GetValue();
+   }
+#endif
+   
+#endif
+   wxLayoutImportText( m_llist, text);
+}
+
 
 wxMenu *
 wxLayoutWindow::MakeFormatMenu()
@@ -403,12 +585,12 @@ void
 wxLayoutWindow::OnSetFocus(wxFocusEvent &ev)
 {
    m_HaveFocus = true;
-   DoPaint(); // to repaint the cursor
+//FIXME   DoPaint(); // to repaint the cursor
 }
 
 void
 wxLayoutWindow::OnKillFocus(wxFocusEvent &ev)
 {
-   m_HaveFocus = true;
-   DoPaint(); // to repaint the cursor
+   m_HaveFocus = false;
+//FIXME   DoPaint(); // to repaint the cursor
 }