| Article | 60000473 |
| Type | Wish |
| Product | Engine |
| Version | 6011 |
| Date Added | 4/11/2008 12:00:00 AM |
| Fixed | (4/11/2008 12:00:00 AM) |
| Submitted by | Christof Duvenbeck |
Summary
Drag and Drop default implementation to be enabled by default. For example the following code copy all entities of activelayout as a vdInsert object: Private Sub VDraw1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Double, ByVal y As Double) 'Only drag to File (Explorer) works, Dragdrop in Vdraw is not working Dim ll_retv As Long If Button = 1 Then ll_retv = VDraw1.CommandAction.DoDragDrop("ALL", VdDropEffect_Move + VdDropEffect_Copy, VDraw1.CursorPos, 100, 100, 3) ll_retv = ll_retv End If End SubNOTE: Also drag and drop drawing files (from file explorer) into the VDrawgraphics area will add this drawing as Xref.
Solution
Added in 6012