[commit] r2455 - in trunk/GME: GMEActiveBrowser Gme

[GMESRC Repository Notifications]

Author: ksmyth
Date: Tue Mar  4 10:24:14 2014
New Revision: 2455

Log:
ModelEditor and TreeBrowser: Ctrl-Shift-V does Paste as Reference (META-2955)

Modified:
   trunk/GME/GMEActiveBrowser/ActiveBrowserPropertyPage.cpp
   trunk/GME/Gme/GME.rc

Modified: trunk/GME/GMEActiveBrowser/ActiveBrowserPropertyPage.cpp
==============================================================================
--- trunk/GME/GMEActiveBrowser/ActiveBrowserPropertyPage.cpp	Tue Mar  4 10:24:02 2014	(r2454)
+++ trunk/GME/GMEActiveBrowser/ActiveBrowserPropertyPage.cpp	Tue Mar  4 10:24:14 2014	(r2455)
@@ -2617,7 +2617,12 @@
 				COleDataObject OleDataObject;
 				CString msg;
 				if( OleDataObject.AttachClipboard()) {
-					if( m_TreeAggregate.DoDrop( DRAGOP_COPY, &OleDataObject, CPoint( 0, 0))) {
+					auto op = DRAGOP_COPY;
+					if (::GetKeyState(VK_SHIFT) & 0x8000)
+					{
+						op = DRAGOP_REFERENCE;
+					}
+					if( m_TreeAggregate.DoDrop(op, &OleDataObject, CPoint( 0, 0))) {
 						// what about set focus back
 						m_TreeAggregate.SetFocus();
 					}

Modified: trunk/GME/Gme/GME.rc
==============================================================================
--- trunk/GME/Gme/GME.rc	Tue Mar  4 10:24:02 2014	(r2454)
+++ trunk/GME/Gme/GME.rc	Tue Mar  4 10:24:14 2014	(r2455)
@@ -701,6 +701,7 @@
     VK_RIGHT,       ID_EDIT_NUDGERIGHT,     VIRTKEY, NOINVERT
     VK_UP,          ID_EDIT_NUDGEUP,        VIRTKEY, NOINVERT
     "V",            ID_EDIT_PASTE,          VIRTKEY, CONTROL, NOINVERT
+    "V",            ID_EDIT_PASTESPECIAL_ASREFERENCE,      VIRTKEY, CONTROL, SHIFT, NOINVERT
     VK_INSERT,      ID_EDIT_PASTE,          VIRTKEY, SHIFT, NOINVERT
     "A",            ID_EDIT_SELECTALL,      VIRTKEY, CONTROL, NOINVERT
     "P",            ID_FILE_PRINT,          VIRTKEY, CONTROL, NOINVERT