[wxWidgets.git] / contrib / src / stc / stc.cpp.in

////////////////////////////////////////////////////////////////////////////
// Name:        stc.cpp
// Purpose:     A wxWindows implementation of Scintilla.  This class is the
//              one meant to be used directly by wx applications.  It does not
//              derive directly from the Scintilla classes, but instead
//              delegates most things to the real Scintilla class.
//              This allows the use of Scintilla without polluting the
//              namespace with all the classes and identifiers from Scintilla.
//
// Author:      Robin Dunn
//
// Created:     13-Jan-2000
// RCS-ID:      $Id$
// Copyright:   (c) 2000 by Total Control Software
// Licence:     wxWindows license
/////////////////////////////////////////////////////////////////////////////

#include <ctype.h>

#include "wx/stc/stc.h"
#include "ScintillaWX.h"

#include <wx/tokenzr.h>


//----------------------------------------------------------------------

const wxChar* wxSTCNameStr = wxT("stcwindow");

DEFINE_EVENT_TYPE( wxEVT_STC_CHANGE )
DEFINE_EVENT_TYPE( wxEVT_STC_STYLENEEDED )
DEFINE_EVENT_TYPE( wxEVT_STC_CHARADDED )
DEFINE_EVENT_TYPE( wxEVT_STC_SAVEPOINTREACHED )
DEFINE_EVENT_TYPE( wxEVT_STC_SAVEPOINTLEFT )
DEFINE_EVENT_TYPE( wxEVT_STC_ROMODIFYATTEMPT )
DEFINE_EVENT_TYPE( wxEVT_STC_KEY )
DEFINE_EVENT_TYPE( wxEVT_STC_DOUBLECLICK )
DEFINE_EVENT_TYPE( wxEVT_STC_UPDATEUI )
DEFINE_EVENT_TYPE( wxEVT_STC_MODIFIED )
DEFINE_EVENT_TYPE( wxEVT_STC_MACRORECORD )
DEFINE_EVENT_TYPE( wxEVT_STC_MARGINCLICK )
DEFINE_EVENT_TYPE( wxEVT_STC_NEEDSHOWN )
DEFINE_EVENT_TYPE( wxEVT_STC_POSCHANGED )
DEFINE_EVENT_TYPE( wxEVT_STC_PAINTED )
DEFINE_EVENT_TYPE( wxEVT_STC_USERLISTSELECTION )
DEFINE_EVENT_TYPE( wxEVT_STC_URIDROPPED )
DEFINE_EVENT_TYPE( wxEVT_STC_DWELLSTART )
DEFINE_EVENT_TYPE( wxEVT_STC_DWELLEND )
DEFINE_EVENT_TYPE( wxEVT_STC_START_DRAG )
DEFINE_EVENT_TYPE( wxEVT_STC_DRAG_OVER )
DEFINE_EVENT_TYPE( wxEVT_STC_DO_DROP )


BEGIN_EVENT_TABLE(wxStyledTextCtrl, wxControl)
    EVT_PAINT                   (wxStyledTextCtrl::OnPaint)
    EVT_SCROLLWIN               (wxStyledTextCtrl::OnScrollWin)
    EVT_SCROLL                  (wxStyledTextCtrl::OnScroll)
    EVT_SIZE                    (wxStyledTextCtrl::OnSize)
    EVT_LEFT_DOWN               (wxStyledTextCtrl::OnMouseLeftDown)
#ifdef __WXMSW__
    // Let Scintilla see the double click as a second click
    EVT_LEFT_DCLICK             (wxStyledTextCtrl::OnMouseLeftDown)
#endif
    EVT_MOTION                  (wxStyledTextCtrl::OnMouseMove)
    EVT_LEFT_UP                 (wxStyledTextCtrl::OnMouseLeftUp)
#ifdef __WXGTK__
    EVT_RIGHT_UP                (wxStyledTextCtrl::OnMouseRightUp)
#else
    EVT_CONTEXT_MENU            (wxStyledTextCtrl::OnContextMenu)
#endif
    EVT_MOUSEWHEEL              (wxStyledTextCtrl::OnMouseWheel)
    EVT_CHAR                    (wxStyledTextCtrl::OnChar)
    EVT_KEY_DOWN                (wxStyledTextCtrl::OnKeyDown)
    EVT_KILL_FOCUS              (wxStyledTextCtrl::OnLoseFocus)
    EVT_SET_FOCUS               (wxStyledTextCtrl::OnGainFocus)
    EVT_SYS_COLOUR_CHANGED      (wxStyledTextCtrl::OnSysColourChanged)
    EVT_ERASE_BACKGROUND        (wxStyledTextCtrl::OnEraseBackground)
    EVT_MENU_RANGE              (-1, -1, wxStyledTextCtrl::OnMenu)
    EVT_LISTBOX_DCLICK          (-1, wxStyledTextCtrl::OnListBox)
END_EVENT_TABLE()


IMPLEMENT_CLASS(wxStyledTextCtrl, wxControl)
IMPLEMENT_DYNAMIC_CLASS(wxStyledTextEvent, wxCommandEvent)

// forces the linking of the lexer modules
int Scintilla_LinkLexers();

//----------------------------------------------------------------------
// Constructor and Destructor

wxStyledTextCtrl::wxStyledTextCtrl(wxWindow *parent,
                                   wxWindowID id,
                                   const wxPoint& pos,
                                   const wxSize& size,
                                   long style,
                                   const wxString& name) :
    wxControl(parent, id, pos, size,
              style | wxVSCROLL | wxHSCROLL | wxWANTS_CHARS | wxCLIP_CHILDREN,
              wxDefaultValidator, name)
{
    Scintilla_LinkLexers();
    m_swx = new ScintillaWX(this);
    m_stopWatch.Start();
    m_lastKeyDownConsumed = FALSE;
    m_vScrollBar = NULL;
    m_hScrollBar = NULL;
#if wxUSE_UNICODE
    // Put Scintilla into unicode (UTF-8) mode
    SetCodePage(wxSTC_CP_UTF8);
#endif
}


wxStyledTextCtrl::~wxStyledTextCtrl() {
    delete m_swx;
}


//----------------------------------------------------------------------

long wxStyledTextCtrl::SendMsg(int msg, long wp, long lp) {

    return m_swx->WndProc(msg, wp, lp);
}


#ifdef MAKELONG
#undef MAKELONG
#endif

#define MAKELONG(a, b) ((a) | ((b) << 16))


static long wxColourAsLong(const wxColour& co) {
    return (((long)co.Blue()  << 16) |
            ((long)co.Green() <<  8) |
            ((long)co.Red()));
}

static wxColour wxColourFromLong(long c) {
    wxColour clr;
    clr.Set(c & 0xff, (c >> 8) & 0xff, (c >> 16) & 0xff);
    return clr;
}


static wxColour wxColourFromSpec(const wxString& spec) {
    // spec should be "#RRGGBB"
    long red, green, blue;
    red = green = blue = 0;
    spec.Mid(1,2).ToLong(&red,   16);
    spec.Mid(3,2).ToLong(&green, 16);
    spec.Mid(5,2).ToLong(&blue,  16);
    return wxColour(red, green, blue);
}


//----------------------------------------------------------------------
// BEGIN generated section.  The following code is automatically generated
//       by gen_iface.py from the contents of Scintilla.iface.  Do not edit
//       this file.  Edit stc.cpp.in or gen_iface.py instead and regenerate.

%(METHOD_IMPS)s

// END of generated section
//----------------------------------------------------------------------


// Returns the line number of the line with the caret.
int wxStyledTextCtrl::GetCurrentLine() {
    int line = LineFromPosition(GetCurrentPos());
    return line;
}


// Extract style settings from a spec-string which is composed of one or
// more of the following comma separated elements:
//
//      bold                    turns on bold
//      italic                  turns on italics
//      fore:#RRGGBB            sets the foreground colour
//      back:#RRGGBB            sets the background colour
//      face:[facename]         sets the font face name to use
//      size:[num]              sets the font size in points
//      eol                     turns on eol filling
//      underline               turns on underlining
//
void wxStyledTextCtrl::StyleSetSpec(int styleNum, const wxString& spec) {

    wxStringTokenizer tkz(spec, ",");
    while (tkz.HasMoreTokens()) {
        wxString token = tkz.GetNextToken();

        wxString option = token.BeforeFirst(':');
        wxString val = token.AfterFirst(':');

        if (option == "bold")
            StyleSetBold(styleNum, true);

        else if (option == "italic")
            StyleSetItalic(styleNum, true);

        else if (option == "underline")
            StyleSetUnderline(styleNum, true);

        else if (option == "eol")
            StyleSetEOLFilled(styleNum, true);

        else if (option == "size") {
            long points;
            if (val.ToLong(&points))
                StyleSetSize(styleNum, points);
        }

        else if (option == "face")
            StyleSetFaceName(styleNum, val);

        else if (option == "fore")
            StyleSetForeground(styleNum, wxColourFromSpec(val));

        else if (option == "back")
            StyleSetBackground(styleNum, wxColourFromSpec(val));
    }
}


// Set style size, face, bold, italic, and underline attributes from
// a wxFont's attributes.
void wxStyledTextCtrl::StyleSetFont(int styleNum, wxFont& font) {
    int      size     = font.GetPointSize();
    wxString faceName = font.GetFaceName();
    bool     bold     = font.GetWeight() == wxBOLD;
    bool     italic   = font.GetStyle() != wxNORMAL;
    bool     under    = font.GetUnderlined();

    // TODO: add encoding/charset mapping
    StyleSetFontAttr(styleNum, size, faceName, bold, italic, under);
}

// Set all font style attributes at once.
void wxStyledTextCtrl::StyleSetFontAttr(int styleNum, int size,
                                        const wxString& faceName,
                                        bool bold, bool italic,
                                        bool underline) {
    StyleSetSize(styleNum, size);
    StyleSetFaceName(styleNum, faceName);
    StyleSetBold(styleNum, bold);
    StyleSetItalic(styleNum, italic);
    StyleSetUnderline(styleNum, underline);

    // TODO: add encoding/charset mapping
}


// Perform one of the operations defined by the wxSTC_CMD_* constants.
void wxStyledTextCtrl::CmdKeyExecute(int cmd) {
    SendMsg(cmd);
}


// Set the left and right margin in the edit area, measured in pixels.
void wxStyledTextCtrl::SetMargins(int left, int right) {
    SetMarginLeft(left);
    SetMarginRight(right);
}


// Retrieve the start and end positions of the current selection.
void wxStyledTextCtrl::GetSelection(int* startPos, int* endPos) {
    if (startPos != NULL)
        *startPos = SendMsg(SCI_GETSELECTIONSTART);
    if (endPos != NULL)
        *endPos = SendMsg(SCI_GETSELECTIONEND);
}


// Retrieve the point in the window where a position is displayed.
wxPoint wxStyledTextCtrl::PointFromPosition(int pos) {
    int x = SendMsg(SCI_POINTXFROMPOSITION, 0, pos);
    int y = SendMsg(SCI_POINTYFROMPOSITION, 0, pos);
    return wxPoint(x, y);
}

// Scroll enough to make the given line visible
void wxStyledTextCtrl::ScrollToLine(int line) {
    m_swx->DoScrollToLine(line);
}


// Scroll enough to make the given column visible
void wxStyledTextCtrl::ScrollToColumn(int column) {
    m_swx->DoScrollToColumn(column);
}


//----------------------------------------------------------------------
// Event handlers

void wxStyledTextCtrl::OnPaint(wxPaintEvent& evt) {
    wxPaintDC dc(this);
    wxRegion  region = GetUpdateRegion();

    m_swx->DoPaint(&dc, region.GetBox());
}

void wxStyledTextCtrl::OnScrollWin(wxScrollWinEvent& evt) {
    if (evt.GetOrientation() == wxHORIZONTAL)
        m_swx->DoHScroll(evt.GetEventType(), evt.GetPosition());
    else
        m_swx->DoVScroll(evt.GetEventType(), evt.GetPosition());
}

void wxStyledTextCtrl::OnScroll(wxScrollEvent& evt) {
    wxScrollBar* sb = wxDynamicCast(evt.GetEventObject(), wxScrollBar);
    if (sb) {
        if (sb->IsVertical())
            m_swx->DoVScroll(evt.GetEventType(), evt.GetPosition());
        else
            m_swx->DoHScroll(evt.GetEventType(), evt.GetPosition());
    }
}

void wxStyledTextCtrl::OnSize(wxSizeEvent& evt) {
    wxSize sz = GetClientSize();
    m_swx->DoSize(sz.x, sz.y);
    Refresh(FALSE);
}

void wxStyledTextCtrl::OnMouseLeftDown(wxMouseEvent& evt) {
    wxPoint pt = evt.GetPosition();
    m_swx->DoButtonDown(Point(pt.x, pt.y), m_stopWatch.Time(),
                      evt.ShiftDown(), evt.ControlDown(), evt.AltDown());
}

void wxStyledTextCtrl::OnMouseMove(wxMouseEvent& evt) {
    wxPoint pt = evt.GetPosition();
    m_swx->DoButtonMove(Point(pt.x, pt.y));
}

void wxStyledTextCtrl::OnMouseLeftUp(wxMouseEvent& evt) {
    wxPoint pt = evt.GetPosition();
    m_swx->DoButtonUp(Point(pt.x, pt.y), m_stopWatch.Time(),
                      evt.ControlDown());
}


void wxStyledTextCtrl::OnMouseRightUp(wxMouseEvent& evt) {
    wxPoint pt = evt.GetPosition();
    m_swx->DoContextMenu(Point(pt.x, pt.y));
}


void wxStyledTextCtrl::OnContextMenu(wxContextMenuEvent& evt) {
    wxPoint pt = evt.GetPosition();
    ScreenToClient(&pt.x, &pt.y);
    m_swx->DoContextMenu(Point(pt.x, pt.y));
}


void wxStyledTextCtrl::OnMouseWheel(wxMouseEvent& evt) {
    m_swx->DoMouseWheel(evt.GetWheelRotation(),
                        evt.GetWheelDelta(),
                        evt.GetLinesPerAction(),
                        evt.ControlDown());
}


void wxStyledTextCtrl::OnChar(wxKeyEvent& evt) {
    int key = evt.GetKeyCode();

    // On (some?) non-US keyboards the AltGr key is required to enter some
    // common characters.  It comes to us as both Alt and Ctrl down so we need
    // to let the char through in that case, otherwise if only ctrl or only
    // alt let's skip it.
    bool ctrl = evt.ControlDown();
    bool alt  = evt.AltDown();
    bool skip = ((ctrl || alt) && ! (ctrl && alt));

    //printf("OnChar  key:%%d  consumed:%%d  ctrl:%%d  alt:%%d  skip:%%d\n",
    //       key, m_lastKeyDownConsumed, ctrl, alt, skip);

    if (key <= WXK_START && /*key >= 32 &&*/ !m_lastKeyDownConsumed && !skip) {
        m_swx->DoAddChar(key);
        return;
    }
    evt.Skip();
}


void wxStyledTextCtrl::OnKeyDown(wxKeyEvent& evt) {
    int key = evt.GetKeyCode();
    bool shift = evt.ShiftDown(),
         ctrl  = evt.ControlDown(),
         alt   = evt.AltDown();

    int processed = m_swx->DoKeyDown(key, shift, ctrl, alt, &m_lastKeyDownConsumed);

//      printf("key: %%d  shift: %%d  ctrl: %%d  alt: %%d  processed: %%d  consumed: %%d\n",
//             key, shift, ctrl, alt, processed, m_lastKeyDownConsumed);

    if (!processed && !m_lastKeyDownConsumed)
        evt.Skip();
}


void wxStyledTextCtrl::OnLoseFocus(wxFocusEvent& evt) {
    m_swx->DoLoseFocus();
}


void wxStyledTextCtrl::OnGainFocus(wxFocusEvent& evt) {
    m_swx->DoGainFocus();
}


void wxStyledTextCtrl::OnSysColourChanged(wxSysColourChangedEvent& evt) {
    m_swx->DoSysColourChange();
}


void wxStyledTextCtrl::OnEraseBackground(wxEraseEvent& evt) {
    // do nothing to help avoid flashing
}


void wxStyledTextCtrl::OnMenu(wxCommandEvent& evt) {
    m_swx->DoCommand(evt.GetId());
}


void wxStyledTextCtrl::OnListBox(wxCommandEvent& evt) {
    m_swx->DoOnListBox();
}


//----------------------------------------------------------------------
// Turn notifications from Scintilla into events


void wxStyledTextCtrl::NotifyChange() {
    wxStyledTextEvent evt(wxEVT_STC_CHANGE, GetId());
    evt.SetEventObject(this);
    GetEventHandler()->ProcessEvent(evt);
}

void wxStyledTextCtrl::NotifyParent(SCNotification* _scn) {
    SCNotification& scn = *_scn;
    wxStyledTextEvent evt(0, GetId());

    evt.SetEventObject(this);
    evt.SetPosition(scn.position);
    evt.SetKey(scn.ch);
    evt.SetModifiers(scn.modifiers);

    switch (scn.nmhdr.code) {
    case SCN_STYLENEEDED:
        evt.SetEventType(wxEVT_STC_STYLENEEDED);
        break;

    case SCN_CHARADDED:
        evt.SetEventType(wxEVT_STC_CHARADDED);
        break;

    case SCN_SAVEPOINTREACHED:
        evt.SetEventType(wxEVT_STC_SAVEPOINTREACHED);
        break;

    case SCN_SAVEPOINTLEFT:
        evt.SetEventType(wxEVT_STC_SAVEPOINTLEFT);
        break;

    case SCN_MODIFYATTEMPTRO:
        evt.SetEventType(wxEVT_STC_ROMODIFYATTEMPT);
        break;

    case SCN_KEY:
        evt.SetEventType(wxEVT_STC_KEY);
        break;

    case SCN_DOUBLECLICK:
        evt.SetEventType(wxEVT_STC_DOUBLECLICK);
        break;

    case SCN_UPDATEUI:
        evt.SetEventType(wxEVT_STC_UPDATEUI);
        break;

    case SCN_MODIFIED:
        evt.SetEventType(wxEVT_STC_MODIFIED);
        evt.SetModificationType(scn.modificationType);
        if (scn.text) {
            // The unicode conversion MUST have a null byte to terminate the
            // string so move it into a buffer first and give it one.
            wxMemoryBuffer buf(scn.length+1);
            buf.AppendData((void*)scn.text, scn.length);
            buf.AppendByte(0);
            evt.SetText(wxString(buf, wxConvUTF8));
        }
        evt.SetLength(scn.length);
        evt.SetLinesAdded(scn.linesAdded);
        evt.SetLine(scn.line);
        evt.SetFoldLevelNow(scn.foldLevelNow);
        evt.SetFoldLevelPrev(scn.foldLevelPrev);
        break;

    case SCN_MACRORECORD:
        evt.SetEventType(wxEVT_STC_MACRORECORD);
        evt.SetMessage(scn.message);
        evt.SetWParam(scn.wParam);
        evt.SetLParam(scn.lParam);
        break;

    case SCN_MARGINCLICK:
        evt.SetEventType(wxEVT_STC_MARGINCLICK);
        evt.SetMargin(scn.margin);
        break;

    case SCN_NEEDSHOWN:
        evt.SetEventType(wxEVT_STC_NEEDSHOWN);
        evt.SetLength(scn.length);
        break;

    case SCN_PAINTED:
        evt.SetEventType(wxEVT_STC_PAINTED);
        break;

    case SCN_USERLISTSELECTION:
        evt.SetEventType(wxEVT_STC_USERLISTSELECTION);
        evt.SetListType(scn.listType);
        evt.SetText(scn.text);
        break;

    case SCN_URIDROPPED:
        evt.SetEventType(wxEVT_STC_URIDROPPED);
        evt.SetText(scn.text);
        break;

    case SCN_DWELLSTART:
        evt.SetEventType(wxEVT_STC_DWELLSTART);
        evt.SetX(scn.x);
        evt.SetY(scn.y);
        break;

    case SCN_DWELLEND:
        evt.SetEventType(wxEVT_STC_DWELLEND);
        evt.SetX(scn.x);
        evt.SetY(scn.y);
        break;

    default:
        return;
    }

    GetEventHandler()->ProcessEvent(evt);
}


//----------------------------------------------------------------------
//----------------------------------------------------------------------
//----------------------------------------------------------------------

wxStyledTextEvent::wxStyledTextEvent(wxEventType commandType, int id)
    : wxCommandEvent(commandType, id)
{
    m_position = 0;
    m_key = 0;
    m_modifiers = 0;
    m_modificationType = 0;
    m_length = 0;
    m_linesAdded = 0;
    m_line = 0;
    m_foldLevelNow = 0;
    m_foldLevelPrev = 0;
    m_margin = 0;
    m_message = 0;
    m_wParam = 0;
    m_lParam = 0;
    m_listType = 0;
    m_x = 0;
    m_y = 0;
    m_dragAllowMove = FALSE;
    m_dragResult = wxDragNone;
}

bool wxStyledTextEvent::GetShift() const { return (m_modifiers & SCI_SHIFT) != 0; }
bool wxStyledTextEvent::GetControl() const { return (m_modifiers & SCI_CTRL) != 0; }
bool wxStyledTextEvent::GetAlt() const { return (m_modifiers & SCI_ALT) != 0; }


wxStyledTextEvent::wxStyledTextEvent(const wxStyledTextEvent& event):
  wxCommandEvent(event)
{
    m_position =      event.m_position;
    m_key =           event.m_key;
    m_modifiers =     event.m_modifiers;
    m_modificationType = event.m_modificationType;
    m_text =          event.m_text;
    m_length =        event.m_length;
    m_linesAdded =    event.m_linesAdded;
    m_line =          event.m_line;
    m_foldLevelNow =  event.m_foldLevelNow;
    m_foldLevelPrev = event.m_foldLevelPrev;

    m_margin =        event.m_margin;

    m_message =       event.m_message;
    m_wParam =        event.m_wParam;
    m_lParam =        event.m_lParam;

    m_listType =     event.m_listType;
    m_x =            event.m_x;
    m_y =            event.m_y;

    m_dragText =     event.m_dragText;
    m_dragAllowMove =event.m_dragAllowMove;
    m_dragResult =   event.m_dragResult;
}

//----------------------------------------------------------------------
//----------------------------------------------------------------------
Commit	Line	Data
f97d84a6 RD	1	////////////////////////////////////////////////////////////////////////////
	2	// Name: stc.cpp
	3	// Purpose: A wxWindows implementation of Scintilla. This class is the
	4	// one meant to be used directly by wx applications. It does not
	5	// derive directly from the Scintilla classes, but instead
	6	// delegates most things to the real Scintilla class.
	7	// This allows the use of Scintilla without polluting the
	8	// namespace with all the classes and identifiers from Scintilla.
	9	//
	10	// Author: Robin Dunn
	11	//
	12	// Created: 13-Jan-2000
	13	// RCS-ID: $Id$
	14	// Copyright: (c) 2000 by Total Control Software
	15	// Licence: wxWindows license
	16	/////////////////////////////////////////////////////////////////////////////
	17
	18	#include <ctype.h>
	19
	20	#include "wx/stc/stc.h"
	21	#include "ScintillaWX.h"
	22
	23	#include <wx/tokenzr.h>
	24
f97d84a6 RD	25
	26	//----------------------------------------------------------------------
	27
10ef30eb	28	const wxChar* wxSTCNameStr = wxT("stcwindow");
f97d84a6	29
d25f5fbb RD	30	DEFINE_EVENT_TYPE( wxEVT_STC_CHANGE )
	31	DEFINE_EVENT_TYPE( wxEVT_STC_STYLENEEDED )
	32	DEFINE_EVENT_TYPE( wxEVT_STC_CHARADDED )
d25f5fbb RD	33	DEFINE_EVENT_TYPE( wxEVT_STC_SAVEPOINTREACHED )
	34	DEFINE_EVENT_TYPE( wxEVT_STC_SAVEPOINTLEFT )
	35	DEFINE_EVENT_TYPE( wxEVT_STC_ROMODIFYATTEMPT )
65ec6247	36	DEFINE_EVENT_TYPE( wxEVT_STC_KEY )
d25f5fbb	37	DEFINE_EVENT_TYPE( wxEVT_STC_DOUBLECLICK )
65ec6247	38	DEFINE_EVENT_TYPE( wxEVT_STC_UPDATEUI )
d25f5fbb	39	DEFINE_EVENT_TYPE( wxEVT_STC_MODIFIED )
d25f5fbb RD	40	DEFINE_EVENT_TYPE( wxEVT_STC_MACRORECORD )
	41	DEFINE_EVENT_TYPE( wxEVT_STC_MARGINCLICK )
	42	DEFINE_EVENT_TYPE( wxEVT_STC_NEEDSHOWN )
	43	DEFINE_EVENT_TYPE( wxEVT_STC_POSCHANGED )
65ec6247 RD	44	DEFINE_EVENT_TYPE( wxEVT_STC_PAINTED )
	45	DEFINE_EVENT_TYPE( wxEVT_STC_USERLISTSELECTION )
	46	DEFINE_EVENT_TYPE( wxEVT_STC_URIDROPPED )
	47	DEFINE_EVENT_TYPE( wxEVT_STC_DWELLSTART )
	48	DEFINE_EVENT_TYPE( wxEVT_STC_DWELLEND )
a29a241f RD	49	DEFINE_EVENT_TYPE( wxEVT_STC_START_DRAG )
	50	DEFINE_EVENT_TYPE( wxEVT_STC_DRAG_OVER )
	51	DEFINE_EVENT_TYPE( wxEVT_STC_DO_DROP )
d25f5fbb RD	52
d25f5fbb RD	53
f97d84a6 RD	54	BEGIN_EVENT_TABLE(wxStyledTextCtrl, wxControl)
	55	EVT_PAINT (wxStyledTextCtrl::OnPaint)
	56	EVT_SCROLLWIN (wxStyledTextCtrl::OnScrollWin)
5fa4613c	57	EVT_SCROLL (wxStyledTextCtrl::OnScroll)
f97d84a6 RD	58	EVT_SIZE (wxStyledTextCtrl::OnSize)
f97d84a6 RD	59	EVT_LEFT_DOWN (wxStyledTextCtrl::OnMouseLeftDown)
4ceb1196 RD	60	#ifdef __WXMSW__
	61	// Let Scintilla see the double click as a second click
	62	EVT_LEFT_DCLICK (wxStyledTextCtrl::OnMouseLeftDown)
	63	#endif
f97d84a6 RD	64	EVT_MOTION (wxStyledTextCtrl::OnMouseMove)
f97d84a6 RD	65	EVT_LEFT_UP (wxStyledTextCtrl::OnMouseLeftUp)
ddf2da08 RD	66	#ifdef __WXGTK__
	67	EVT_RIGHT_UP (wxStyledTextCtrl::OnMouseRightUp)
	68	#else
65ec6247	69	EVT_CONTEXT_MENU (wxStyledTextCtrl::OnContextMenu)
ddf2da08	70	#endif
37d62433	71	EVT_MOUSEWHEEL (wxStyledTextCtrl::OnMouseWheel)
f97d84a6 RD	72	EVT_CHAR (wxStyledTextCtrl::OnChar)
	73	EVT_KEY_DOWN (wxStyledTextCtrl::OnKeyDown)
	74	EVT_KILL_FOCUS (wxStyledTextCtrl::OnLoseFocus)
	75	EVT_SET_FOCUS (wxStyledTextCtrl::OnGainFocus)
	76	EVT_SYS_COLOUR_CHANGED (wxStyledTextCtrl::OnSysColourChanged)
	77	EVT_ERASE_BACKGROUND (wxStyledTextCtrl::OnEraseBackground)
	78	EVT_MENU_RANGE (-1, -1, wxStyledTextCtrl::OnMenu)
	79	EVT_LISTBOX_DCLICK (-1, wxStyledTextCtrl::OnListBox)
	80	END_EVENT_TABLE()
	81
	82
	83	IMPLEMENT_CLASS(wxStyledTextCtrl, wxControl)
	84	IMPLEMENT_DYNAMIC_CLASS(wxStyledTextEvent, wxCommandEvent)
	85
1a2fb4cd RD	86	// forces the linking of the lexer modules
	87	int Scintilla_LinkLexers();
	88
f97d84a6 RD	89	//----------------------------------------------------------------------
	90	// Constructor and Destructor
	91
	92	wxStyledTextCtrl::wxStyledTextCtrl(wxWindow *parent,
	93	wxWindowID id,
	94	const wxPoint& pos,
	95	const wxSize& size,
	96	long style,
	97	const wxString& name) :
	98	wxControl(parent, id, pos, size,
	99	style \| wxVSCROLL \| wxHSCROLL \| wxWANTS_CHARS \| wxCLIP_CHILDREN,
	100	wxDefaultValidator, name)
	101	{
1a2fb4cd	102	Scintilla_LinkLexers();
f97d84a6 RD	103	m_swx = new ScintillaWX(this);
f97d84a6 RD	104	m_stopWatch.Start();
d6582821	105	m_lastKeyDownConsumed = FALSE;
5fa4613c RD	106	m_vScrollBar = NULL;
5fa4613c RD	107	m_hScrollBar = NULL;
10ef30eb RD	108	#if wxUSE_UNICODE
	109	// Put Scintilla into unicode (UTF-8) mode
	110	SetCodePage(wxSTC_CP_UTF8);
	111	#endif
f97d84a6 RD	112	}
	113
	114
	115	wxStyledTextCtrl::~wxStyledTextCtrl() {
	116	delete m_swx;
	117	}
	118
	119
	120	//----------------------------------------------------------------------
	121
	122	long wxStyledTextCtrl::SendMsg(int msg, long wp, long lp) {
	123
	124	return m_swx->WndProc(msg, wp, lp);
	125	}
	126
	127
	128	#ifdef MAKELONG
	129	#undef MAKELONG
	130	#endif
	131
	132	#define MAKELONG(a, b) ((a) \| ((b) << 16))
	133
	134
	135	static long wxColourAsLong(const wxColour& co) {
	136	return (((long)co.Blue() << 16) \|
	137	((long)co.Green() << 8) \|
	138	((long)co.Red()));
	139	}
	140
	141	static wxColour wxColourFromLong(long c) {
	142	wxColour clr;
	143	clr.Set(c & 0xff, (c >> 8) & 0xff, (c >> 16) & 0xff);
	144	return clr;
	145	}
	146
	147
	148	static wxColour wxColourFromSpec(const wxString& spec) {
10ef30eb RD	149	// spec should be "#RRGGBB"
	150	long red, green, blue;
	151	red = green = blue = 0;
	152	spec.Mid(1,2).ToLong(&red, 16);
	153	spec.Mid(3,2).ToLong(&green, 16);
	154	spec.Mid(5,2).ToLong(&blue, 16);
f97d84a6 RD	155	return wxColour(red, green, blue);
	156	}
	157
	158
	159	//----------------------------------------------------------------------
	160	// BEGIN generated section. The following code is automatically generated
	161	// by gen_iface.py from the contents of Scintilla.iface. Do not edit
	162	// this file. Edit stc.cpp.in or gen_iface.py instead and regenerate.
	163
	164	%(METHOD_IMPS)s
	165
	166	// END of generated section
	167	//----------------------------------------------------------------------
	168
	169
	170	// Returns the line number of the line with the caret.
	171	int wxStyledTextCtrl::GetCurrentLine() {
	172	int line = LineFromPosition(GetCurrentPos());
	173	return line;
	174	}
	175
	176
	177	// Extract style settings from a spec-string which is composed of one or
	178	// more of the following comma separated elements:
	179	//
	180	// bold turns on bold
	181	// italic turns on italics
	182	// fore:#RRGGBB sets the foreground colour
	183	// back:#RRGGBB sets the background colour
	184	// face:[facename] sets the font face name to use
	185	// size:[num] sets the font size in points
	186	// eol turns on eol filling
	187	// underline turns on underlining
	188	//
	189	void wxStyledTextCtrl::StyleSetSpec(int styleNum, const wxString& spec) {
	190
	191	wxStringTokenizer tkz(spec, ",");
	192	while (tkz.HasMoreTokens()) {
	193	wxString token = tkz.GetNextToken();
	194
	195	wxString option = token.BeforeFirst(':');
	196	wxString val = token.AfterFirst(':');
	197
	198	if (option == "bold")
	199	StyleSetBold(styleNum, true);
	200
	201	else if (option == "italic")
	202	StyleSetItalic(styleNum, true);
	203
	204	else if (option == "underline")
	205	StyleSetUnderline(styleNum, true);
	206
	207	else if (option == "eol")
	208	StyleSetEOLFilled(styleNum, true);
	209
	210	else if (option == "size") {
	211	long points;
	212	if (val.ToLong(&points))
	213	StyleSetSize(styleNum, points);
	214	}
	215
	216	else if (option == "face")
	217	StyleSetFaceName(styleNum, val);
	218
219	else if (option == "fore")
220	StyleSetForeground(styleNum, wxColourFromSpec(val));
221
222	else if (option == "back")
223	StyleSetBackground(styleNum, wxColourFromSpec(val));
224	}
225	}
226
227
228	// Set style size, face, bold, italic, and underline attributes from
229	// a wxFont's attributes.
230	void wxStyledTextCtrl::StyleSetFont(int styleNum, wxFont& font) {
231	int size = font.GetPointSize();
232	wxString faceName = font.GetFaceName();
233	bool bold = font.GetWeight() == wxBOLD;
234	bool italic = font.GetStyle() != wxNORMAL;
235	bool under = font.GetUnderlined();
236
237	// TODO: add encoding/charset mapping
238	StyleSetFontAttr(styleNum, size, faceName, bold, italic, under);
239	}
240
241	// Set all font style attributes at once.
242	void wxStyledTextCtrl::StyleSetFontAttr(int styleNum, int size,
243	const wxString& faceName,
244	bool bold, bool italic,
245	bool underline) {
246	StyleSetSize(styleNum, size);
247	StyleSetFaceName(styleNum, faceName);
248	StyleSetBold(styleNum, bold);
249	StyleSetItalic(styleNum, italic);
250	StyleSetUnderline(styleNum, underline);
251
252	// TODO: add encoding/charset mapping
253	}
254
255
256	// Perform one of the operations defined by the wxSTC_CMD_* constants.
257	void wxStyledTextCtrl::CmdKeyExecute(int cmd) {
258	SendMsg(cmd);
259	}
260
261
262	// Set the left and right margin in the edit area, measured in pixels.
263	void wxStyledTextCtrl::SetMargins(int left, int right) {
264	SetMarginLeft(left);
265	SetMarginRight(right);
266	}
267
268
269	// Retrieve the start and end positions of the current selection.
270	void wxStyledTextCtrl::GetSelection(int* startPos, int* endPos) {
271	if (startPos != NULL)
272	*startPos = SendMsg(SCI_GETSELECTIONSTART);
273	if (endPos != NULL)
274	*endPos = SendMsg(SCI_GETSELECTIONEND);
275	}
276
277
278	// Retrieve the point in the window where a position is displayed.
279	wxPoint wxStyledTextCtrl::PointFromPosition(int pos) {
280	int x = SendMsg(SCI_POINTXFROMPOSITION, 0, pos);
281	int y = SendMsg(SCI_POINTYFROMPOSITION, 0, pos);
282	return wxPoint(x, y);
283	}
284
285	// Scroll enough to make the given line visible
286	void wxStyledTextCtrl::ScrollToLine(int line) {
287	m_swx->DoScrollToLine(line);
288	}
289
290
291	// Scroll enough to make the given column visible
292	void wxStyledTextCtrl::ScrollToColumn(int column) {
293	m_swx->DoScrollToColumn(column);
294	}
295
296
297
298	//----------------------------------------------------------------------
299	// Event handlers
300
301	void wxStyledTextCtrl::OnPaint(wxPaintEvent& evt) {
302	wxPaintDC dc(this);
303	wxRegion region = GetUpdateRegion();
304
305	m_swx->DoPaint(&dc, region.GetBox());
306	}
307
308	void wxStyledTextCtrl::OnScrollWin(wxScrollWinEvent& evt) {
309	if (evt.GetOrientation() == wxHORIZONTAL)
310	m_swx->DoHScroll(evt.GetEventType(), evt.GetPosition());
311	else
312	m_swx->DoVScroll(evt.GetEventType(), evt.GetPosition());
313	}
314
5fa4613c RD	315	void wxStyledTextCtrl::OnScroll(wxScrollEvent& evt) {
	316	wxScrollBar* sb = wxDynamicCast(evt.GetEventObject(), wxScrollBar);
	317	if (sb) {
	318	if (sb->IsVertical())
	319	m_swx->DoVScroll(evt.GetEventType(), evt.GetPosition());
	320	else
	321	m_swx->DoHScroll(evt.GetEventType(), evt.GetPosition());
	322	}
	323	}
	324
f97d84a6 RD	325	void wxStyledTextCtrl::OnSize(wxSizeEvent& evt) {
	326	wxSize sz = GetClientSize();
	327	m_swx->DoSize(sz.x, sz.y);
10ef30eb	328	Refresh(FALSE);
f97d84a6 RD	329	}
	330
	331	void wxStyledTextCtrl::OnMouseLeftDown(wxMouseEvent& evt) {
	332	wxPoint pt = evt.GetPosition();
	333	m_swx->DoButtonDown(Point(pt.x, pt.y), m_stopWatch.Time(),
	334	evt.ShiftDown(), evt.ControlDown(), evt.AltDown());
	335	}
	336
	337	void wxStyledTextCtrl::OnMouseMove(wxMouseEvent& evt) {
	338	wxPoint pt = evt.GetPosition();
	339	m_swx->DoButtonMove(Point(pt.x, pt.y));
	340	}
	341
	342	void wxStyledTextCtrl::OnMouseLeftUp(wxMouseEvent& evt) {
	343	wxPoint pt = evt.GetPosition();
	344	m_swx->DoButtonUp(Point(pt.x, pt.y), m_stopWatch.Time(),
	345	evt.ControlDown());
	346	}
	347
	348
ddf2da08 RD	349	void wxStyledTextCtrl::OnMouseRightUp(wxMouseEvent& evt) {
	350	wxPoint pt = evt.GetPosition();
	351	m_swx->DoContextMenu(Point(pt.x, pt.y));
	352	}
	353
	354
65ec6247	355	void wxStyledTextCtrl::OnContextMenu(wxContextMenuEvent& evt) {
f97d84a6	356	wxPoint pt = evt.GetPosition();
65ec6247	357	ScreenToClient(&pt.x, &pt.y);
f97d84a6 RD	358	m_swx->DoContextMenu(Point(pt.x, pt.y));
	359	}
	360
37d62433 RD	361
	362	void wxStyledTextCtrl::OnMouseWheel(wxMouseEvent& evt) {
	363	m_swx->DoMouseWheel(evt.GetWheelRotation(),
	364	evt.GetWheelDelta(),
65ec6247 RD	365	evt.GetLinesPerAction(),
65ec6247 RD	366	evt.ControlDown());
37d62433 RD	367	}
	368
	369
f97d84a6	370	void wxStyledTextCtrl::OnChar(wxKeyEvent& evt) {
10ef30eb	371	int key = evt.GetKeyCode();
f3c2c221	372
f3c2c221 RD	373	// On (some?) non-US keyboards the AltGr key is required to enter some
	374	// common characters. It comes to us as both Alt and Ctrl down so we need
	375	// to let the char through in that case, otherwise if only ctrl or only
	376	// alt let's skip it.
	377	bool ctrl = evt.ControlDown();
	378	bool alt = evt.AltDown();
00c64037	379	bool skip = ((ctrl \|\| alt) && ! (ctrl && alt));
f3c2c221	380
10ef30eb RD	381	//printf("OnChar key:%%d consumed:%%d ctrl:%%d alt:%%d skip:%%d\n",
	382	// key, m_lastKeyDownConsumed, ctrl, alt, skip);
	383
	384	if (key <= WXK_START && /key >= 32 &&/ !m_lastKeyDownConsumed && !skip) {
f97d84a6	385	m_swx->DoAddChar(key);
f3c2c221	386	return;
f97d84a6	387	}
f3c2c221	388	evt.Skip();
f97d84a6 RD	389	}
f97d84a6 RD	390
d6582821	391
f97d84a6	392	void wxStyledTextCtrl::OnKeyDown(wxKeyEvent& evt) {
10ef30eb	393	int key = evt.GetKeyCode();
f3c2c221	394	bool shift = evt.ShiftDown(),
10ef30eb RD	395	ctrl = evt.ControlDown(),
10ef30eb RD	396	alt = evt.AltDown();
f3c2c221 RD	397
	398	int processed = m_swx->DoKeyDown(key, shift, ctrl, alt, &m_lastKeyDownConsumed);
	399
	400	// printf("key: %%d shift: %%d ctrl: %%d alt: %%d processed: %%d consumed: %%d\n",
	401	// key, shift, ctrl, alt, processed, m_lastKeyDownConsumed);
	402
d6582821	403	if (!processed && !m_lastKeyDownConsumed)
f97d84a6 RD	404	evt.Skip();
	405	}
	406
d6582821	407
f97d84a6 RD	408	void wxStyledTextCtrl::OnLoseFocus(wxFocusEvent& evt) {
	409	m_swx->DoLoseFocus();
	410	}
	411
d6582821	412
f97d84a6 RD	413	void wxStyledTextCtrl::OnGainFocus(wxFocusEvent& evt) {
	414	m_swx->DoGainFocus();
	415	}
	416
d6582821	417
f97d84a6 RD	418	void wxStyledTextCtrl::OnSysColourChanged(wxSysColourChangedEvent& evt) {
	419	m_swx->DoSysColourChange();
	420	}
	421
d6582821	422
f97d84a6 RD	423	void wxStyledTextCtrl::OnEraseBackground(wxEraseEvent& evt) {
	424	// do nothing to help avoid flashing
	425	}
	426
	427
	428
	429	void wxStyledTextCtrl::OnMenu(wxCommandEvent& evt) {
	430	m_swx->DoCommand(evt.GetId());
	431	}
	432
	433
	434	void wxStyledTextCtrl::OnListBox(wxCommandEvent& evt) {
	435	m_swx->DoOnListBox();
	436	}
	437
	438
	439	//----------------------------------------------------------------------
	440	// Turn notifications from Scintilla into events
	441
	442
	443	void wxStyledTextCtrl::NotifyChange() {
	444	wxStyledTextEvent evt(wxEVT_STC_CHANGE, GetId());
a29a241f	445	evt.SetEventObject(this);
f97d84a6 RD	446	GetEventHandler()->ProcessEvent(evt);
	447	}
	448
	449	void wxStyledTextCtrl::NotifyParent(SCNotification* _scn) {
	450	SCNotification& scn = *_scn;
65ec6247 RD	451	wxStyledTextEvent evt(0, GetId());
65ec6247 RD	452
a29a241f	453	evt.SetEventObject(this);
65ec6247 RD	454	evt.SetPosition(scn.position);
	455	evt.SetKey(scn.ch);
	456	evt.SetModifiers(scn.modifiers);
	457
f97d84a6 RD	458	switch (scn.nmhdr.code) {
f97d84a6 RD	459	case SCN_STYLENEEDED:
65ec6247	460	evt.SetEventType(wxEVT_STC_STYLENEEDED);
f97d84a6	461	break;
65ec6247	462
f97d84a6	463	case SCN_CHARADDED:
65ec6247	464	evt.SetEventType(wxEVT_STC_CHARADDED);
f97d84a6	465	break;
65ec6247	466
f97d84a6	467	case SCN_SAVEPOINTREACHED:
65ec6247	468	evt.SetEventType(wxEVT_STC_SAVEPOINTREACHED);
f97d84a6	469	break;
65ec6247	470
f97d84a6	471	case SCN_SAVEPOINTLEFT:
65ec6247	472	evt.SetEventType(wxEVT_STC_SAVEPOINTLEFT);
f97d84a6	473	break;
65ec6247	474
f97d84a6	475	case SCN_MODIFYATTEMPTRO:
65ec6247 RD	476	evt.SetEventType(wxEVT_STC_ROMODIFYATTEMPT);
	477	break;
	478
	479	case SCN_KEY:
	480	evt.SetEventType(wxEVT_STC_KEY);
f97d84a6	481	break;
65ec6247	482
f97d84a6	483	case SCN_DOUBLECLICK:
65ec6247	484	evt.SetEventType(wxEVT_STC_DOUBLECLICK);
f97d84a6	485	break;
65ec6247 RD	486
	487	case SCN_UPDATEUI:
	488	evt.SetEventType(wxEVT_STC_UPDATEUI);
f97d84a6	489	break;
65ec6247 RD	490
	491	case SCN_MODIFIED:
	492	evt.SetEventType(wxEVT_STC_MODIFIED);
	493	evt.SetModificationType(scn.modificationType);
10ef30eb RD	494	if (scn.text) {
	495	// The unicode conversion MUST have a null byte to terminate the
	496	// string so move it into a buffer first and give it one.
	497	wxMemoryBuffer buf(scn.length+1);
	498	buf.AppendData((void*)scn.text, scn.length);
	499	buf.AppendByte(0);
	500	evt.SetText(wxString(buf, wxConvUTF8));
	501	}
65ec6247 RD	502	evt.SetLength(scn.length);
	503	evt.SetLinesAdded(scn.linesAdded);
	504	evt.SetLine(scn.line);
	505	evt.SetFoldLevelNow(scn.foldLevelNow);
	506	evt.SetFoldLevelPrev(scn.foldLevelPrev);
f97d84a6	507	break;
65ec6247	508
f97d84a6	509	case SCN_MACRORECORD:
65ec6247 RD	510	evt.SetEventType(wxEVT_STC_MACRORECORD);
	511	evt.SetMessage(scn.message);
	512	evt.SetWParam(scn.wParam);
	513	evt.SetLParam(scn.lParam);
f97d84a6	514	break;
65ec6247	515
f97d84a6	516	case SCN_MARGINCLICK:
65ec6247 RD	517	evt.SetEventType(wxEVT_STC_MARGINCLICK);
65ec6247 RD	518	evt.SetMargin(scn.margin);
f97d84a6	519	break;
65ec6247	520
f97d84a6	521	case SCN_NEEDSHOWN:
65ec6247 RD	522	evt.SetEventType(wxEVT_STC_NEEDSHOWN);
65ec6247 RD	523	evt.SetLength(scn.length);
f97d84a6	524	break;
65ec6247	525
65ec6247 RD	526	case SCN_PAINTED:
	527	evt.SetEventType(wxEVT_STC_PAINTED);
	528	break;
	529
	530	case SCN_USERLISTSELECTION:
	531	evt.SetEventType(wxEVT_STC_USERLISTSELECTION);
	532	evt.SetListType(scn.listType);
	533	evt.SetText(scn.text);
f97d84a6	534	break;
f97d84a6	535
65ec6247 RD	536	case SCN_URIDROPPED:
	537	evt.SetEventType(wxEVT_STC_URIDROPPED);
	538	evt.SetText(scn.text);
	539	break;
	540
	541	case SCN_DWELLSTART:
	542	evt.SetEventType(wxEVT_STC_DWELLSTART);
	543	evt.SetX(scn.x);
	544	evt.SetY(scn.y);
	545	break;
	546
	547	case SCN_DWELLEND:
	548	evt.SetEventType(wxEVT_STC_DWELLEND);
	549	evt.SetX(scn.x);
	550	evt.SetY(scn.y);
	551	break;
	552
	553	default:
	554	return;
f97d84a6	555	}
65ec6247 RD	556
65ec6247 RD	557	GetEventHandler()->ProcessEvent(evt);
f97d84a6 RD	558	}
	559
	560
f97d84a6 RD	561	//----------------------------------------------------------------------
	562	//----------------------------------------------------------------------
	563	//----------------------------------------------------------------------
	564
	565	wxStyledTextEvent::wxStyledTextEvent(wxEventType commandType, int id)
	566	: wxCommandEvent(commandType, id)
	567	{
	568	m_position = 0;
	569	m_key = 0;
	570	m_modifiers = 0;
	571	m_modificationType = 0;
	572	m_length = 0;
	573	m_linesAdded = 0;
	574	m_line = 0;
	575	m_foldLevelNow = 0;
	576	m_foldLevelPrev = 0;
	577	m_margin = 0;
	578	m_message = 0;
	579	m_wParam = 0;
	580	m_lParam = 0;
65ec6247 RD	581	m_listType = 0;
	582	m_x = 0;
	583	m_y = 0;
a29a241f RD	584	m_dragAllowMove = FALSE;
a29a241f RD	585	m_dragResult = wxDragNone;
f97d84a6 RD	586	}
	587
	588	bool wxStyledTextEvent::GetShift() const { return (m_modifiers & SCI_SHIFT) != 0; }
	589	bool wxStyledTextEvent::GetControl() const { return (m_modifiers & SCI_CTRL) != 0; }
	590	bool wxStyledTextEvent::GetAlt() const { return (m_modifiers & SCI_ALT) != 0; }
	591
f97d84a6	592
5fa4613c RD	593	wxStyledTextEvent::wxStyledTextEvent(const wxStyledTextEvent& event):
	594	wxCommandEvent(event)
	595	{
	596	m_position = event.m_position;
	597	m_key = event.m_key;
	598	m_modifiers = event.m_modifiers;
	599	m_modificationType = event.m_modificationType;
	600	m_text = event.m_text;
	601	m_length = event.m_length;
	602	m_linesAdded = event.m_linesAdded;
	603	m_line = event.m_line;
	604	m_foldLevelNow = event.m_foldLevelNow;
	605	m_foldLevelPrev = event.m_foldLevelPrev;
	606
	607	m_margin = event.m_margin;
	608
	609	m_message = event.m_message;
	610	m_wParam = event.m_wParam;
	611	m_lParam = event.m_lParam;
	612
	613	m_listType = event.m_listType;
	614	m_x = event.m_x;
	615	m_y = event.m_y;
f97d84a6	616
5fa4613c RD	617	m_dragText = event.m_dragText;
	618	m_dragAllowMove =event.m_dragAllowMove;
	619	m_dragResult = event.m_dragResult;
f97d84a6 RD	620	}
	621
	622	//----------------------------------------------------------------------
	623	//----------------------------------------------------------------------
	624
a29a241f RD	625
	626
	627
5fa4613c RD	628
	629
	630
	631
	632