equal
deleted
inserted
replaced
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 "{ Package: 'stx:libview2' }" |
12 "{ Package: 'stx:libview2' }" |
13 |
13 |
14 Object subclass:#DragHandler |
14 Object subclass:#DragHandler |
15 instanceVariableNames:'rootView lastRootPoint' |
15 instanceVariableNames:'rootView lastRootPoint dropContext' |
16 classVariableNames:'' |
16 classVariableNames:'' |
17 poolDictionaries:'' |
17 poolDictionaries:'' |
18 category:'Interface-DragAndDrop' |
18 category:'Interface-DragAndDrop' |
19 ! |
19 ! |
20 |
20 |
101 startOpaqueDrag:aTwoArgDragBlock extent:anExtent offset:anOffset |
101 startOpaqueDrag:aTwoArgDragBlock extent:anExtent offset:anOffset |
102 "creates and returns the drag handler which is responsible |
102 "creates and returns the drag handler which is responsible |
103 for a generic opaque drag." |
103 for a generic opaque drag." |
104 |
104 |
105 ^ Opaque new dragSize:anExtent dragOffset:anOffset dragBlock:aTwoArgDragBlock |
105 ^ Opaque new dragSize:anExtent dragOffset:anOffset dragBlock:aTwoArgDragBlock |
|
106 ! ! |
|
107 |
|
108 !DragHandler methodsFor:'accessing'! |
|
109 |
|
110 targetView |
|
111 ^ targetView |
|
112 ! |
|
113 |
|
114 targetView:something |
|
115 targetView := something. |
106 ! ! |
116 ! ! |
107 |
117 |
108 !DragHandler methodsFor:'event dropTarget'! |
118 !DragHandler methodsFor:'event dropTarget'! |
109 |
119 |
110 dropTargetWillChange |
120 dropTargetWillChange |
447 ! ! |
457 ! ! |
448 |
458 |
449 !DragHandler class methodsFor:'documentation'! |
459 !DragHandler class methodsFor:'documentation'! |
450 |
460 |
451 version |
461 version |
452 ^ '$Header: /cvs/stx/stx/libview2/DragHandler.st,v 1.10 2007-05-29 10:10:42 cg Exp $' |
462 ^ '$Header: /cvs/stx/stx/libview2/DragHandler.st,v 1.11 2008-04-22 15:26:01 cg Exp $' |
453 ! ! |
463 ! ! |