/*-*- c++ -*-********************************************************
* wxLwindow.h : a scrolled Window for displaying/entering rich text*
* *
- * (C) 1998 by Karsten Ballüder (Ballueder@usa.net) *
+ * (C) 1998, 1999 by Karsten Ballüder (Ballueder@usa.net) *
* *
* $Id$
*******************************************************************/
# 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 FindWindow
# undef GetCharWidth
# undef StartDoc
# endif
# include "wxlwindow.h"
-# define TRACEMESSAGE(x)
+# include "wxlparser.h"
#endif
-# define WXL_VAR(x) cerr << #x " = " << x ;
+
+#include <wx/clipbrd.h>
+#include <wx/textctrl.h>
+#include <wx/dataobj.h>
+
+#include <ctype.h>
+
+#ifdef WXLAYOUT_DEBUG
+# define WXLO_DEBUG(x) wxLogDebug x
+#else
+# define WXLO_DEBUG(x)
+#endif
+
+/// 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_KEY_UP (wxLayoutWindow::OnKeyUp)
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()
wxLayoutWindow::wxLayoutWindow(wxWindow *parent)
wxHSCROLL | wxVSCROLL | wxBORDER)
{
- m_ScrollbarsSet = false;
+ 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(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();
+}
+wxLayoutWindow::~wxLayoutWindow()
+{
+ delete m_memDC; // deletes bitmap automatically (?)
+ delete m_bitmap;
+ delete m_llist;
+ delete m_PopupMenu;
+ SetBackgroundBitmap(NULL);
+}
- CoordType
- max_x, max_y, lineHeight;
- m_llist.GetSize(&max_x, &max_y, &lineHeight);
- SetScrollbars(10, lineHeight, max_x/10+1, max_y/lineHeight+1);
- EnableScrolling(true,true);
+void
+wxLayoutWindow::Clear(int family,
+ int size,
+ int style,
+ int weight,
+ int underline,
+ wxColour *fg,
+ wxColour *bg)
+{
+ GetLayoutList()->Clear(family,size,style,weight,underline,fg,bg);
+ SetBackgroundColour(*GetLayoutList()->GetDefaults()->GetBGColour());
+ ResizeScrollbars(true);
+ SetDirty();
+ SetModified(false);
+ wxRect r;
+ int w,h;
+ r.x = r.y = 0; GetSize(&w,&h);
+ r.width = w;
+ r.height = h;
+ DoPaint(&r);
}
#ifdef __WXMSW__
long
wxLayoutWindow::MSWGetDlgCode()
{
- // if we don't return this, we won't get OnChar() events
+ // if we don't return this, we won't get OnChar() events for TABs and ENTER
return DLGC_WANTCHARS | DLGC_WANTARROWS | DLGC_WANTMESSAGE;
}
#endif //MSW
-void
-wxLayoutWindow::Update(void)
-{
- wxClientDC dc(this);
- PrepareDC(dc);
- if(IsDirty())
- {
- DoPaint(dc);
- UpdateScrollbars();
- ResetDirty();
- }
- m_llist.DrawCursor(dc);
-}
-
void
wxLayoutWindow::OnMouse(int eventId, wxMouseEvent& event)
{
- if(!m_doSendEvents) // nothing to do
- return;
-
wxPaintDC dc( this );
PrepareDC( dc );
SetFocus();
findPos.x = dc.DeviceToLogicalX(event.GetX());
findPos.y = dc.DeviceToLogicalY(event.GetY());
- TRACEMESSAGE(("wxLayoutWindow::OnMouse: (%d, %d) -> (%d, %d)",
- event.GetX(), event.GetY(), findPos.x, findPos.y));
+ 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);
+
+ //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 && 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);
+ ScrollToCursor();
+ Refresh(FALSE); // DoPaint suppresses flicker under GTK
+ }
+ 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, m_ClickPosition.x, m_ClickPosition.y);
+ return;
+ }
// find the object at this position
- wxLayoutObjectBase *obj = m_llist.Find(findPos);
if(obj)
{
- wxCommandEvent commandEvent(wxEVENT_TYPE_MENU_COMMAND, eventId);
+ wxCommandEvent commandEvent(wxEVT_COMMAND_MENU_SELECTED, eventId);
commandEvent.SetEventObject( this );
commandEvent.SetClientData((char *)obj);
GetEventHandler()->ProcessEvent(commandEvent);
}
/*
- * some simple keyboard handling
+ * Some simple keyboard handling.
*/
void
wxLayoutWindow::OnChar(wxKeyEvent& event)
{
- if(! m_llist.IsEditable()) // do nothing
+ int keyCode = event.KeyCode();
+
+#ifdef WXLAYOUT_DEBUG
+ if(keyCode == WXK_F1)
{
- event.Skip();
+ m_llist->Debug();
return;
}
-
- long keyCode = event.KeyCode();
- wxPoint p;
- CoordType help;
-
- switch(event.KeyCode())
+#endif
+
+ if(! m_Selecting && event.ShiftDown())
{
+ switch(keyCode)
+ {
+ case WXK_UP:
+ case WXK_DOWN:
case WXK_RIGHT:
- m_llist.MoveCursor(1);
+ case WXK_LEFT:
+ case WXK_PRIOR:
+ case WXK_NEXT:
+ case WXK_HOME:
+ case WXK_END:
+ m_Selecting = true;
+ m_llist->StartSelection();
+ break;
+ default:
+ ;
+ }
+ }
+
+ /* 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:
+ m_llist->MoveCursorHorizontally(1);
break;
case WXK_LEFT:
- m_llist.MoveCursor(-1);
+ m_llist->MoveCursorHorizontally(-1);
break;
case WXK_UP:
- m_llist.MoveCursor(0,-1);
+ m_llist->MoveCursorVertically(-1);
break;
case WXK_DOWN:
- m_llist.MoveCursor(0,1);
+ m_llist->MoveCursorVertically(1);
break;
case WXK_PRIOR:
- m_llist.MoveCursor(0,-20);
+ m_llist->MoveCursorVertically(-20);
break;
case WXK_NEXT:
- m_llist.MoveCursor(0,20);
+ m_llist->MoveCursorVertically(20);
break;
case WXK_HOME:
- p = m_llist.GetCursor();
- p.x = 0;
- m_llist.SetCursor(p);
+ m_llist->MoveCursorToBeginOfLine();
break;
case WXK_END:
- p = m_llist.GetCursor();
- p.x = m_llist.GetLineLength(m_llist.FindCurrentObject(NULL));
- m_llist.SetCursor(p);
+ m_llist->MoveCursorToEndOfLine();
break;
- case WXK_DELETE :
- if(event.ControlDown()) // delete to end of line
+ default:
+ if(keyCode == 'c' && event.ControlDown())
+ Copy();
+ if( IsEditable() )
{
- help = m_llist.GetLineLength(
- m_llist.FindCurrentObject(NULL))
- - m_llist.GetCursor().x;
- m_llist.Delete(help ? help : 1);
- }
- else
- m_llist.Delete(1);
- break;
- case WXK_BACK: // backspace
- if(m_llist.MoveCursor(-1)) {
- m_llist.Delete(1);
- }
- break;
- case WXK_RETURN:
- m_llist.LineBreak();
- break;
-
+ /* First, handle control keys */
+ if(event.ControlDown() && ! event.AltDown())
+ {
+ switch(keyCode)
+ {
+ 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;
#ifdef WXLAYOUT_DEBUG
- case WXK_F1:
- m_llist.Debug();
- break;
+ case WXK_F1:
+ m_llist->SetFont(-1,-1,-1,-1,true); // underlined
+ break;
#endif
-
- default:
- if(keyCode < 256 && keyCode >= 32)
+ default:
+ ;
+ }
+ }
+ // ALT only:
+ else if( event.AltDown() && ! event.ControlDown() )
+ {
+ switch(keyCode)
+ {
+ case WXK_DELETE:
+ case 'd':
+ m_llist->DeleteWord();
+ break;
+ default:
+ ;
+ }
+ }
+ // no control keys:
+ else if ( ! event.AltDown() && ! event.ControlDown())
+ {
+ switch(keyCode)
+ {
+ case WXK_INSERT:
+ if(event.ShiftDown())
+ Paste();
+ break;
+ case WXK_DELETE :
+ 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)
+ )
+ {
+ wxString tmp;
+ tmp += keyCode;
+ if(m_WrapMargin > 0 && isspace(keyCode))
+ m_llist->WrapLine(m_WrapMargin);
+ m_llist->Insert(tmp);
+ }
+ break;
+ }
+ }
+ SetDirty();
+ SetModified();
+ }// if(IsEditable())
+ }// first switch()
+ if(m_Selecting)
+ {
+ if(event.ShiftDown())
+ m_llist->ContinueSelection();
+ else
{
- String tmp;
- tmp += keyCode;
- m_llist.Insert(tmp);
+ m_llist->EndSelection();
+ m_Selecting = false;
}
- break;
}
- /** Scroll so that cursor is visible! */
- int x0,y0,x1,y1,ux,uy;
+ ScrollToCursor();
+ wxRect r = *m_llist->GetUpdateRect();
+ DoPaint(&r);
+}
+
+void
+wxLayoutWindow::OnKeyUp(wxKeyEvent& event)
+{
+ if(event.KeyCode() == WXK_SHIFT && m_llist->IsSelecting())
+ m_llist->EndSelection();
+ event.Skip();
+}
+
+
+void
+wxLayoutWindow::ScrollToCursor(void)
+{
+ 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(&ux,&uy);
- x0*=ux; y0*=uy;
- GetClientSize(&x1,&y1);
+ GetScrollPixelsPerUnit(&dx, &dy);
+ x0 *= dx; y0 *= dy;
- wxPoint cc = m_llist.GetCursorCoords();
- int nx = x0, ny = y0;
- // when within 10% of borders, scroll to center
- if(cc.y > y0+(9*y1)/10)
- ny = cc.y - y1/5;
- else if (cc.y < y0+y1/10)
- {
- ny = cc.y-y1/2;
- if(ny < 0) ny = 0;
- }
- if(cc.x > x0+(9*x1)/10)
- nx = cc.x - x1/5;
- else if (cc.x < x0+x1/10)
+ // 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;
+ /* 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! */
+ WXLO_DEBUG(("m_ScrollToCursor = %d", (int) m_ScrollToCursor));
+ 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%
{
- nx = cc.x-x1/2;
- if(nx < 0) nx = 0;
+ int nx, ny;
+ nx = cc.x - x1/2; if(nx < 0) nx = 0;
+ ny = cc.y - y1/2; if(ny < 0) ny = 0;
+ Scroll(nx/dx,ny/dy); // new view start
+ x0 = nx; y0 = ny;
+ m_ScrollToCursor = false; // avoid recursion
}
- Scroll(nx,ny);
-
- Update();
}
void
wxLayoutWindow::OnPaint( wxPaintEvent &WXUNUSED(event)) // or: OnDraw(wxDC& dc)
+{
+ 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::InternalPaint(const wxRect *updateRect)
{
wxPaintDC dc( this );
PrepareDC( dc );
- DoPaint(dc);
+ int x0,y0,x1,y1, dx, dy;
-// wxGTK: wxMemoryDC broken?
-#if 0
- int x0,y0,x1,y1;
+ // Calculate where the top of the visible area is:
ViewStart(&x0,&y0);
- GetSize(&x1,&y1);
- WXL_VAR(x0); WXL_VAR(y0);
- WXL_VAR(x1); WXL_VAR(y1);
+ GetScrollPixelsPerUnit(&dx, &dy);
+ x0 *= dx; y0 *= dy;
+
+ // 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;
+
+ WXLO_DEBUG(("Update rect: %ld,%ld / %ld,%ld",
+ updateRect->x, updateRect->y,
+ updateRect->x+updateRect->width,
+ updateRect->y+updateRect->height));
+
+ if(IsDirty())
+ {
+//FIXME 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->GetDefaults()->GetBGColour(),wxSOLID));
+ m_memDC->SetPen(wxPen(*m_llist->GetDefaults()->GetBGColour(),
+ 0,wxTRANSPARENT));
+ m_memDC->SetLogicalFunction(wxCOPY);
+
+ /* Either fill the background with the background bitmap, or clear
+ it. */
+ 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);
+ }
+ else
+ {
+ // clear the background: (must not be done if we use the update rectangle!)
+ m_memDC->SetBackgroundMode(wxSOLID);
+ m_memDC->DrawRectangle(0,0,x1, y1);
+ }
+
- wxMemoryDC(memdc);
- wxBitmap bm(x1,y1);
- memdc.SelectObject(bm);
-
- // make temporary copy and edit this
- memdc.SetDeviceOrigin(x0,y0);
- memdc.Blit(x0,y0,x1,y1,&dc,x0,y0,wxCOPY,FALSE);
- DoPaint(memdc);
- // blit it back
- dc.Blit(x0,y0,x1,y1,&memdc,x0,y0,wxCOPY,FALSE);
+ /* This is the important bit: we tell the list to draw itself: */
+#if WXLO_DEBUG_URECT
+ 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();
+ m_llist->DrawCursor(*m_memDC,
+ m_HaveFocus && IsEditable(), // draw a thick
+ // cursor for editable windows with focus
+ offset);
+
+// 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
+#endif
+ {
+ // 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);
+ }
+
+ ResetDirty();
+ m_ScrollToCursor = false;
}
-// does the actual painting
+// change the range and position of scrollbars
void
-wxLayoutWindow::DoPaint(wxDC &dc)
+wxLayoutWindow::ResizeScrollbars(bool exact)
{
- m_llist.EraseAndDraw(dc);
- m_llist.DrawCursor(dc);
- // FIXME: not strictly correct, this does only work for changes behind
- // the cursor position, not complete redraws
-
- if(! m_ScrollbarsSet)
+ wxPoint max = m_llist->GetSize();
+
+ if(max.x > m_maxx || max.y > m_maxy
+ || max.x > m_maxx-WXLO_ROFFSET || max.y > m_maxy-WXLO_BOFFSET
+ || exact)
{
- m_ScrollbarsSet = true; // avoid recursion
- UpdateScrollbars();
+ if(! exact)
+ {
+ // 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);
+ m_maxx = max.x; m_maxy = max.y;
}
}
void
-wxLayoutWindow::UpdateScrollbars(void)
+wxLayoutWindow::Paste(void)
{
- CoordType
- max_x, max_y, lineHeight;
-
- ViewStart(&m_ViewStartX, &m_ViewStartY);
- m_llist.GetSize(&max_x, &max_y, &lineHeight);
- SetScrollbars(10, lineHeight, max_x/10+1, max_y/lineHeight+1,m_ViewStartX,m_ViewStartY,true);
- //EnableScrolling(true,true);
- //Scroll(m_ViewStartX, m_ViewStartY);
+ wxString text;
+ // Read some text
+ if (wxTheClipboard->Open())
+ {
+ wxTextDataObject data;
+ if (wxTheClipboard->IsSupported( data.GetFormat() ))
+ {
+ wxTheClipboard->GetData(&data);
+ text += data.GetText();
+ }
+ wxTheClipboard->Close();
+ }
+#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();
+ }
+#endif
+ wxLayoutImportText( m_llist, text);
}
-void
-wxLayoutWindow::Print(void)
+bool
+wxLayoutWindow::Copy(void)
+{
+ // 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();
+ }
+ wxLayoutList *llist = m_llist->GetSelection();
+ if(! llist)
+ return FALSE;
+
+ 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);
+ }
+
+ // Read some text
+ if (wxTheClipboard->Open())
+ {
+ wxTextDataObject *data = new wxTextDataObject( text );
+ bool rc = wxTheClipboard->SetData( data );
+ wxTheClipboard->Close();
+ return rc;
+ }
+ return FALSE;
+}
+
+bool
+wxLayoutWindow::Cut(void)
{
- wxPostScriptDC dc("layout.ps",true,this);
- if (dc.Ok() && dc.StartDoc((char *)_("Printing message...")))
+ if(Copy())
{
- //dc.SetUserScale(1.0, 1.0);
- m_llist.Draw(dc);
- dc.EndDoc();
+ m_llist->DeleteSelection();
+ return TRUE;
}
+ else
+ return FALSE;
+}
+
+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_ON, _("&Underline on"),_("Activate underline mode."), false);
+ m->Append(WXLOWIN_MENU_UNDERLINE_OFF,_("&Underline off"),_("Deactivate underline mode."), false);
+ m->Append(WXLOWIN_MENU_BOLD_ON ,_("&Bold on"),_("Activate bold mode."), false);
+ m->Append(WXLOWIN_MENU_BOLD_OFF ,_("&Bold off"),_("Deactivate bold mode."), false);
+ m->Append(WXLOWIN_MENU_ITALICS_ON ,_("&Italics on"),_("Activate italics mode."), false);
+ m->Append(WXLOWIN_MENU_ITALICS_OFF ,_("&Italics off"),_("Deactivate italics mode."), false);
+ 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;
+}
+
+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_ON:
+ m_llist->SetFontUnderline(true); break;
+ case WXLOWIN_MENU_UNDERLINE_OFF:
+ m_llist->SetFontUnderline(false); break;
+ case WXLOWIN_MENU_BOLD_ON:
+ m_llist->SetFontWeight(wxBOLD); break;
+ case WXLOWIN_MENU_BOLD_OFF:
+ m_llist->SetFontWeight(wxNORMAL); break;
+ case WXLOWIN_MENU_ITALICS_ON:
+ m_llist->SetFontStyle(wxITALIC); break;
+ case WXLOWIN_MENU_ITALICS_OFF:
+ m_llist->SetFontStyle(wxNORMAL); 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;
+ }
+}
+
+void
+wxLayoutWindow::OnSetFocus(wxFocusEvent &ev)
+{
+ m_HaveFocus = true;
+//FIXME: need argument DoPaint(); // to repaint the cursor
+}
+
+void
+wxLayoutWindow::OnKillFocus(wxFocusEvent &ev)
+{
+ m_HaveFocus = false;
+//FIXME: need argument DoPaint(); // to repaint the cursor
}