projects/dwt-mac: dwt/dnd/DropTarget.d annotate

annotate dwt/dnd/DropTarget.d @ 156:969e7de37c3d default tip

Fixes to get dwt to work with dmd and ldc

author	Jacob Carlborg <doob@me.com>
date	Wed, 08 Jul 2009 21:56:44 +0200
parents	07399639c0c8
children

rev	line source
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1 /*******************************************************************************
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	2 * Copyright (c) 2000, 2008 IBM Corporation and others.
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3 * All rights reserved. This program and the accompanying materials
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4 * are made available under the terms of the Eclipse Public License v1.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	5 * which accompanies this distribution, and is available at
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	6 * http://www.eclipse.org/legal/epl-v10.html
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	7 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	8 * Contributors:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	9 * IBM Corporation - initial API and implementation
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	10 *
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	11 * Port to the D programming language:
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	12 * Jacob Carlborg <doob@me.com>
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	13 *******************************************************************************/
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	14 module dwt.dnd.DropTarget;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	15
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	16 import dwt.dwthelper.utils;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	17
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	18 import dwt.DWT;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	19 import dwt.DWTError;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	20 import dwt.DWTException;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	21 import dwt.internal.cocoa.NSApplication;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	22 import dwt.internal.cocoa.NSArray;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	23 import dwt.internal.cocoa.NSCursor;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	24 import dwt.internal.cocoa.NSEvent;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	25 import dwt.internal.cocoa.NSMutableArray;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	26 import dwt.internal.cocoa.NSObject;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	27 import dwt.internal.cocoa.NSPasteboard;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	28 import dwt.internal.cocoa.NSPoint;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	29 import dwt.internal.cocoa.NSRect;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	30 import dwt.internal.cocoa.NSScreen;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	31 import dwt.internal.cocoa.NSString;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	32 import dwt.internal.cocoa.NSURL;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	33 import dwt.internal.cocoa.OS;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	34 import dwt.internal.cocoa.id;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	35 import dwt.widgets.Control;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	36 import dwt.widgets.Display;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	37 import dwt.widgets.Event;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	38 import dwt.widgets.Listener;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	39 import dwt.widgets.Table;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	40 import dwt.widgets.Tree;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	41 import dwt.widgets.Widget;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	42
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	43 import tango.core.Thread;
a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	44
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	45 import dwt.dnd.DND;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	46 import dwt.dnd.DNDEvent;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	47 import dwt.dnd.DNDListener;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	48 import dwt.dnd.DropTargetEffect;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	49 import dwt.dnd.DropTargetListener;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	50 import dwt.dnd.TableDropTargetEffect;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	51 import dwt.dnd.Transfer;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	52 import dwt.dnd.TransferData;
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	53 import dwt.dnd.TreeDropTargetEffect;
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	54 import dwt.internal.objc.cocoa.Cocoa;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	55 import objc = dwt.internal.objc.runtime;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	56
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	57 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	58 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	59 * Class <code>DropTarget</code> defines the target object for a drag and drop transfer.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	60 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	61 * IMPORTANT: This class is <em>not</em> intended to be subclassed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	62 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	63 * <p>This class identifies the <code>Control</code> over which the user must position the cursor
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	64 * in order to drop the data being transferred. It also specifies what data types can be dropped on
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	65 * this control and what operations can be performed. You may have several DropTragets in an
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	66 * application but there can only be a one to one mapping between a <code>Control</code> and a <code>DropTarget</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	67 * The DropTarget can receive data from within the same application or from other applications
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	68 * (such as text dragged from a text editor like Word).</p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	69 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	70 * <code><pre>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	71 * int operations = DND.DROP_MOVE \| DND.DROP_COPY \| DND.DROP_LINK;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	72 * Transfer[] types = new Transfer[] {TextTransfer.getInstance()};
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	73 * DropTarget target = new DropTarget(label, operations);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	74 * target.setTransfer(types);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	75 * </code></pre>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	76 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	77 * <p>The application is notified of data being dragged over this control and of when a drop occurs by
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	78 * implementing the interface <code>DropTargetListener</code> which uses the class
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	79 * <code>DropTargetEvent</code>. The application can modify the type of drag being performed
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	80 * on this Control at any stage of the drag by modifying the <code>event.detail</code> field or the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	81 * <code>event.currentDataType</code> field. When the data is dropped, it is the responsibility of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	82 * the application to copy this data for its own purposes.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	83 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	84 * <code><pre>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	85 * target.addDropListener (new DropTargetListener() {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	86 * public void dragEnter(DropTargetEvent event) {};
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	87 * public void dragOver(DropTargetEvent event) {};
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	88 * public void dragLeave(DropTargetEvent event) {};
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	89 * public void dragOperationChanged(DropTargetEvent event) {};
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	90 * public void dropAccept(DropTargetEvent event) {}
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	91 * public void drop(DropTargetEvent event) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	92 * // A drop has occurred, copy over the data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	93 * if (event.data is null) { // no data to copy, indicate failure in event.detail
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	94 * event.detail = DND.DROP_NONE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	95 * return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	96 * }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	97 * label.setText ((String) event.data); // data copied to label text
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	98 * }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	99 * });
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	100 * </pre></code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	101 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	102 * <dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	103 * <dt><b>Styles</b></dt> <dd>DND.DROP_NONE, DND.DROP_COPY, DND.DROP_MOVE, DND.DROP_LINK</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	104 * <dt><b>Events</b></dt> <dd>DND.DragEnter, DND.DragLeave, DND.DragOver, DND.DragOperationChanged,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	105 * DND.DropAccept, DND.Drop </dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	106 * </dl>
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	107 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	108 * @see <a href="http://www.eclipse.org/swt/snippets/#dnd">Drag and Drop snippets</a>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	109 * @see <a href="http://www.eclipse.org/swt/examples.php">DWT Example: DNDExample</a>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	110 * @see <a href="http://www.eclipse.org/swt/">Sample code and further information</a>
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	111 */
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	112 public class DropTarget : Widget {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	113
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	114 static objc.IMP proc2Args, proc3Args;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	115
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	116 static this () {
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	117 proc2Args = cast(objc.IMP) &dropTargetProc2;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	118 proc3Args = cast(objc.IMP) &dropTargetProc3;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	119 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	120
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	121 Control control;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	122 Listener controlListener;
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	123 Transfer[] transferAgents;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	124 DropTargetEffect dropEffect;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	125 int feedback = DND.FEEDBACK_NONE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	126
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	127 // Track application selections
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	128 TransferData selectedDataType;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	129 int selectedOperation;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	130
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	131 // workaround - There is no event for "operation changed" so track operation based on key state
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	132 int keyOperation = -1;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	133
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	134 static const String DEFAULT_DROP_TARGET_EFFECT = "DEFAULT_DROP_TARGET_EFFECT"; //$NON-NLS-1$
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	135
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	136 void addDragHandlers() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	137 // Our strategy here is to dynamically add methods to the control's class that are required
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	138 // by NSDraggingDestination. Then, when setTransfer is called, we just register
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	139 // the types with the Control's NSView and AppKit will call the methods in the protocol
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	140 // when a drag goes over the view.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	141
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	142 objc.Class cls = OS.object_getClass(control.view.id);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	143
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	144 if (cls is null) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	145 DND.error(DND.ERROR_CANNOT_INIT_DROP);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	146 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	147
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	148 // If we already added it, no need to do it again.
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	149 objc.IMP procPtr = OS.class_getMethodImplementation(cls, OS.sel_draggingEnded_);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	150 if (procPtr is proc3Args) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	151
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	152 // Add the NSDraggingDestination callbacks
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	153 OS.class_addMethod(cls, OS.sel_draggingEntered_, proc3Args, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	154 OS.class_addMethod(cls, OS.sel_draggingUpdated_, proc3Args, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	155 OS.class_addMethod(cls, OS.sel_draggingExited_, proc3Args, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	156 OS.class_addMethod(cls, OS.sel_performDragOperation_, proc3Args, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	157 OS.class_addMethod(cls, OS.sel_wantsPeriodicDraggingUpdates, proc2Args, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	158 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	159
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	160 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	161 * Adds the listener to the collection of listeners who will
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	162 * be notified when a drag and drop operation is in progress, by sending
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	163 * it one of the messages defined in the <code>DropTargetListener</code>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	164 * interface.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	165 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	166 * <p><ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	167 * <li><code>dragEnter</code> is called when the cursor has entered the drop target boundaries
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	168 * <li><code>dragLeave</code> is called when the cursor has left the drop target boundaries and just before
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	169 * the drop occurs or is cancelled.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	170 * <li><code>dragOperationChanged</code> is called when the operation being performed has changed
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	171 * (usually due to the user changing the selected modifier key(s) while dragging)
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	172 * <li><code>dragOver</code> is called when the cursor is moving over the drop target
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	173 * <li><code>dropAccept</code> is called just before the drop is performed. The drop target is given
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	174 * the chance to change the nature of the drop or veto the drop by setting the <code>event.detail</code> field
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	175 * <li><code>drop</code> is called when the data is being dropped
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	176 * </ul></p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	177 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	178 * @param listener the listener which should be notified
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	179 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	180 * @exception IllegalArgumentException <ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	181 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	182 * </ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	183 * @exception DWTException <ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	184 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	185 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	186 * </ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	187 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	188 * @see DropTargetListener
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	189 * @see #getDropListeners
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	190 * @see #removeDropListener
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	191 * @see DropTargetEvent
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	192 */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	193 public void addDropListener(DropTargetListener listener) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	194 if (listener is null) DND.error (DWT.ERROR_NULL_ARGUMENT);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	195 DNDListener typedListener = new DNDListener (listener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	196 typedListener.dndWidget = this;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	197 addListener (DND.DragEnter, typedListener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	198 addListener (DND.DragLeave, typedListener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	199 addListener (DND.DragOver, typedListener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	200 addListener (DND.DragOperationChanged, typedListener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	201 addListener (DND.Drop, typedListener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	202 addListener (DND.DropAccept, typedListener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	203 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	204
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	205 static int checkStyle (int style) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	206 if (style is DWT.NONE) return DND.DROP_MOVE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	207 return style;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	208 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	209
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	210 protected void checkSubclass () {
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	211 String name = this.classinfo.name;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	212 String validName = DropTarget.classinfo.name;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	213 if (!validName.equals(name)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	214 DND.error (DWT.ERROR_INVALID_SUBCLASS);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	215 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	216 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	217
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	218 int draggingEntered(NSObject sender) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	219 selectedDataType = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	220 selectedOperation = 0;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	221
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	222 DNDEvent event = new DNDEvent();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	223 if (!setEventData(sender, event)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	224 keyOperation = -1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	225 if (OS.PTR_SIZEOF is 4) OS.SetThemeCursor(OS.kThemeNotAllowedCursor);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	226 return OS.NSDragOperationNone;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	227 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	228
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	229 int allowedOperations = event.operations;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	230 TransferData[] allowedDataTypes = new TransferData[event.dataTypes.length];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	231 System.arraycopy(event.dataTypes, 0, allowedDataTypes, 0, allowedDataTypes.length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	232
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	233 notifyListeners(DND.DragEnter, event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	234
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	235 if (event.detail is DND.DROP_DEFAULT) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	236 event.detail = (allowedOperations & DND.DROP_MOVE) !is 0 ? DND.DROP_MOVE : DND.DROP_NONE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	237 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	238
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	239 selectedDataType = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	240 for (int i = 0; i < allowedDataTypes.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	241 if (allowedDataTypes[i].type is event.dataType.type) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	242 selectedDataType = allowedDataTypes[i];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	243 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	244 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	245 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	246
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	247 selectedOperation = DND.DROP_NONE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	248 if (selectedDataType !is null && (allowedOperations & event.detail) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	249 selectedOperation = event.detail;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	250 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	251
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	252 int osOperation = opToOsOp(selectedOperation);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	253
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	254 if (OS.PTR_SIZEOF is 4) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	255 switch (selectedOperation) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	256 case DND.DROP_COPY:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	257 OS.SetThemeCursor(OS.kThemeCopyArrowCursor);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	258 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	259 case DND.DROP_LINK:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	260 OS.SetThemeCursor(OS.kThemeAliasArrowCursor);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	261 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	262 case DND.DROP_MOVE:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	263 NSCursor.arrowCursor().set();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	264 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	265 default:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	266 OS.SetThemeCursor(OS.kThemeNotAllowedCursor);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	267 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	268 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	269 return osOperation;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	270 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	271
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	272 void draggingExited(NSObject sender) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	273 NSCursor.arrowCursor().set();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	274 if (keyOperation is -1) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	275 keyOperation = -1;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	276
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	277 DNDEvent event = new DNDEvent();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	278 event.widget = this;
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	279 event.time = cast(int)System.currentTimeMillis();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	280 event.detail = DND.DROP_NONE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	281 notifyListeners(DND.DragLeave, event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	282 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	283
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	284 int draggingUpdated(NSObject sender) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	285 if (sender is null) return OS.NSDragOperationNone;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	286 int oldKeyOperation = keyOperation;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	287
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	288 DNDEvent event = new DNDEvent();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	289 if (!setEventData(sender, event)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	290 keyOperation = -1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	291 if (OS.PTR_SIZEOF is 4) OS.SetThemeCursor(OS.kThemeNotAllowedCursor);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	292 return OS.NSDragOperationNone;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	293 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	294
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	295 int allowedOperations = event.operations;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	296 TransferData[] allowedDataTypes = new TransferData[event.dataTypes.length];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	297 System.arraycopy(event.dataTypes, 0, allowedDataTypes, 0, allowedDataTypes.length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	298
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	299 if (keyOperation is oldKeyOperation) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	300 event.type = DND.DragOver;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	301 event.dataType = selectedDataType;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	302 event.detail = selectedOperation;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	303 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	304 event.type = DND.DragOperationChanged;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	305 event.dataType = selectedDataType;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	306 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	307 notifyListeners(event.type, event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	308 if (event.detail is DND.DROP_DEFAULT) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	309 event.detail = (allowedOperations & DND.DROP_MOVE) !is 0 ? DND.DROP_MOVE : DND.DROP_NONE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	310 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	311
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	312 selectedDataType = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	313 for (int i = 0; i < allowedDataTypes.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	314 if (allowedDataTypes[i].type is event.dataType.type) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	315 selectedDataType = allowedDataTypes[i];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	316 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	317 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	318 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	319
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	320 selectedOperation = DND.DROP_NONE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	321 if (selectedDataType !is null && ((allowedOperations & event.detail) is event.detail)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	322 selectedOperation = event.detail;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	323 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	324 return opToOsOp(selectedOperation);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	325 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	326
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	327 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	328 * Creates a new <code>DropTarget</code> to allow data to be dropped on the specified
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	329 * <code>Control</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	330 * Creating an instance of a DropTarget may cause system resources to be allocated
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	331 * depending on the platform. It is therefore mandatory that the DropTarget instance
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	332 * be disposed when no longer required.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	333 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	334 * @param control the <code>Control</code> over which the user positions the cursor to drop the data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	335 * @param style the bitwise OR'ing of allowed operations; this may be a combination of any of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	336 * DND.DROP_NONE, DND.DROP_COPY, DND.DROP_MOVE, DND.DROP_LINK
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	337 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	338 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	339 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the parent</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	340 * <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	341 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	342 * @exception DWTError <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	343 * <li>ERROR_CANNOT_INIT_DROP - unable to initiate drop target; this will occur if more than one
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	344 * drop target is created for a control or if the operating system will not allow the creation
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	345 * of the drop target</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	346 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	347 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	348 * <p>NOTE: ERROR_CANNOT_INIT_DROP should be an DWTException, since it is a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	349 * recoverable error, but can not be changed due to backward compatibility.</p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	350 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	351 * @see Widget#dispose
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	352 * @see DropTarget#checkSubclass
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	353 * @see DND#DROP_NONE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	354 * @see DND#DROP_COPY
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	355 * @see DND#DROP_MOVE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	356 * @see DND#DROP_LINK
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	357 */
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	358 public this(Control control, int style) {
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	359 transferAgents = new Transfer[0];
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	360
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	361 super(control, checkStyle(style));
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	362 this.control = control;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	363
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	364 if (control.getData(DND.DROP_TARGET_KEY) !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	365 DND.error(DND.ERROR_CANNOT_INIT_DROP);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	366 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	367
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	368 control.setData(DND.DROP_TARGET_KEY, this);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	369
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	370 controlListener = new class () Listener {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	371 public void handleEvent (Event event) {
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	372 if (!this.outer.isDisposed()) {
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	373 this.outer.dispose();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	374 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	375 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	376 };
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	377 control.addListener (DWT.Dispose, controlListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	378
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	379 this.addListener(DWT.Dispose, new class () Listener {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	380 public void handleEvent (Event event) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	381 onDispose();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	382 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	383 });
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	384
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	385 Object effect = control.getData(DEFAULT_DROP_TARGET_EFFECT);
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	386 if (cast(DropTargetEffect) effect) {
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	387 dropEffect = cast(DropTargetEffect) effect;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	388 } else if (cast(Table) control) {
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	389 dropEffect = new TableDropTargetEffect(cast(Table) control);
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	390 } else if (cast(Tree) control) {
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	391 dropEffect = new TreeDropTargetEffect(cast(Tree) control);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	392 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	393
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	394 addDragHandlers();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	395 }
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	396 extern (C) {
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	397 static objc.id dropTargetProc2(objc.id id, objc.SEL sel) {
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	398 Display display = Display.findDisplay(Thread.getThis());
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	399 if (display is null \|\| display.isDisposed()) return null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	400 Widget widget = display.findWidget(id);
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	401 if (widget is null) return null;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	402 DropTarget dt = cast(DropTarget)widget.getData(DND.DROP_TARGET_KEY);
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	403 if (dt is null) return null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	404
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	405 if (sel is OS.sel_wantsPeriodicDraggingUpdates) {
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	406 return dt.wantsPeriodicDraggingUpdates() ? cast(objc.id) 1 : null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	407 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	408
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	409 return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	410 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	411
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	412 static objc.id dropTargetProc3(objc.id id, objc.SEL sel, objc.id arg0) {
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	413 Display display = Display.findDisplay(Thread.getThis());
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	414 if (display is null \|\| display.isDisposed()) return null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	415 Widget widget = display.findWidget(id);
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	416 if (widget is null) return null;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	417 DropTarget dt = cast(DropTarget)widget.getData(DND.DROP_TARGET_KEY);
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	418 if (dt is null) return null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	419
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	420 // arg0 is _always_ the sender, and implements NSDraggingInfo.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	421 // Looks like an NSObject for our purposes, though.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	422 NSObject sender = new NSObject(arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	423
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	424 if (sel is OS.sel_draggingEntered_) {
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	425 return cast(objc.id) dt.draggingEntered(sender);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	426 } else if (sel is OS.sel_draggingUpdated_) {
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	427 return cast(objc.id) dt.draggingUpdated(sender);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	428 } else if (sel is OS.sel_draggingExited_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	429 dt.draggingExited(sender);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	430 } else if (sel is OS.sel_performDragOperation_) {
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	431 return dt.performDragOperation(sender) ? cast(objc.id) 1 : null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	432 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	433
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	434 return null;
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	435 }}
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	436
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	437 /**
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	438 * Returns the Control which is registered for this DropTarget. This is the control over which the
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	439 * user positions the cursor to drop the data.
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	440 *
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	441 * @return the Control which is registered for this DropTarget
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	442 */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	443 public Control getControl () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	444 return control;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	445 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	446
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	447 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	448 * Returns an array of listeners who will be notified when a drag and drop
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	449 * operation is in progress, by sending it one of the messages defined in
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	450 * the <code>DropTargetListener</code> interface.
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	451 *
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	452 * @return the listeners who will be notified when a drag and drop
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	453 * operation is in progress
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	454 *
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	455 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	456 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	457 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	458 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	459 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	460 * @see DropTargetListener
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	461 * @see #addDropListener
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	462 * @see #removeDropListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	463 * @see DropTargetEvent
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	464 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	465 * @since 3.4
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	466 */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	467 public DropTargetListener[] getDropListeners() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	468 Listener[] listeners = getListeners(DND.DragEnter);
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	469 int length_ = listeners.length;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	470 DropTargetListener[] dropListeners = new DropTargetListener[length_];
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	471 int count = 0;
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	472 for (int i = 0; i < length_; i++) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	473 Listener listener = listeners[i];
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	474 if (cast(DNDListener) listener) {
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	475 dropListeners[count] = cast(DropTargetListener) (cast(DNDListener) listener).getEventListener();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	476 count++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	477 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	478 }
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	479 if (count is length_) return dropListeners;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	480 DropTargetListener[] result = new DropTargetListener[count];
122 2e671fa40eec Ported dwt.dnd, dwt.opengl, dwt.printing and dwt.program Jacob Carlborg <doob@me.com> parents: 115 diff changeset	481 SimpleType!(DropTargetListener).arraycopy(dropListeners, 0, result, 0, count);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	482 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	483 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	484
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	485 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	486 * Returns the drop effect for this DropTarget. This drop effect will be
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	487 * used during a drag and drop to display the drag under effect on the
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	488 * target widget.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	489 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	490 * @return the drop effect that is registered for this DropTarget
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	491 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	492 * @since 3.3
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	493 */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	494 public DropTargetEffect getDropTargetEffect() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	495 return dropEffect;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	496 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	497
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	498 int getOperationFromKeyState() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	499 // The NSDraggingInfo object already combined the modifier keys with the
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	500 // drag source's allowed events. This might be better accomplished by diffing
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	501 // the base drag source mask with the active drag state mask instead of snarfing
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	502 // the current event.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	503
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	504 // See documentation on [NSDraggingInfo draggingSourceOperationMask] for the
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	505 // correct Cocoa behavior. Control + Option or Command is NSDragOperationGeneric,
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	506 // or DND.DROP_DEFAULT in the DWT.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	507 NSEvent currEvent = NSApplication.sharedApplication().currentEvent();
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	508 NSUInteger modifiers = currEvent.modifierFlags();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	509 bool option = (modifiers & OS.NSAlternateKeyMask) is OS.NSAlternateKeyMask;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	510 bool control = (modifiers & OS.NSControlKeyMask) is OS.NSControlKeyMask;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	511 if (control && option) return DND.DROP_DEFAULT;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	512 if (control) return DND.DROP_LINK;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	513 if (option) return DND.DROP_COPY;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	514 return DND.DROP_DEFAULT;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	515 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	516
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	517 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	518 * Returns a list of the data types that can be transferred to this DropTarget.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	519 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	520 * @return a list of the data types that can be transferred to this DropTarget
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	521 */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	522 public Transfer[] getTransfer() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	523 return transferAgents;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	524 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	525
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	526 void onDispose () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	527 if (control is null)
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	528 return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	529 if (controlListener !is null)
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	530 control.removeListener(DWT.Dispose, controlListener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	531 controlListener = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	532 control.setData(DND.DROP_TARGET_KEY, null);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	533 transferAgents = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	534
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	535 // Unregister the control as a drop target.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	536 control.view.unregisterDraggedTypes();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	537 control = null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	538 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	539
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	540 int opToOsOp(int operation) {
115 a2d82e6fd054 Ported dwt.dnd Jacob Carlborg <doob@me.com> parents: 99 diff changeset	541 NSDragOperation osOperation;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	542 if ((operation & DND.DROP_COPY) !is 0){
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	543 osOperation \|= OS.NSDragOperationCopy;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	544 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	545 if ((operation & DND.DROP_LINK) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	546 osOperation \|= OS.NSDragOperationLink;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	547 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	548 if ((operation & DND.DROP_MOVE) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	549 osOperation \|= OS.NSDragOperationMove;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	550 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	551 if ((operation & DND.DROP_TARGET_MOVE) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	552 osOperation \|= OS.NSDragOperationDelete;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	553 }
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	554 return cast(int) osOperation;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	555 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	556
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	557 int osOpToOp(NSDragOperation osOperation){
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	558 int operation = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	559 if ((osOperation & OS.NSDragOperationCopy) !is 0){
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	560 operation \|= DND.DROP_COPY;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	561 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	562 if ((osOperation & OS.NSDragOperationLink) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	563 operation \|= DND.DROP_LINK;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	564 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	565 if ((osOperation & OS.NSDragOperationDelete) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	566 operation \|= DND.DROP_TARGET_MOVE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	567 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	568 if ((osOperation & OS.NSDragOperationMove) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	569 operation \|= DND.DROP_MOVE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	570 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	571 if (osOperation is OS.NSDragOperationEvery) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	572 operation = DND.DROP_COPY \| DND.DROP_MOVE \| DND.DROP_LINK;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	573 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	574 return operation;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	575 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	576
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	577 bool performDragOperation(NSObject sender) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	578 DNDEvent event = new DNDEvent();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	579 event.widget = this;
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	580 event.time = cast(int)System.currentTimeMillis();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	581
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	582 if (dropEffect !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	583 NSPoint mouseLocation = sender.draggingLocation();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	584 NSPoint globalLoc = sender.draggingDestinationWindow().convertBaseToScreen(mouseLocation);
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	585 event.item = dropEffect.getItem(cast(int)globalLoc.x, cast(int)globalLoc.y);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	586 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	587
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	588 event.detail = DND.DROP_NONE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	589 notifyListeners(DND.DragLeave, event);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	590
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	591 event = new DNDEvent();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	592 if (!setEventData(sender, event)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	593 return false;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	594 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	595
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	596 keyOperation = -1;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	597 int allowedOperations = event.operations;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	598 TransferData[] allowedDataTypes = new TransferData[event.dataTypes.length];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	599 System.arraycopy(event.dataTypes, 0, allowedDataTypes, 0, event.dataTypes.length);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	600 event.dataType = selectedDataType;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	601 event.detail = selectedOperation;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	602 notifyListeners(DND.DropAccept, event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	603
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	604 selectedDataType = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	605 if (event.dataType !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	606 for (int i = 0; i < allowedDataTypes.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	607 if (allowedDataTypes[i].type is event.dataType.type) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	608 selectedDataType = allowedDataTypes[i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	609 break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	610 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	611 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	612 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	613
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	614 selectedOperation = DND.DROP_NONE;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	615 if (selectedDataType !is null && (event.detail & allowedOperations) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	616 selectedOperation = event.detail;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	617 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	618
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	619 if (selectedOperation is DND.DROP_NONE) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	620 return false;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	621 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	622
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	623 // ask drag source for dropped data
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	624 NSPasteboard pasteboard = sender.draggingPasteboard();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	625 NSObject data = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	626 NSMutableArray types = NSMutableArray.arrayWithCapacity(10);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	627
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	628 for (int i = 0; i < transferAgents.length; i++){
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	629 Transfer transfer = transferAgents[i];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	630 String[] typeNames = transfer.getTypeNames();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	631 int[] typeIds = transfer.getTypeIds();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	632
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	633 for (int j = 0; j < typeNames.length; j++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	634 if (selectedDataType.type is typeIds[j]) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	635 types.addObject(NSString.stringWith(typeNames[j]));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	636 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	637 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	638 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	639 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	640
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	641 NSString type = pasteboard.availableTypeFromArray(types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	642 TransferData tdata = new TransferData();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	643
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	644 if (type !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	645 tdata.type = Transfer.registerType(type.getString());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	646 if (type.isEqual(OS.NSStringPboardType) \|\|
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	647 type.isEqual(OS.NSHTMLPboardType) \|\|
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	648 type.isEqual(OS.NSRTFPboardType)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	649 tdata.data = pasteboard.stringForType(type);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	650 } else if (type.isEqual(OS.NSURLPboardType)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	651 tdata.data = NSURL.URLFromPasteboard(pasteboard);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	652 } else if (type.isEqual(OS.NSFilenamesPboardType)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	653 tdata.data = new NSArray(pasteboard.propertyListForType(type).id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	654 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	655 tdata.data = pasteboard.dataForType(type);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	656 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	657 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	658
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	659 if (tdata.data !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	660 data = tdata.data;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	661 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	662
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	663 // Get Data in a Java format
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	664 Object object = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	665 for (int i = 0; i < transferAgents.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	666 Transfer transfer = transferAgents[i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	667 if (transfer !is null && transfer.isSupportedType(selectedDataType)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	668 selectedDataType.data = data;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	669 object = transfer.nativeToJava(selectedDataType);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	670 break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	671 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	672 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	673
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	674 if (object is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	675 selectedOperation = DND.DROP_NONE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	676 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	677
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	678 event.dataType = selectedDataType;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	679 event.detail = selectedOperation;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	680 event.data = object;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	681 notifyListeners(DND.Drop, event);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	682 selectedOperation = DND.DROP_NONE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	683 if ((allowedOperations & event.detail) is event.detail) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	684 selectedOperation = event.detail;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	685 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	686 //notify source of action taken
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	687 return (selectedOperation !is DND.DROP_NONE);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	688 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	689
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	690 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	691 * Removes the listener from the collection of listeners who will
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	692 * be notified when a drag and drop operation is in progress.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	693 *
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	694 * @param listener the listener which should no longer be notified
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	695 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	696 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	697 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	698 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	699 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	700 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	701 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	702 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	703 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	704 * @see DropTargetListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	705 * @see #addDropListener
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	706 * @see #getDropListeners
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	707 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	708 public void removeDropListener(DropTargetListener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	709 if (listener is null) DND.error (DWT.ERROR_NULL_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	710 removeListener (DND.DragEnter, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	711 removeListener (DND.DragLeave, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	712 removeListener (DND.DragOver, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	713 removeListener (DND.DragOperationChanged, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	714 removeListener (DND.Drop, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	715 removeListener (DND.DropAccept, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	716 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	717
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	718 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	719 * Specifies the drop effect for this DropTarget. This drop effect will be
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	720 * used during a drag and drop to display the drag under effect on the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	721 * target widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	722 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	723 * @param effect the drop effect that is registered for this DropTarget
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	724 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	725 * @since 3.3
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	726 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	727 public void setDropTargetEffect(DropTargetEffect effect) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	728 dropEffect = effect;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	729 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	730
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	731 bool setEventData(NSObject draggingState, DNDEvent event) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	732 if (draggingState is null) return false;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	733
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	734 // get allowed operations
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	735 int style = getStyle();
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	736 NSDragOperation allowedActions = draggingState.draggingSourceOperationMask();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	737 int operations = osOpToOp(allowedActions) & style;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	738 if (operations is DND.DROP_NONE) return false;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	739
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	740 // get current operation
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	741 int operation = getOperationFromKeyState();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	742 keyOperation = operation;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	743 if (operation is DND.DROP_DEFAULT) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	744 if ((style & DND.DROP_DEFAULT) is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	745 operation = (operations & DND.DROP_MOVE) !is 0 ? DND.DROP_MOVE : DND.DROP_NONE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	746 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	747 } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	748 if ((operation & operations) is 0) operation = DND.DROP_NONE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	749 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	750
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	751
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	752 // get allowed transfer types
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	753 NSPasteboard dragPBoard = draggingState.draggingPasteboard();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	754 NSArray draggedTypes = dragPBoard.types();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	755 if (draggedTypes is null) return false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	756
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	757 NSUInteger draggedTypeCount = draggedTypes.count();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	758
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	759 TransferData[] dataTypes = new TransferData[draggedTypeCount];
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	760 int index = -1;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	761 for (int i = 0; i < draggedTypeCount; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	762 id draggedType = draggedTypes.objectAtIndex(i);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	763 NSString nativeDataType = new NSString(draggedType);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	764 TransferData data = new TransferData();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	765 data.type = Transfer.registerType(nativeDataType.getString());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	766
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	767 for (int j = 0; j < transferAgents.length; j++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	768 Transfer transfer = transferAgents[j];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	769 if (transfer !is null && transfer.isSupportedType(data)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	770 dataTypes[++index] = data;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	771 break;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	772 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	773 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	774 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	775 if (index is -1) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	776
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	777 if (index < dataTypes.length - 1) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	778 TransferData[] temp = new TransferData[index + 1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	779 System.arraycopy(dataTypes, 0, temp, 0, index + 1);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	780 dataTypes = temp;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	781 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	782
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	783 // Convert from window-relative to global coordinates, and flip it.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	784 NSPoint mouse = draggingState.draggingLocation();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	785 NSPoint globalMouse = draggingState.draggingDestinationWindow().convertBaseToScreen(mouse);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	786 NSArray screens = NSScreen.screens();
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	787 NSRect screenRect = (new NSScreen(screens.objectAtIndex(0))).frame();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	788 globalMouse.y = screenRect.height - globalMouse.y;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	789
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	790 event.widget = this;
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	791 event.x = cast(int)globalMouse.x;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	792 event.y = cast(int)globalMouse.y;
d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	793 event.time = cast(int)System.currentTimeMillis();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	794 event.feedback = DND.FEEDBACK_SELECT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	795 event.dataTypes = dataTypes;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	796 event.dataType = dataTypes[0];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	797 event.operations = operations;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	798 event.detail = operation;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	799 if (dropEffect !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	800 event.item = dropEffect.getItem(event.x, event.y);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	801 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	802
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	803 return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	804 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	805
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	806 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	807 * Specifies the data types that can be transferred to this DropTarget. If data is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	808 * being dragged that does not match one of these types, the drop target will be notified of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	809 * the drag and drop operation but the currentDataType will be null and the operation
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	810 * will be DND.NONE.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	811 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	812 * @param transferAgents a list of Transfer objects which define the types of data that can be
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	813 * dropped on this target
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	814 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	815 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	816 * <li>ERROR_NULL_ARGUMENT - if transferAgents is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	817 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	818 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	819 public void setTransfer(Transfer[] transferAgents){
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	820 if (transferAgents is null) DND.error(DWT.ERROR_NULL_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	821 this.transferAgents = transferAgents;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	822
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	823
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	824 // Register the types as valid drop types in Cocoa.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	825 // Accumulate all of the transfer types into a list.
99 d32621bf0f90 Ported dwt.dnd.DropTarget Jacob Carlborg <doob@me.com> parents: 45 diff changeset	826 String[] typeStrings;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	827
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	828 for (int i = 0; i < this.transferAgents.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	829 String[] types = transferAgents[i].getTypeNames();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	830
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	831 for (int j = 0; j < types.length; j++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	832 typeStrings.add(types[j]);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	833 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	834 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	835
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	836 // Convert to an NSArray of NSStrings so we can register with the Control.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	837 int typeStringCount = typeStrings.size();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	838 NSMutableArray nsTypeStrings = NSMutableArray.arrayWithCapacity(typeStringCount);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	839
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	840 for (int i = 0; i < typeStringCount; i++) {
122 2e671fa40eec Ported dwt.dnd, dwt.opengl, dwt.printing and dwt.program Jacob Carlborg <doob@me.com> parents: 115 diff changeset	841 nsTypeStrings.addObject(NSString.stringWith(typeStrings.get(i)));
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	842 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	843
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	844 control.view.registerForDraggedTypes(nsTypeStrings);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	845
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	846 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	847
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	848 // By returning true we get draggingUpdated messages even when the mouse isn't moving.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	849 bool wantsPeriodicDraggingUpdates() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 8 diff changeset	850 return true;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	851 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	852
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	853 }

Mercurial > projects > dwt-mac

annotate dwt/dnd/DropTarget.d @ 156:969e7de37c3d default tip